| File |
Line number |
Procedure |
Code |
|
./pkg/aim_compon_interf/atm_apply_import.F |
124 |
ATM_APPLY_IMPORT |
aimTsoce(i,j) = SSTocn(i,j,bi,bj)+celsius2K |
|
./pkg/aim_compon_interf/atm_apply_import.F |
125 |
ATM_APPLY_IMPORT |
ELSEIF ( SSTocn(i,j,bi,bj).GE. -1. _d 0) THEN |
|
./pkg/aim_compon_interf/atm_apply_import.F |
128 |
ATM_APPLY_IMPORT |
aimTsoce(i,j) = SSTocn(i,j,bi,bj)+celsius2K |
|
./pkg/aim_compon_interf/atm_apply_import.F |
84 |
ATM_APPLY_IMPORT |
tOceMxL(i,j,bi,bj) = SSTocn(i,j,bi,bj) |
|
./pkg/aim_compon_interf/ATMCPL.h |
104 |
NO PROCEDURE |
& ocMxlD, SSTocn, SSSocn, vSqocn |
|
./pkg/aim_compon_interf/ATMCPL.h |
106 |
NO PROCEDURE |
_RL SSTocn(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/aim_compon_interf/atm_import_fields.F |
42 |
ATM_IMPORT_FIELDS |
I sNx, OLx, sNy, OLy, 1, nSx, nSy, SSTocn ) |
|
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
38 |
ATM_CPL_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',1,SSTocn , 1,myThid) |
|
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
52 |
ATM_CPL_READ_PICKUP |
CALL MDSREADFIELD(fn,prec,'RL',1, SSTocn , 2,myThid) |
|
./pkg/aim_compon_interf/cpl_ini_vars.F |
61 |
CPL_INI_VARS |
SSTocn (I,J,bi,bj) = 0. |
|
./pkg/aim_compon_interf/cpl_write_pickup.F |
58 |
CPL_WRITE_PICKUP |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',1,SSTocn , 2,myIter,myThid) |