tspec96.f.out

来自「gsac程序包」· OUT 代码 · 共 31 行

tspec96.f: In subroutine `fstarr':
tspec96.f:2258: warning:
                   call getegn(za,zb,zc,zd,ze,zf,om2,wvno2,rp, rsv, rsh,
                        1
tspec96.f:3265: (continued):
                           call getegn(a,b,c,d,e,f,omega2,wvno2,rp, rsv, rsh,
                                2
Too few arguments for `getegn' at (2) versus invocation at (1) [info -f g77 M GLOBALS]
tspec96.f:2258: warning:
                   call getegn(za,zb,zc,zd,ze,zf,om2,wvno2,rp, rsv, rsh,
                        1
tspec96.f:3337: (continued):
                           call getegn(a,b,c,d,e,f,omega2,wvno2,rp, rsv, rsh,
                                2
Too few arguments for `getegn' at (2) versus invocation at (1) [info -f g77 M GLOBALS]
tspec96.f:2258: warning:
                   call getegn(za,zb,zc,zd,ze,zf,om2,wvno2,rp, rsv, rsh,
                        1
tspec96.f:3352: (continued):
                           call getegn(a,b,c,d,e,f,omega2,wvno2,rp, rsv, rsh,
                                2
Too few arguments for `getegn' at (2) versus invocation at (1) [info -f g77 M GLOBALS]
tspec96.f: In subroutine `gttdtdp':
tspec96.f:2258: warning:
                   call getegn(za,zb,zc,zd,ze,zf,om2,wvno2,rp, rsv, rsh,
                        1
tspec96.f:3422: (continued):
                   call getegn(a,b,c,d,e,f,omega2,wvno2,rp, rsv, rsh,
                        2
Too few arguments for `getegn' at (2) versus invocation at (1) [info -f g77 M GLOBALS]