(FORTRAN) | (C) |
subroutine getgp(x,y,z) | getgp(x,y,z) |
real x,y,z | float *x,*y,*z; |
(FORTRAN) | (C) |
subroutine getgp2(x,y) | getgp2(x,y) |
real x,y | float *x,*y; |
(FORTRAN) | (C) |
subroutine sgetgp2(x,y) | sgetgp2(x,y) |
real x,y | float *x,*y; |