| File |
Line number |
Procedure |
Code |
|
./pkg/ocn_compon_interf/ocn_import_fields.F |
36 |
OCN_IMPORT_FIELDS |
O atmSLPr ) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
37 |
OCN_CPL_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',1,atmSLPr , 1,myThid) |
|
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
52 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( atmSLPr , myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
50 |
CPL_INI_VARS |
atmSLPr (I,J,bi,bj) = 0. |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
122 |
OCN_APPLY_IMPORT |
phi0surf(i,j,bi,bj) = atmSLPr(i,j,bi,bj)*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
136 |
OCN_APPLY_IMPORT |
phi0surf(i,j,bi,bj) = atmSLPr(i,j,bi,bj)*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
70 |
OCN_APPLY_IMPORT |
pLoad(i,j,bi,bj) = atmSLPr(i,j,bi,bj) |
|
./pkg/ocn_compon_interf/OCNCPL.h |
39 |
NO PROCEDURE |
& atmSLPr, HeatFlux, qShortWave, |
|
./pkg/ocn_compon_interf/OCNCPL.h |
46 |
NO PROCEDURE |
_RL atmSLPr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/ocn_compon_interf/cpl_write_pickup.F |
46 |
CPL_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',1,atmSLPr , 1,myIter,myThid) |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
44 |
OCN_CPL_DIAGS |
& + DDTT * atmSLPr(i,j,bi,bj) |
|
./pkg/aim_compon_interf/atm_export_atmslp.F |
50 |
ATM_EXPORT_ATMSLP |
atmSLPr(I,J,bi,bj) = atmSLPr(I,J,bi,bj)*recipAvT |
|
./pkg/aim_compon_interf/atm_export_atmslp.F |
61 |
ATM_EXPORT_ATMSLP |
I sNx, OLx, sNy, OLy, 1, nSx, nSy, atmSLPr ) |
|
./pkg/aim_compon_interf/atm_export_atmslp.F |
69 |
ATM_EXPORT_ATMSLP |
atmSLPr(I,J,bi,bj) = 0. |
|
./pkg/aim_compon_interf/ATMCPL.h |
54 |
NO PROCEDURE |
& atmSLPr, HeatFlux, qShortWave, |
|
./pkg/aim_compon_interf/ATMCPL.h |
66 |
NO PROCEDURE |
_RL atmSLPr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
56 |
ATM_CPL_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',1,atmSLPr , 5,myThid) |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
44 |
CPL_INI_VARS |
atmSLPr( I,J,bi,bj) = 0. |
|
./pkg/aim_compon_interf/cpl_write_pickup.F |
62 |
CPL_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',1,atmSLPr , 5,myIter,myThid) |
|
./pkg/aim_compon_interf/atm_store_atmslp.F |
54 |
ATM_STORE_ATMSLP |
atmSLPr(i,j,bi,bj) = atmSLPr(i,j,bi,bj) |