File |
Line number |
Procedure |
Code |
./pkg/obcs/obcs_seaice_sponge.F |
120 |
OBCS_SEAICE_SPONGE_A |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
147 |
OBCS_SEAICE_SPONGE_A |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
223 |
OBCS_SEAICE_SPONGE_H |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
250 |
OBCS_SEAICE_SPONGE_H |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
277 |
OBCS_SEAICE_SPONGE_H |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
304 |
OBCS_SEAICE_SPONGE_H |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
380 |
OBCS_SEAICE_SPONGE_SL |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
407 |
OBCS_SEAICE_SPONGE_SL |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
434 |
OBCS_SEAICE_SPONGE_SL |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
461 |
OBCS_SEAICE_SPONGE_SL |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
537 |
OBCS_SEAICE_SPONGE_SN |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
564 |
OBCS_SEAICE_SPONGE_SN |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
591 |
OBCS_SEAICE_SPONGE_SN |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
618 |
OBCS_SEAICE_SPONGE_SN |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
66 |
OBCS_SEAICE_SPONGE_A |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/obcs/obcs_seaice_sponge.F |
93 |
OBCS_SEAICE_SPONGE_A |
lambda_obcs = SEAICE_deltaTtherm / lambda_obcs |
./pkg/seaice/SEAICE_PARAMS.h |
460 |
NO PROCEDURE |
_RL SEAICE_deltaTtherm, SEAICE_deltaTdyn, SEAICE_deltaTevp |
./pkg/seaice/SEAICE_PARAMS.h |
509 |
NO PROCEDURE |
& SEAICE_deltaTtherm, SEAICE_deltaTdyn, |
./pkg/seaice/advect.F |
66 |
ADVECT |
DELTT=SEAICE_deltaTtherm |
./pkg/seaice/seaice_advdiff.F |
241 |
SEAICE_ADVDIFF |
& HEFF(i,j,bi,bj) + SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
284 |
SEAICE_ADVDIFF |
& AREA(i,j,bi,bj) + SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
315 |
SEAICE_ADVDIFF |
& opnWtrFrac(i,j,bi,bj) + SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
351 |
SEAICE_ADVDIFF |
& HSNOW(i,j,bi,bj) + SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
394 |
SEAICE_ADVDIFF |
& HSALT(i,j,bi,bj) + SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
460 |
SEAICE_ADVDIFF |
& SItrExt(i,j,bi,bj) + SEAICE_deltaTtherm * gFld(i,j) ) |
./pkg/seaice/seaice_advdiff.F |
494 |
SEAICE_ADVDIFF |
& *HEFFM(I,J,bi,bj)/SEAICE_deltaTtherm*SEAICE_rhoIce |
./pkg/seaice/seaice_advdiff.F |
499 |
SEAICE_ADVDIFF |
& SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
530 |
SEAICE_ADVDIFF |
& SEAICE_deltaTtherm * gFld(i,j) |
./pkg/seaice/seaice_advdiff.F |
572 |
SEAICE_ADVDIFF |
I GAD_HEFF, SEAICEdiffKhHeff, SEAICE_deltaTtherm, |
./pkg/seaice/seaice_advdiff.F |
615 |
SEAICE_ADVDIFF |
I GAD_AREA, SEAICEdiffKhArea, SEAICE_deltaTtherm, |
./pkg/seaice/seaice_advdiff.F |
641 |
SEAICE_ADVDIFF |
I GAD_AREA, SEAICEdiffKhArea, SEAICE_deltaTtherm, |
./pkg/seaice/seaice_advdiff.F |
673 |
SEAICE_ADVDIFF |
I GAD_SNOW, SEAICEdiffKhSnow, SEAICE_deltaTtherm, |
./pkg/seaice/seaice_advdiff.F |
717 |
SEAICE_ADVDIFF |
I GAD_SALT, SEAICEdiffKhSalt, SEAICE_deltaTtherm, |
./pkg/seaice/seaice_advection.F |
369 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, localTij, |
./pkg/seaice/seaice_advection.F |
379 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
383 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
387 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
392 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
429 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
439 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
451 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
461 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
495 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
505 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
571 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, vTrans, vFld, localTij, |
./pkg/seaice/seaice_advection.F |
581 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, vTrans, vFld, maskLocS, localTij, |
./pkg/seaice/seaice_advection.F |
585 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, vTrans, vFld, maskLocS, localTij, |
./pkg/seaice/seaice_advection.F |
589 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, vTrans, vFld, maskLocS, localTij, |
./pkg/seaice/seaice_advection.F |
594 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, vTrans, vFld, maskLocS, localTij, |
./pkg/seaice/seaice_advection.F |
631 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
641 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
653 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
663 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
697 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
707 |
SEAICE_ADVECTION |
& -SEAICE_deltaTtherm*maskInC(i,j,bi,bj) |
./pkg/seaice/seaice_advection.F |
734 |
SEAICE_ADVECTION |
gFld(i,j)=(localTij(i,j)-iceFld(i,j))/SEAICE_deltaTtherm |
./pkg/seaice/seaice_advection.F |
740 |
SEAICE_ADVECTION |
tmpFac= SEAICE_deltaTtherm*recip_rA(i,j,bi,bj) |
./pkg/seaice/seaice_check.F |
122 |
SEAICE_CHECK |
SEAICE_mcphee_max=drF(kSurface)/SEAICE_deltaTtherm |
./pkg/seaice/seaice_do_ridging.F |
185 |
SEAICE_DO_RIDGING |
recip_DeltaT = 1. _d 0/SEAICE_deltaTtherm |
./pkg/seaice/seaice_do_ridging.F |
225 |
SEAICE_DO_RIDGING |
grossClosing(i,j) = closingRate(i,j)*SEAICE_deltaTtherm |
./pkg/seaice/seaice_do_ridging.F |
262 |
SEAICE_DO_RIDGING |
& + openingRate(i,j)*SEAICE_deltaTtherm |
./pkg/seaice/seaice_dynsolver.F |
101 |
SEAICE_DYNSOLVER |
& DIFFERENT_MULTIPLE(SEAICE_deltaTdyn,myTime,SEAICE_deltaTtherm) |
./pkg/seaice/seaice_fake.F |
76 |
SEAICE_FAKE |
& SEAICE_mcPheePiston/drF(1)*SEAICE_deltaTtherm |
./pkg/seaice/seaice_growth.F |
1045 |
SEAICE_GROWTH |
tmpscal1 =SEAICE_frazilFrac*drF(kSurface)/SEAICE_deltaTtherm |
./pkg/seaice/seaice_growth.F |
1061 |
SEAICE_GROWTH |
& * SEAICE_deltaTtherm * maskC(i,j,kSurface,bi,bj) |
./pkg/seaice/seaice_growth.F |
1111 |
SEAICE_GROWTH |
& latMeltRate(i,j,it)*SEAICE_deltaTtherm*PI / |
./pkg/seaice/seaice_growth.F |
1633 |
SEAICE_GROWTH |
tmpscal1=exp(-SEAICE_deltaTtherm/greaseDecayTime) |
./pkg/seaice/seaice_growth.F |
2134 |
SEAICE_GROWTH |
& saltFlux(I,J,bi,bj) * SEAICE_deltaTtherm |
./pkg/seaice/seaice_growth.F |
339 |
SEAICE_GROWTH |
recip_deltaTtherm = ONE / SEAICE_deltaTtherm |
./pkg/seaice/seaice_growth.F |
363 |
SEAICE_GROWTH |
convertQ2HI=SEAICE_deltaTtherm/QI |
./pkg/seaice/seaice_growth.F |
366 |
SEAICE_GROWTH |
convertPRECIP2HI=SEAICE_deltaTtherm*rhoConstFresh/SEAICE_rhoIce |
./pkg/seaice/seaice_growth.F |
945 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = SEAICE_deltaTtherm*recip_rhoIce |
./pkg/seaice/seaice_growth.F |
981 |
SEAICE_GROWTH |
a_FWbySublim(I,J) = SEAICE_deltaTtherm*recip_rhoIce |
./pkg/seaice/seaice_init_fixed.F |
92 |
SEAICE_INIT_FIXED |
& * drF(kSurface)/SEAICE_deltaTtherm |
./pkg/seaice/seaice_init_fixed.F |
97 |
SEAICE_INIT_FIXED |
& drF(kSurface)/SEAICE_deltaTtherm ) |
./pkg/seaice/seaice_readparms.F |
112 |
SEAICE_READPARMS |
& SEAICE_deltaTtherm, SEAICE_deltaTdyn, |
./pkg/seaice/seaice_readparms.F |
305 |
SEAICE_READPARMS |
SEAICE_deltaTtherm = dTtracerLev(1) |
./pkg/seaice/seaice_readparms.F |
699 |
SEAICE_READPARMS |
IF ( SEAICE_deltaTtherm .NE. dTtracerLev(1) .OR. |
./pkg/seaice/seaice_readparms.F |
700 |
SEAICE_READPARMS |
& SEAICE_deltaTdyn .LT. SEAICE_deltaTtherm .OR. |
./pkg/seaice/seaice_readparms.F |
701 |
SEAICE_READPARMS |
& (SEAICE_deltaTdyn/SEAICE_deltaTtherm) .NE. |
./pkg/seaice/seaice_readparms.F |
702 |
SEAICE_READPARMS |
& INT(SEAICE_deltaTdyn/SEAICE_deltaTtherm) ) THEN |
./pkg/seaice/seaice_readparms.F |
879 |
SEAICE_READPARMS |
SEAICE_frazilFrac = SEAICE_deltaTtherm/SEAICE_gamma_t_frz |
./pkg/seaice/seaice_readparms.F |
905 |
SEAICE_READPARMS |
SEAICE_frazilFrac = SEAICE_deltaTtherm/SEAICE_gamma_t |
./pkg/seaice/seaice_readparms.F |
920 |
SEAICE_READPARMS |
SEAICE_availHeatFrac = SEAICE_deltaTtherm/SEAICE_gamma_t |
./pkg/seaice/seaice_reg_ridge.F |
134 |
SEAICE_REG_RIDGE |
& SEAICE_deltaTtherm/SEAICE_tauAreaObsRelax |
./pkg/seaice/seaice_reg_ridge.F |
84 |
SEAICE_REG_RIDGE |
recip_deltaTtherm = ONE / SEAICE_deltaTtherm |
./pkg/seaice/seaice_solve4temp.F |
580 |
SEAICE_SOLVE4TEMP |
& FWsublim(I,J)*SEAICE_deltaTtherm/SEAICE_rhoICE |
./pkg/seaice/seaice_summary.F |
80 |
SEAICE_SUMMARY |
CALL WRITE_0D_RL( SEAICE_deltaTtherm,INDEX_NONE, |
./pkg/seaice/seaice_tracer_phys.F |
165 |
SEAICE_TRACER_PHYS |
& SItracer(i,j,bi,bj,iTr)+SEAICE_deltaTtherm |
./pkg/seaice/seaice_tracer_phys.F |
196 |
SEAICE_TRACER_PHYS |
tmpscal1=-ONE/SEAICE_deltaTtherm*SEAICE_rhoIce |
./pkg/seaice/seaice_tracer_phys.F |
208 |
SEAICE_TRACER_PHYS |
& *HEFFM(I,J,bi,bj)/SEAICE_deltaTtherm*SEAICE_rhoIce |
./pkg/seaice/seaice_tracer_phys.F |
223 |
SEAICE_TRACER_PHYS |
& *HEFFM(I,J,bi,bj)/SEAICE_deltaTtherm*SEAICE_rhoIce |