File |
Line number |
Procedure |
Code |
./pkg/aim_compon_interf/atm_store_qshortwave.F |
52 |
ATM_STORE_QSHORTWAVE |
qShortWaveTime(bi,bj) = qShortWaveTime(bi,bj) + cplTimeFraction |
./pkg/aim_compon_interf/atm_export_qshortwave.F |
45 |
ATM_EXPORT_QSHORTWAVE |
IF ( ABS(qShortWaveTime(bi,bj) -1. _d 0).GT. 1. _d -12 |
./pkg/aim_compon_interf/atm_export_qshortwave.F |
46 |
ATM_EXPORT_QSHORTWAVE |
& .AND. qShortWaveTime(bi,bj) .NE. 0. ) THEN |
./pkg/aim_compon_interf/atm_export_qshortwave.F |
47 |
ATM_EXPORT_QSHORTWAVE |
recipAvT = 1. _d 0/qShortWaveTime(bi,bj) |
./pkg/aim_compon_interf/atm_export_qshortwave.F |
54 |
ATM_EXPORT_QSHORTWAVE |
& bi,bj,1.-qShortWaveTime(bi,bj) |
./pkg/aim_compon_interf/atm_export_qshortwave.F |
66 |
ATM_EXPORT_QSHORTWAVE |
qShortWaveTime(bi,bj) = 0. |
./pkg/aim_compon_interf/ATMCPL.h |
60 |
NO PROCEDURE |
& atmSLPrTime, HeatFluxTime, qShortWaveTime, |
./pkg/aim_compon_interf/ATMCPL.h |
83 |
NO PROCEDURE |
_RL qShortWaveTime(nSx,nSy) |