|
|
researchv10 Norman
external f, g call foo(f, g) end logical function f(n) f = n .gt. 3 end subroutine foo(f, g) external f double precision g call goo(f,g(3)) end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.