| File |
Line number |
Procedure |
Code |
|
./model/inc/FFIELDS.h |
122 |
NO PROCEDURE |
COMMON /FFIELDS_frictionHeat/ frictionHeating |
|
./model/inc/FFIELDS.h |
123 |
NO PROCEDURE |
_RS frictionHeating(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/apply_forcing.F |
556 |
APPLY_FORCING_T |
& + frictionHeating(i,j,k,bi,bj)*tmpFac |
|
./model/src/external_forcing.F |
428 |
EXTERNAL_FORCING_T |
& + frictionHeating(i,j,k,bi,bj)*tmpFac |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
170 |
SHAP_FILT_APPLY_UV |
frictionHeating(i,j,k,bi,bj) = |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
171 |
SHAP_FILT_APPLY_UV |
& frictionHeating(i,j,k,bi,bj) |
|
./model/src/ini_ffields.F |
105 |
INI_FFIELDS |
frictionHeating(i,j,k,bi,bj) = 0. _d 0 |
|
./model/src/load_fields_driver.F |
116 |
LOAD_FIELDS_DRIVER |
frictionHeating(i,j,k,bi,bj) = 0. _d 0 |
|
./model/src/read_pickup.F |
409 |
READ_PICKUP |
CALL READ_MFLDS_LEV_RS( 'FricHeat', frictionHeating, |
|
./verification/rotating_tank/code/apply_forcing.F |
558 |
APPLY_FORCING_T |
& + frictionHeating(i,j,k,bi,bj) |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
122 |
NO PROCEDURE |
COMMON /FFIELDS_frictionHeat/ frictionHeating |
|
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h |
123 |
NO PROCEDURE |
_RS frictionHeating(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
122 |
NO PROCEDURE |
COMMON /FFIELDS_frictionHeat/ frictionHeating |
|
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h |
123 |
NO PROCEDURE |
_RS frictionHeating(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/thermodynamics.F |
364 |
THERMODYNAMICS |
CALL DIAGNOSTICS_FILL_RS( frictionHeating, 'HeatDiss', |
|
./model/src/thermodynamics.F |
373 |
THERMODYNAMICS |
frictionHeating(i,j,k,bi,bj) = 0. _d 0 |
|
./model/src/write_pickup.F |
287 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RS( fn, fp, Nr, frictionHeating, |
|
./pkg/aim_v23/aim_tendency_apply.F |
157 |
AIM_TENDENCY_APPLY_U |
frictionHeating(i,j,k,bi,bj) = frictionHeating(i,j,k,bi,bj) |
|
./pkg/aim_v23/aim_tendency_apply.F |
345 |
AIM_TENDENCY_APPLY_V |
frictionHeating(i,j,k,bi,bj) = frictionHeating(i,j,k,bi,bj) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
173 |
ATM_PHYS_TENDENCY_APPLY_V |
frictionHeating(i,j,k,bi,bj) = frictionHeating(i,j,k,bi,bj) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
85 |
ATM_PHYS_TENDENCY_APPLY_U |
frictionHeating(i,j,k,bi,bj) = frictionHeating(i,j,k,bi,bj) |