Oasis3 4.0.2
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | glored (pzgg, pworkgr, klon, klat, ktronca) |
subroutine glored | ( | REAL (kind=ip_realwp_p),dimension(klon,klat) | pzgg, |
REAL (kind=ip_realwp_p),dimension(klon*klat) | pworkgr, | ||
klon, | |||
klat, | |||
ktronca | |||
) |
Definition at line 1 of file glored.f.
References izero(), mod_gauss::ninip16, mod_gauss::ninip160, mod_gauss::ninip24, mod_gauss::ninip32, mod_gauss::ninip48, mod_gauss::ninip80, mod_printing::nlogprt, mod_unit::nulou, and prtout().
Referenced by postpro().