File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_main.F |
127 |
GRDCHK_MAIN |
_RL adxxmemo |
./pkg/grdchk/grdchk_main.F |
164 |
GRDCHK_MAIN |
adxxmemo = 0. |
./pkg/grdchk/grdchk_main.F |
220 |
GRDCHK_MAIN |
adxxmemo = 0. |
./pkg/grdchk/grdchk_main.F |
266 |
GRDCHK_MAIN |
& adxxmemo, ierr, myThid ) |
./pkg/grdchk/grdchk_main.F |
268 |
GRDCHK_MAIN |
_GLOBAL_SUM_RL( adxxmemo, myThid ) |
./pkg/grdchk/grdchk_main.F |
407 |
GRDCHK_MAIN |
IF ( adxxmemo .EQ. 0. ) THEN |
./pkg/grdchk/grdchk_main.F |
408 |
GRDCHK_MAIN |
ratio_ad = ABS( adxxmemo - gfd ) |
./pkg/grdchk/grdchk_main.F |
410 |
GRDCHK_MAIN |
ratio_ad = 1. - gfd/adxxmemo |
./pkg/grdchk/grdchk_main.F |
432 |
GRDCHK_MAIN |
adxxmem ( ichknum ) = adxxmemo |
./pkg/grdchk/grdchk_main.F |
469 |
GRDCHK_MAIN |
& adxxmemo, gfd, ratio_ad |
./pkg/grdchk/grdchk_main.F |
487 |
GRDCHK_MAIN |
& ' ADM adjoint_gradient =', adxxmemo |
./pkg/grdchk/grdchk_print.F |
132 |
GRDCHK_PRINT |
adxxmemo = adxxmem (i) |
./pkg/grdchk/grdchk_print.F |
173 |
GRDCHK_PRINT |
& i, gfd, adxxmemo, ratio_ad |
./pkg/grdchk/grdchk_print.F |
48 |
GRDCHK_PRINT |
_RL adxxmemo |