File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_loc.F |
111 |
GRDCHK_LOC |
& icomp, ncvarcomp, ichknum |
./pkg/grdchk/grdchk_loc.F |
116 |
GRDCHK_LOC |
if ( ichknum .EQ. 1 ) then |
./pkg/grdchk/grdchk_loc.F |
11 |
GRDCHK_LOC |
I ichknum, |
./pkg/grdchk/grdchk_loc.F |
128 |
GRDCHK_LOC |
itest = itestmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
129 |
GRDCHK_LOC |
icomptest = icompmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
130 |
GRDCHK_LOC |
irecwrk = irecmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
133 |
GRDCHK_LOC |
kwrk = klocmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
134 |
GRDCHK_LOC |
iobcswrk = iobcsmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
135 |
GRDCHK_LOC |
icglo = icglomem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
136 |
GRDCHK_LOC |
jwrk = jlocmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
137 |
GRDCHK_LOC |
iwrk = ilocmem (ichknum-1) |
./pkg/grdchk/grdchk_loc.F |
165 |
GRDCHK_LOC |
& bi, bj, icomptest, ichknum |
./pkg/grdchk/grdchk_loc.F |
59 |
GRDCHK_LOC |
integer ichknum |
./pkg/grdchk/grdchk_main.F |
108 |
GRDCHK_MAIN |
INTEGER ichknum |
./pkg/grdchk/grdchk_main.F |
221 |
GRDCHK_MAIN |
ichknum = (icomp - nbeg)/nstep + 1 |
./pkg/grdchk/grdchk_main.F |
223 |
GRDCHK_MAIN |
IF ( ichknum .LE. maxgrdchecks ) THEN |
./pkg/grdchk/grdchk_main.F |
225 |
GRDCHK_MAIN |
& '====== Starts gradient-check number', ichknum, |
./pkg/grdchk/grdchk_main.F |
231 |
GRDCHK_MAIN |
CALL GRDCHK_LOC( icomp, ichknum, |
./pkg/grdchk/grdchk_main.F |
426 |
GRDCHK_MAIN |
fcrmem ( ichknum ) = fcref |
./pkg/grdchk/grdchk_main.F |
427 |
GRDCHK_MAIN |
fcppmem ( ichknum ) = fcpertplus |
./pkg/grdchk/grdchk_main.F |
428 |
GRDCHK_MAIN |
fcpmmem ( ichknum ) = fcpertminus |
./pkg/grdchk/grdchk_main.F |
429 |
GRDCHK_MAIN |
xxmemref ( ichknum ) = xxmemo_ref |
./pkg/grdchk/grdchk_main.F |
430 |
GRDCHK_MAIN |
xxmempert ( ichknum ) = xxmemo_pert |
./pkg/grdchk/grdchk_main.F |
431 |
GRDCHK_MAIN |
gfdmem ( ichknum ) = gfd |
./pkg/grdchk/grdchk_main.F |
432 |
GRDCHK_MAIN |
adxxmem ( ichknum ) = adxxmemo |
./pkg/grdchk/grdchk_main.F |
433 |
GRDCHK_MAIN |
ftlxxmem ( ichknum ) = ftlxxmemo |
./pkg/grdchk/grdchk_main.F |
434 |
GRDCHK_MAIN |
ratioadmem ( ichknum ) = ratio_ad |
./pkg/grdchk/grdchk_main.F |
435 |
GRDCHK_MAIN |
ratioftlmem ( ichknum ) = ratio_ftl |
./pkg/grdchk/grdchk_main.F |
437 |
GRDCHK_MAIN |
irecmem ( ichknum ) = icvrec |
./pkg/grdchk/grdchk_main.F |
438 |
GRDCHK_MAIN |
bimem ( ichknum ) = itile |
./pkg/grdchk/grdchk_main.F |
439 |
GRDCHK_MAIN |
bjmem ( ichknum ) = jtile |
./pkg/grdchk/grdchk_main.F |
440 |
GRDCHK_MAIN |
ilocmem ( ichknum ) = itilepos |
./pkg/grdchk/grdchk_main.F |
441 |
GRDCHK_MAIN |
jlocmem ( ichknum ) = jtilepos |
./pkg/grdchk/grdchk_main.F |
442 |
GRDCHK_MAIN |
klocmem ( ichknum ) = layer |
./pkg/grdchk/grdchk_main.F |
443 |
GRDCHK_MAIN |
iobcsmem ( ichknum ) = obcspos |
./pkg/grdchk/grdchk_main.F |
444 |
GRDCHK_MAIN |
icompmem ( ichknum ) = icomp |
./pkg/grdchk/grdchk_main.F |
445 |
GRDCHK_MAIN |
ichkmem ( ichknum ) = ichknum |
./pkg/grdchk/grdchk_main.F |
446 |
GRDCHK_MAIN |
itestmem ( ichknum ) = itest |
./pkg/grdchk/grdchk_main.F |
447 |
GRDCHK_MAIN |
ierrmem ( ichknum ) = ierr |
./pkg/grdchk/grdchk_main.F |
448 |
GRDCHK_MAIN |
icglomem ( ichknum ) = icglo |
./pkg/grdchk/grdchk_main.F |
455 |
GRDCHK_MAIN |
& ' grad-res ',myprocid,ichknum,itilepos,jtilepos, |
./pkg/grdchk/grdchk_main.F |
460 |
GRDCHK_MAIN |
& ' grad-res ',myprocid,ichknum,ichkmem(ichknum), |
./pkg/grdchk/grdchk_main.F |
461 |
GRDCHK_MAIN |
& icompmem(ichknum),itestmem(ichknum), |
./pkg/grdchk/grdchk_main.F |
462 |
GRDCHK_MAIN |
& bimem(ichknum),bjmem(ichknum),iobcsmem(ichknum), |
./pkg/grdchk/grdchk_main.F |
466 |
GRDCHK_MAIN |
& ' grad-res ',myprocid,ichknum,ichkmem(ichknum), |
./pkg/grdchk/grdchk_main.F |
467 |
GRDCHK_MAIN |
& icompmem(ichknum),itestmem(ichknum), |
./pkg/grdchk/grdchk_main.F |
468 |
GRDCHK_MAIN |
& bimem(ichknum),bjmem(ichknum),iobcsmem(ichknum), |
./pkg/grdchk/grdchk_main.F |
495 |
GRDCHK_MAIN |
& '====== End of gradient-check number', ichknum, |
./pkg/grdchk/grdchk_main.F |
519 |
GRDCHK_MAIN |
CALL GRDCHK_PRINT( ichknum, ierr_grdchk, myThid ) |
./pkg/grdchk/grdchk_print.F |
123 |
GRDCHK_PRINT |
numchecks = ichknum |
./pkg/grdchk/grdchk_print.F |
197 |
GRDCHK_PRINT |
IF ( ichknum.GT.1 ) ratio_RMS = ratio_RMS / ichknum |
./pkg/grdchk/grdchk_print.F |
203 |
GRDCHK_PRINT |
& 'grdchk summary : RMS of ',ichknum,' ratios =',ratio_RMS |
./pkg/grdchk/grdchk_print.F |
36 |
GRDCHK_PRINT |
integer ichknum |
./pkg/grdchk/grdchk_print.F |
8 |
GRDCHK_PRINT |
I ichknum, |