| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1439 |
TRBFLX |
5 dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
|
./pkg/fizhi/fizhi_turb.F |
1505 |
TRBFLX |
_RL eturb(irun),dedqa(irun),dedtc(irun) |
|
./pkg/fizhi/fizhi_turb.F |
205 |
TURBIO |
_RL eturb(istrip),dedqa(istrip),dedtc(istrip) |
|
./pkg/fizhi/fizhi_turb.F |
2586 |
TRBFLX |
eturb(i) = -1.* dthl(i) |
|
./pkg/fizhi/fizhi_turb.F |
5088 |
SEAICE |
. eturb, dedtc, |
|
./pkg/fizhi/fizhi_turb.F |
5096 |
SEAICE |
_RL eturb(nocean),dedtc(nocean),hsturb(nocean),dhsdtc(nocean) |
|
./pkg/fizhi/fizhi_turb.F |
5118 |
SEAICE |
deltg = ( swnet(i)-lwnet(i)-latent*eturb(i)-hsturb(i)+qice(i) ) |
|
./pkg/fizhi/fizhi_turb.F |
624 |
TURBIO |
eturb(i) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
650 |
TURBIO |
5 undef,dshdthg,dshdshg,dthdthg,dthdshg,eturb,dedqa,dedtc, |
|
./pkg/fizhi/fizhi_turb.F |
693 |
TURBIO |
eturb(i) = eturb(i) * pke(i,nlay+1) |
|
./pkg/fizhi/fizhi_turb.F |
792 |
TURBIO |
I eturb, dedqa, dedtc, hsturb, dhsdqa, dhsdtc, |
|
./pkg/fizhi/fizhi_turb.F |
807 |
TURBIO |
. eturb(nland+1), dedtc(nland+1), |
|
./pkg/fizhi/fizhi_turb.F |
903 |
TURBIO |
call PSTBMPIT(eturb,qdiaglsm(1,14),istrip,nchp,nchptot,1,nn) |