File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_main.F |
128 |
GRDCHK_MAIN |
_RL ftlxxmemo |
./pkg/grdchk/grdchk_main.F |
165 |
GRDCHK_MAIN |
ftlxxmemo = 0. |
./pkg/grdchk/grdchk_main.F |
301 |
GRDCHK_MAIN |
ftlxxmemo = g_objf_state_final(idep,jdep,1,1,1) |
./pkg/grdchk/grdchk_main.F |
303 |
GRDCHK_MAIN |
ftlxxmemo = g_fc |
./pkg/grdchk/grdchk_main.F |
413 |
GRDCHK_MAIN |
IF ( ftlxxmemo .EQ. 0. ) THEN |
./pkg/grdchk/grdchk_main.F |
414 |
GRDCHK_MAIN |
ratio_ftl = ABS( ftlxxmemo - gfd ) |
./pkg/grdchk/grdchk_main.F |
416 |
GRDCHK_MAIN |
ratio_ftl = 1. - gfd/ftlxxmemo |
./pkg/grdchk/grdchk_main.F |
433 |
GRDCHK_MAIN |
ftlxxmem ( ichknum ) = ftlxxmemo |
./pkg/grdchk/grdchk_main.F |
463 |
GRDCHK_MAIN |
& ftlxxmemo, gfd, ratio_ftl |
./pkg/grdchk/grdchk_main.F |
477 |
GRDCHK_MAIN |
& ' TLM tangent-lin_grad =', ftlxxmemo |
./pkg/grdchk/grdchk_print.F |
133 |
GRDCHK_PRINT |
ftlxxmemo = ftlxxmem (i) |
./pkg/grdchk/grdchk_print.F |
168 |
GRDCHK_PRINT |
& i, gfd, ftlxxmemo, ratio_ftl |
./pkg/grdchk/grdchk_print.F |
49 |
GRDCHK_PRINT |
_RL ftlxxmemo |