|
|
1.1 ! root 1: common/blah/i,j,k ! 2: double precision d ! 3: equivalence (d,i),(x,i) ! 4: write(*,*) loc(i), loc(d), loc(x), loc(z) ! 5: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.