| File |
Line number |
Procedure |
Code |
|
./pkg/kpp/KPP_PARAMS.h |
18 |
NO PROCEDURE |
integer imt |
|
./pkg/kpp/KPP_PARAMS.h |
23 |
NO PROCEDURE |
parameter( imt=(sNx+2*OLx)*(sNy+2*OLy) ) |
|
./pkg/kpp/kpp_routines.F |
100 |
KPPMIX |
integer kmtj (imt ) |
|
./pkg/kpp/kpp_routines.F |
1017 |
RI_IWMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
101 |
KPPMIX |
_RL shsq (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
1026 |
RI_IWMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
102 |
KPPMIX |
_RL dvsq (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
103 |
KPPMIX |
_RL ustar (imt ) |
|
./pkg/kpp/kpp_routines.F |
104 |
KPPMIX |
_RL bo (imt ) |
|
./pkg/kpp/kpp_routines.F |
105 |
KPPMIX |
_RL bosol (imt ) |
|
./pkg/kpp/kpp_routines.F |
1064 |
RI_IWMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
107 |
KPPMIX |
_RL boplume (imt,Nrp1) |
|
./pkg/kpp/kpp_routines.F |
108 |
KPPMIX |
_RL SPDepth (imt ) |
|
./pkg/kpp/kpp_routines.F |
110 |
KPPMIX |
_RL lon (imt ) |
|
./pkg/kpp/kpp_routines.F |
1110 |
RI_IWMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
111 |
KPPMIX |
_RL lat (imt ) |
|
./pkg/kpp/kpp_routines.F |
1145 |
Z121 |
_RL v(imt,0:Nrp1) |
|
./pkg/kpp/kpp_routines.F |
114 |
KPPMIX |
_RL dbloc (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
115 |
KPPMIX |
_RL Ritop (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
1167 |
Z121 |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
116 |
KPPMIX |
_RL coriol (imt ) |
|
./pkg/kpp/kpp_routines.F |
117 |
KPPMIX |
_RS msk (imt ) |
|
./pkg/kpp/kpp_routines.F |
118 |
KPPMIX |
_RL diffusKzS(imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
119 |
KPPMIX |
_RL diffusKzT(imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
130 |
KPPMIX |
_RL diffus(imt,0:Nrp1,mdiff) |
|
./pkg/kpp/kpp_routines.F |
131 |
KPPMIX |
_RL ghat (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
1326 |
BLMIX |
_RL ustar (imt) |
|
./pkg/kpp/kpp_routines.F |
1327 |
BLMIX |
_RL bfsfc (imt) |
|
./pkg/kpp/kpp_routines.F |
1328 |
BLMIX |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1329 |
BLMIX |
_RL stable(imt) |
|
./pkg/kpp/kpp_routines.F |
132 |
KPPMIX |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1330 |
BLMIX |
_RL casea (imt) |
|
./pkg/kpp/kpp_routines.F |
1331 |
BLMIX |
_RL diffus(imt,0:Nrp1,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1332 |
BLMIX |
integer kbl(imt) |
|
./pkg/kpp/kpp_routines.F |
1339 |
BLMIX |
_RL dkm1 (imt,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1340 |
BLMIX |
_RL blmc (imt,Nr,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1341 |
BLMIX |
_RL ghat (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
1342 |
BLMIX |
_RL sigma(imt) |
|
./pkg/kpp/kpp_routines.F |
1351 |
BLMIX |
_RL gat1m(imt), gat1s(imt), gat1t(imt) |
|
./pkg/kpp/kpp_routines.F |
1352 |
BLMIX |
_RL dat1m(imt), dat1s(imt), dat1t(imt) |
|
./pkg/kpp/kpp_routines.F |
1353 |
BLMIX |
_RL ws(imt), wm(imt) |
|
./pkg/kpp/kpp_routines.F |
1371 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
1386 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
1395 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
1445 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
1466 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
146 |
KPPMIX |
integer kbl(imt ) |
|
./pkg/kpp/kpp_routines.F |
147 |
KPPMIX |
_RL bfsfc (imt ) |
|
./pkg/kpp/kpp_routines.F |
1489 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
148 |
KPPMIX |
_RL casea (imt ) |
|
./pkg/kpp/kpp_routines.F |
149 |
KPPMIX |
_RL stable (imt ) |
|
./pkg/kpp/kpp_routines.F |
150 |
KPPMIX |
_RL dkm1 (imt, mdiff) |
|
./pkg/kpp/kpp_routines.F |
151 |
KPPMIX |
_RL blmc (imt,Nr,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1521 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
152 |
KPPMIX |
_RL sigma (imt ) |
|
./pkg/kpp/kpp_routines.F |
153 |
KPPMIX |
_RL Rib (imt,Nr ) |
|
./pkg/kpp/kpp_routines.F |
1543 |
BLMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
1585 |
ENHANCE |
_RL dkm1 (imt,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1586 |
ENHANCE |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1587 |
ENHANCE |
integer kbl (imt) |
|
./pkg/kpp/kpp_routines.F |
1588 |
ENHANCE |
_RL diffus(imt,0:Nrp1,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1589 |
ENHANCE |
_RL casea (imt) |
|
./pkg/kpp/kpp_routines.F |
1593 |
ENHANCE |
_RL ghat (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
1597 |
ENHANCE |
_RL blmc (imt,Nr,mdiff) |
|
./pkg/kpp/kpp_routines.F |
1607 |
ENHANCE |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
195 |
KPPMIX |
do i = 1,imt |
|
./pkg/kpp/kpp_routines.F |
267 |
KPPMIX |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
361 |
BLDEPTH |
integer kmtj(imt) |
|
./pkg/kpp/kpp_routines.F |
362 |
BLDEPTH |
_RL dvsq (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
363 |
BLDEPTH |
_RL dbloc (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
364 |
BLDEPTH |
_RL Ritop (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
365 |
BLDEPTH |
_RL ustar (imt) |
|
./pkg/kpp/kpp_routines.F |
366 |
BLDEPTH |
_RL bo (imt) |
|
./pkg/kpp/kpp_routines.F |
367 |
BLDEPTH |
_RL bosol (imt) |
|
./pkg/kpp/kpp_routines.F |
368 |
BLDEPTH |
_RL coriol (imt) |
|
./pkg/kpp/kpp_routines.F |
371 |
BLDEPTH |
_RL boplume (imt,Nrp1) |
|
./pkg/kpp/kpp_routines.F |
372 |
BLDEPTH |
_RL SPDepth (imt) |
|
./pkg/kpp/kpp_routines.F |
374 |
BLDEPTH |
_RL lon (imt) |
|
./pkg/kpp/kpp_routines.F |
375 |
BLDEPTH |
_RL lat (imt) |
|
./pkg/kpp/kpp_routines.F |
388 |
BLDEPTH |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
389 |
BLDEPTH |
_RL bfsfc (imt) |
|
./pkg/kpp/kpp_routines.F |
390 |
BLDEPTH |
_RL stable (imt) |
|
./pkg/kpp/kpp_routines.F |
391 |
BLDEPTH |
_RL casea (imt) |
|
./pkg/kpp/kpp_routines.F |
392 |
BLDEPTH |
integer kbl(imt) |
|
./pkg/kpp/kpp_routines.F |
393 |
BLDEPTH |
_RL Rib (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
394 |
BLDEPTH |
_RL sigma (imt) |
|
./pkg/kpp/kpp_routines.F |
401 |
BLDEPTH |
_RL wm(imt), ws(imt) |
|
./pkg/kpp/kpp_routines.F |
402 |
BLDEPTH |
_RL worka(imt) |
|
./pkg/kpp/kpp_routines.F |
420 |
BLDEPTH |
_RL KPPBFSFC(imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
421 |
BLDEPTH |
_RL KPPRi(imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
435 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
445 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
460 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
467 |
BLDEPTH |
I imt, hbf, |
|
./pkg/kpp/kpp_routines.F |
474 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
489 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
494 |
BLDEPTH |
I imt, hbf,SPDepth, |
|
./pkg/kpp/kpp_routines.F |
500 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
509 |
BLDEPTH |
DO i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
520 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
525 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
541 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
597 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
608 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
628 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
637 |
BLDEPTH |
I imt, minusone, |
|
./pkg/kpp/kpp_routines.F |
646 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
653 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
657 |
BLDEPTH |
I imt,minusone,SPDepth, |
|
./pkg/kpp/kpp_routines.F |
663 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
670 |
BLDEPTH |
DO i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
686 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
706 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
724 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
740 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
751 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
760 |
BLDEPTH |
I imt, minusone, |
|
./pkg/kpp/kpp_routines.F |
769 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
776 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
780 |
BLDEPTH |
I imt,minusone,SPDepth, |
|
./pkg/kpp/kpp_routines.F |
786 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
793 |
BLDEPTH |
DO i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
809 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
818 |
BLDEPTH |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
857 |
WSCALE |
_RL sigma(imt) |
|
./pkg/kpp/kpp_routines.F |
858 |
WSCALE |
_RL hbl (imt) |
|
./pkg/kpp/kpp_routines.F |
859 |
WSCALE |
_RL ustar(imt) |
|
./pkg/kpp/kpp_routines.F |
860 |
WSCALE |
_RL bfsfc(imt) |
|
./pkg/kpp/kpp_routines.F |
865 |
WSCALE |
_RL wm(imt), ws(imt) |
|
./pkg/kpp/kpp_routines.F |
883 |
WSCALE |
do i = 1, imt |
|
./pkg/kpp/kpp_routines.F |
973 |
RI_IWMIX |
integer kmtj (imt) |
|
./pkg/kpp/kpp_routines.F |
974 |
RI_IWMIX |
_RL shsq (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
975 |
RI_IWMIX |
_RL dbloc (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
976 |
RI_IWMIX |
_RL dblocSm (imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
977 |
RI_IWMIX |
_RL diffusKzS(imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
978 |
RI_IWMIX |
_RL diffusKzT(imt,Nr) |
|
./pkg/kpp/kpp_routines.F |
986 |
RI_IWMIX |
_RL diffus(imt,0:Nrp1,3) |
|
./pkg/opps/opps_calc.F |
536 |
NLOPPS |
parameter (imt = 361 , jmt = 301 , km = 30 ) |
|
./pkg/opps/opps_calc.F |
566 |
NLOPPS |
real ta(imt,km),sa(imt,km),gcmdz(km),dz(km) |
|
./pkg/opps/opps_calc.F |
607 |
NLOPPS |
common / boundc / wsx(imt,jmt),wsy(imt,jmt),hfs(imt,jmt), |
|
./pkg/opps/opps_calc.F |
608 |
NLOPPS |
1 ple(imt,jmt),kmp(imt,jmt),kmq(imt,jmt) |
|
./pkg/opps/opps_calc.F |
610 |
NLOPPS |
& ,wsx1(imt,jmt),wsy1(imt,jmt) |
|
./pkg/opps/opps_calc.F |
611 |
NLOPPS |
1 ,wsx2(imt,jmt),wsy2(imt,jmt) |
|
./pkg/opps/opps_calc.F |
616 |
NLOPPS |
common /countc/ convadj(imt,jmt,km),ics,depth(km),problem |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
57 |
SALT_PLUME_TENDENCY_APPLY_S |
integer imt |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
58 |
SALT_PLUME_TENDENCY_APPLY_S |
parameter( imt=(sNx+2*OLx)*(sNy+2*OLy) ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
80 |
SALT_PLUME_TENDENCY_APPLY_S |
I imt,minusone,SaltPlumeDepth(1-OLx,1-OLy,bi,bj), |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
93 |
SALT_PLUME_TENDENCY_APPLY_S |
I imt,minusone,SaltPlumeDepth(1-OLx,1-OLy,bi,bj), |
|
./pkg/salt_plume/salt_plume_volfrac.F |
101 |
SALT_PLUME_VOLFRAC |
I imt,oneRS,temp, |
|
./pkg/salt_plume/salt_plume_volfrac.F |
69 |
SALT_PLUME_VOLFRAC |
INTEGER imt |
|
./pkg/salt_plume/salt_plume_volfrac.F |
70 |
SALT_PLUME_VOLFRAC |
parameter( imt=(sNx+2*OLx)*(sNy+2*OLy) ) |