| File |
Line number |
Procedure |
Code |
|
./pkg/aim_compon_interf/ATMCPL.h |
60 |
NO PROCEDURE |
& atmSLPrTime, HeatFluxTime, qShortWaveTime, |
|
./pkg/aim_compon_interf/ATMCPL.h |
82 |
NO PROCEDURE |
_RL HeatFluxTime (nSx,nSy) |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
67 |
CPL_INI_VARS |
HeatFluxTime(bi,bj) = 0. |
|
./pkg/aim_compon_interf/atm_export_heatflux.F |
45 |
ATM_EXPORT_HEATFLUX |
IF ( ABS(HeatFluxTime(bi,bj) -1. _d 0).GT. 1. _d -12 |
|
./pkg/aim_compon_interf/atm_export_heatflux.F |
46 |
ATM_EXPORT_HEATFLUX |
& .AND. HeatFluxTime(bi,bj) .NE. 0. ) THEN |
|
./pkg/aim_compon_interf/atm_export_heatflux.F |
47 |
ATM_EXPORT_HEATFLUX |
recipAvT = 1. _d 0/HeatFluxTime(bi,bj) |
|
./pkg/aim_compon_interf/atm_export_heatflux.F |
54 |
ATM_EXPORT_HEATFLUX |
& bi,bj,1.-HeatFluxTime(bi,bj) |
|
./pkg/aim_compon_interf/atm_export_heatflux.F |
66 |
ATM_EXPORT_HEATFLUX |
HeatFluxTime(bi,bj) = 0. |
|
./pkg/aim_compon_interf/atm_store_heatflux.F |
62 |
ATM_STORE_HEATFLUX |
HeatFluxTime(bi,bj) = HeatFluxTime(bi,bj) + cplTimeFraction |