|
|
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.