| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/update_ocean_exports.F |
40 |
UPDATE_OCEAN_EXPORTS |
_RL sst1 (xySize), sst2 (xySize) |
|
./pkg/fizhi/update_ocean_exports.F |
57 |
UPDATE_OCEAN_EXPORTS |
save sst1, sst2, sice1, sice2 |
|
./pkg/fizhi/update_ocean_exports.F |
91 |
UPDATE_OCEAN_EXPORTS |
. sst1,sst2,first(bi,bj),nymd1sst(bi,bj),nymd2sst(bi,bj), |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
160 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sWght0*aim_sst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
208 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
210 |
AIM_SURF_BC |
sst1(J,myThid) = MAX(sst1(J,myThid),oceTfreez) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
211 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
212 |
AIM_SURF_BC |
& +(sti1(J,myThid)-sst1(J,myThid))/oice1(J) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
219 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
323 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
332 |
AIM_SURF_BC |
sst1(I2,myThid) = 300. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
336 |
AIM_SURF_BC |
sst1(I2,myThid) = 280. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
339 |
AIM_SURF_BC |
stl1(I2,myThid) = sst1(I2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
340 |
AIM_SURF_BC |
sti1(I2,myThid) = sst1(I2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
347 |
AIM_SURF_BC |
CALL AIM_WRITE_PHYS( 'aim_SST.', suff, 1,sst1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
389 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
425 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
40 |
UPDATE_OCEAN_EXPORTS |
_RL sst1 (xySize), sst2 (xySize) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
57 |
UPDATE_OCEAN_EXPORTS |
save sst1, sst2, sice1, sice2 |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
91 |
UPDATE_OCEAN_EXPORTS |
. sst1,sst2,first(bi,bj),nymd1sst(bi,bj),nymd2sst(bi,bj), |
|
./pkg/aim_v23/aim_surf_bc.F |
143 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sWght0*aim_sst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
191 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
193 |
AIM_SURF_BC |
sst1(J,myThid) = MAX(sst1(J,myThid),oceTfreez) |
|
./pkg/aim_v23/aim_surf_bc.F |
194 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
195 |
AIM_SURF_BC |
& +(sti1(J,myThid)-sst1(J,myThid))/oice1(J) |
|
./pkg/aim_v23/aim_surf_bc.F |
202 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
306 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
315 |
AIM_SURF_BC |
sst1(I2,myThid) = 300. |
|
./pkg/aim_v23/aim_surf_bc.F |
358 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./pkg/aim_v23/aim_surf_bc.F |
393 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./pkg/aim_v23/com_forcing.h |
47 |
NO PROCEDURE |
COMMON /FORDAY/ sst1, sti1, stl1, soilw1, alb1, dTsurf |
|
./pkg/aim_v23/com_forcing.h |
48 |
NO PROCEDURE |
_RL sst1 (NGP,MAX_NO_THREADS) |
|
./pkg/atm2d/relax_add.F |
103 |
RELAX_ADD |
sstRelax(i,j)= (wght0*sst0(i,j,1,1) + wght1*sst1(i,j,1,1)) |
|
./pkg/atm2d/relax_add.F |
46 |
RELAX_ADD |
& sst0, sst1, sss0, sss1 |
|
./pkg/atm2d/relax_add.F |
49 |
RELAX_ADD |
_RS sst1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
|
./pkg/atm2d/relax_add.F |
68 |
RELAX_ADD |
CALL READ_REC_XY_RS( thetaRelaxFile,sst1,intime1, |
|
./pkg/autodiff/autodiff_restore.F |
109 |
AUTODIFF_RESTORE |
sst1(I,J,bi,bj) = StoreDynVars2D(I,J,bi,bj,12) |
|
./pkg/autodiff/autodiff_store.F |
109 |
AUTODIFF_STORE |
StoreDynVars2D(I,J,bi,bj,12) = sst1(I,J,bi,bj) |