| File |
Line number |
Procedure |
Code |
|
./pkg/icefront/icefront_thermodynamics.F |
150 |
ICEFRONT_THERMODYNAMICS |
HeatFlux(I,J) = maskC(I,J,K,bi,bj) * HeatCapacity_Cp * |
|
./pkg/icefront/icefront_thermodynamics.F |
155 |
ICEFRONT_THERMODYNAMICS |
icefront_TendT(i,j,K,bi,bj) = - HeatFlux(I,J)* eps5 |
|
./pkg/icefront/icefront_thermodynamics.F |
181 |
ICEFRONT_THERMODYNAMICS |
HeatFlux (I,J) = 0. _d 0 |
|
./pkg/icefront/icefront_thermodynamics.F |
193 |
ICEFRONT_THERMODYNAMICS |
CALL DIAGNOSTICS_FILL_RS(HeatFlux, 'ICFhtFlx', |
|
./pkg/icefront/icefront_thermodynamics.F |
66 |
ICEFRONT_THERMODYNAMICS |
_RS HeatFlux ( 1:sNx, 1:sNy ) |
|
./pkg/ocn_compon_interf/OCNCPL.h |
37 |
NO PROCEDURE |
& atmSLPr, HeatFlux, qShortWave, |
|
./pkg/ocn_compon_interf/OCNCPL.h |
43 |
NO PROCEDURE |
_RL HeatFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
52 |
CPL_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL( HeatFlux , 'CPL_Qnet', |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
71 |
CPL_INI_VARS |
HeatFlux (i,j,bi,bj) = 0. |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
101 |
OCN_APPLY_IMPORT |
Qnet(i,j,bi,bj)= HeatFlux (i,j,bi,bj) |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
62 |
OCN_CPL_DIAGS |
& + DDTT * HeatFlux(i,j,bi,bj) |
|
./pkg/ocn_compon_interf/ocn_import_fields.F |
57 |
OCN_IMPORT_FIELDS |
O HeatFlux ) |
|
./pkg/atm_compon_interf/ATMCPL.h |
36 |
NO PROCEDURE |
& atmSLPr, HeatFlux, qShortWave, |
|
./pkg/atm_compon_interf/ATMCPL.h |
41 |
NO PROCEDURE |
_RL HeatFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
142 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HeatFlux , 6, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
173 |
ATM_CPL_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'qHeatFlx', HeatFlux, |
|
./pkg/atm_compon_interf/atm_store_surfflux.F |
60 |
ATM_STORE_SURFFLUX |
HeatFlux(i,j,bi,bj) = HeatFlux(i,j,bi,bj) |
|
./pkg/atm_compon_interf/cpl_ini_vars.F |
53 |
CPL_INI_VARS |
HeatFlux (i,j,bi,bj) = 0. |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
83 |
CPL_WRITE_PICKUP |
& HeatFlux , -j, myIter, myThid ) |