File |
Line number |
Procedure |
Code |
./pkg/ocn_compon_interf/ocn_import_fields.F |
71 |
OCN_IMPORT_FIELDS |
O seaIceMass ) |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
44 |
OCN_CPL_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',1,seaIceMass, 8,myThid) |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
58 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_R8( seaIceMass, myThid ) |
./pkg/ocn_compon_interf/cpl_ini_vars.F |
62 |
CPL_INI_VARS |
seaIceMass(I,J,bi,bj) = 0. |
./pkg/ocn_compon_interf/ocn_apply_import.F |
123 |
OCN_APPLY_IMPORT |
& + gravity*seaIceMass(i,j,bi,bj)*recip_rhoConst |
./pkg/ocn_compon_interf/ocn_apply_import.F |
130 |
OCN_APPLY_IMPORT |
& + gravity*seaIceMass(i,j,bi,bj)*recip_rhoConst |
./pkg/ocn_compon_interf/ocn_apply_import.F |
77 |
OCN_APPLY_IMPORT |
sIceLoad(i,j,bi,bj) = seaIceMass(i,j,bi,bj) |
./pkg/ocn_compon_interf/OCNCPL.h |
44 |
NO PROCEDURE |
& iceSaltFlx, seaIceMass |
./pkg/ocn_compon_interf/OCNCPL.h |
58 |
NO PROCEDURE |
_RL seaIceMass(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/ocn_compon_interf/cpl_write_pickup.F |
58 |
CPL_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',1,seaIceMass, 8,myIter,myThid) |
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
68 |
OCN_CPL_DIAGS |
& + DDTT * seaIceMass(i,j,bi,bj) |
./pkg/aim_compon_interf/atm_store_seaice.F |
62 |
ATM_STORE_SEAICE |
seaIceMass(i,j,bi,bj) = |
./pkg/aim_compon_interf/atm_export_seaice.F |
50 |
ATM_EXPORT_SEAICE |
seaIceMass(I,J,bi,bj) = seaIceMass(I,J,bi,bj)*recipAvT |
./pkg/aim_compon_interf/atm_export_seaice.F |
61 |
ATM_EXPORT_SEAICE |
I sNx, OLx, sNy, OLy, 1, nSx, nSy, seaIceMass ) |
./pkg/aim_compon_interf/atm_export_seaice.F |
69 |
ATM_EXPORT_SEAICE |
seaIceMass(I,J,bi,bj) = 0. |
./pkg/aim_compon_interf/ATMCPL.h |
59 |
NO PROCEDURE |
& iceSaltFlx, seaIceMass, |
./pkg/aim_compon_interf/ATMCPL.h |
80 |
NO PROCEDURE |
_RL seaIceMass(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
65 |
ATM_CPL_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',1,seaIceMass,14,myThid) |
./pkg/aim_compon_interf/cpl_ini_vars.F |
58 |
CPL_INI_VARS |
seaIceMass(I,J,bi,bj) = 0. |
./pkg/aim_compon_interf/cpl_write_pickup.F |
76 |
CPL_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',1,seaIceMass,14,myIter,myThid) |