| File |
Line number |
Procedure |
Code |
|
./model/src/update_surf_dr.F |
65 |
UPDATE_SURF_DR |
recip_hFacC(i,j,ks,bi,bj)= 1. _d 0 / hFac_surfC(i,j,bi,bj) |
|
./model/src/external_forcing.F |
283 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
308 |
EXTERNAL_FORCING_T |
& *recip_drF(klev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
400 |
EXTERNAL_FORCING_S |
& *recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/monitor/mon_ke.F |
76 |
MON_KE |
tmpVal= tmpVal*recip_hFacC(i,j,k,bi,bj)*recip_rA(i,j,bi,bj) |
|
./pkg/monitor/monitor.F |
129 |
MONITOR |
CALL MON_ADVCFLW2('_W_hf',wVel,recip_hFacC, |
|
./pkg/monitor/mon_surfcor.F |
103 |
MON_SURFCOR |
& *hFacC(i,j,Nr,bi,bj)*recip_hFacC(i,j,ks,bi,bj) |