| File |
Line number |
Procedure |
Code |
|
./pkg/aim_v23/com_forcing.h |
43 |
NO PROCEDURE |
COMMON /FORDAY/ sst1, sti1, stl1, soilw1, alb1, dTsurf |
|
./pkg/aim_v23/com_forcing.h |
44 |
NO PROCEDURE |
_RL sst1 (NGP,MAX_NO_THREADS) |
|
./pkg/aim_v23/aim_surf_bc.F |
134 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
136 |
AIM_SURF_BC |
sst1(J,myThid) = MAX(sst1(J,myThid),oceTfreez) |
|
./pkg/aim_v23/aim_surf_bc.F |
137 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
138 |
AIM_SURF_BC |
& +(sti1(J,myThid)-sst1(J,myThid))/oice1(J) |
|
./pkg/aim_v23/aim_surf_bc.F |
145 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
207 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_surfTemp(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
216 |
AIM_SURF_BC |
sst1(I2,myThid) = 300. |
|
./pkg/aim_v23/aim_surf_bc.F |
259 |
AIM_SURF_BC |
U sst1(1,mythid), oice1, |
|
./pkg/aim_v23/aim_surf_bc.F |
279 |
AIM_SURF_BC |
U sst1(1,mythid), oice1, |
|
./pkg/aim_v23/aim_surf_bc.F |
86 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sWght0*aim_sst0(i,j,bi,bj) |
|
./pkg/fizhi/update_ocean_exports.F |
41 |
UPDATE_OCEAN_EXPORTS |
_RL sst1(xsize,ysize),sst2(xsize,ysize) |
|
./pkg/fizhi/update_ocean_exports.F |
56 |
UPDATE_OCEAN_EXPORTS |
save sst1, sst2, sice1, sice2 |
|
./pkg/fizhi/update_ocean_exports.F |
82 |
UPDATE_OCEAN_EXPORTS |
. nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,sst1,sst2, |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
41 |
UPDATE_OCEAN_EXPORTS |
_RL sst1(xsize,ysize),sst2(xsize,ysize) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
56 |
UPDATE_OCEAN_EXPORTS |
save sst1, sst2, sice1, sice2 |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
82 |
UPDATE_OCEAN_EXPORTS |
. nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,sst1,sst2, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
145 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
147 |
AIM_SURF_BC |
sst1(J,myThid) = MAX(sst1(J,myThid),oceTfreez) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
148 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
149 |
AIM_SURF_BC |
& +(sti1(J,myThid)-sst1(J,myThid))/oice1(J) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
156 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
218 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_surfTemp(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
227 |
AIM_SURF_BC |
sst1(I2,myThid) = 300. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
231 |
AIM_SURF_BC |
sst1(I2,myThid) = 280. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
234 |
AIM_SURF_BC |
stl1(I2,myThid) = sst1(I2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
235 |
AIM_SURF_BC |
sti1(I2,myThid) = sst1(I2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
242 |
AIM_SURF_BC |
CALL AIM_WRITE_LOCAL('aim_SST.',suff,1,sst1(1,myThid), |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
284 |
AIM_SURF_BC |
U sst1(1,mythid), oice1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
304 |
AIM_SURF_BC |
U sst1(1,mythid), oice1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
97 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sWght0*aim_sst0(i,j,bi,bj) |