File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1418 |
TRBFLX |
5 dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
1484 |
TRBFLX |
_RL eturb(irun),dedqa(irun),dedtc(irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
185 |
TURBIO |
_RL eturb(istrip),dedqa(istrip),dedtc(istrip) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
2248 |
TRBFLX |
eturb(i) = -1.* dthl(i) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4547 |
SEAICE |
. eturb, dedtc, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4555 |
SEAICE |
_RL eturb(nocean),dedtc(nocean),hsturb(nocean),dhsdtc(nocean) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
4577 |
SEAICE |
deltg = ( swnet(i)-lwnet(i)-latent*eturb(i)-hsturb(i)+qice(i) ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
596 |
TURBIO |
eturb(i) = 0. |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
646 |
TURBIO |
5 undef,dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
689 |
TURBIO |
eturb(i) = eturb(i) * pke(i,nlay+1) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
788 |
TURBIO |
I eturb, dedqa, dedtc, hsturb, dhsdqa, dhsdtc, |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
803 |
TURBIO |
. eturb(nland+1), dedtc(nland+1), |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
899 |
TURBIO |
call PSTBMPIT(eturb,qdiaglsm(1,14),istrip,nchp,nchptot,1,nn) |
./pkg/fizhi/fizhi_turb.F |
1378 |
TRBFLX |
5 dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
./pkg/fizhi/fizhi_turb.F |
1444 |
TRBFLX |
_RL eturb(irun),dedqa(irun),dedtc(irun) |
./pkg/fizhi/fizhi_turb.F |
185 |
TURBIO |
_RL eturb(istrip),dedqa(istrip),dedtc(istrip) |
./pkg/fizhi/fizhi_turb.F |
2209 |
TRBFLX |
eturb(i) = -1.* dthl(i) |
./pkg/fizhi/fizhi_turb.F |
4508 |
SEAICE |
. eturb, dedtc, |
./pkg/fizhi/fizhi_turb.F |
4516 |
SEAICE |
_RL eturb(nocean),dedtc(nocean),hsturb(nocean),dhsdtc(nocean) |
./pkg/fizhi/fizhi_turb.F |
4538 |
SEAICE |
deltg = ( swnet(i)-lwnet(i)-latent*eturb(i)-hsturb(i)+qice(i) ) |
./pkg/fizhi/fizhi_turb.F |
596 |
TURBIO |
eturb(i) = 0. |
./pkg/fizhi/fizhi_turb.F |
622 |
TURBIO |
5 undef,dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
./pkg/fizhi/fizhi_turb.F |
665 |
TURBIO |
eturb(i) = eturb(i) * pke(i,nlay+1) |
./pkg/fizhi/fizhi_turb.F |
764 |
TURBIO |
I eturb, dedqa, dedtc, hsturb, dhsdqa, dhsdtc, |
./pkg/fizhi/fizhi_turb.F |
779 |
TURBIO |
. eturb(nland+1), dedtc(nland+1), |
./pkg/fizhi/fizhi_turb.F |
875 |
TURBIO |
call PSTBMPIT(eturb,qdiaglsm(1,14),istrip,nchp,nchptot,1,nn) |