File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
110 |
GETSICE |
. nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
158 |
GETSICE |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
160 |
GETSICE |
_RL sicebc1(xsize,ysize) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
161 |
GETSICE |
_RL sicebc2(xsize,ysize) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
182 |
GETSST |
. nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
230 |
GETSST |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
232 |
GETSST |
_RL sstbc1(xsize,ysize) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
233 |
GETSST |
_RL sstbc2(xsize,ysize) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
30 |
UPDATE_OCEAN_EXPORTS |
integer xsize, ysize |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
36 |
UPDATE_OCEAN_EXPORTS |
PARAMETER ( ysize = exch2_domain_nyt * sNy ) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
39 |
UPDATE_OCEAN_EXPORTS |
PARAMETER ( ysize = Ny ) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
41 |
UPDATE_OCEAN_EXPORTS |
_RL sst1(xsize,ysize),sst2(xsize,ysize) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
42 |
UPDATE_OCEAN_EXPORTS |
_RL sice1(xsize,ysize),sice2(xsize,ysize) |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
82 |
UPDATE_OCEAN_EXPORTS |
. nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,sst1,sst2, |
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
87 |
UPDATE_OCEAN_EXPORTS |
. nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,sice1,sice2, |
./pkg/fizhi/update_ocean_exports.F |
110 |
GETSICE |
. nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
./pkg/fizhi/update_ocean_exports.F |
157 |
GETSICE |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
./pkg/fizhi/update_ocean_exports.F |
159 |
GETSICE |
_RL sicebc1(xsize,ysize) |
./pkg/fizhi/update_ocean_exports.F |
160 |
GETSICE |
_RL sicebc2(xsize,ysize) |
./pkg/fizhi/update_ocean_exports.F |
220 |
GETSICE |
. recl=xsize*ysize*4) |
./pkg/fizhi/update_ocean_exports.F |
235 |
GETSICE |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
./pkg/fizhi/update_ocean_exports.F |
238 |
GETSICE |
write(6,*) 'Model Resolution: ',xsize*ysize |
./pkg/fizhi/update_ocean_exports.F |
30 |
UPDATE_OCEAN_EXPORTS |
integer xsize, ysize |
./pkg/fizhi/update_ocean_exports.F |
362 |
GETSST |
. nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
./pkg/fizhi/update_ocean_exports.F |
36 |
UPDATE_OCEAN_EXPORTS |
PARAMETER ( ysize = exch2_domain_nyt * sNy ) |
./pkg/fizhi/update_ocean_exports.F |
39 |
UPDATE_OCEAN_EXPORTS |
PARAMETER ( ysize = Ny ) |
./pkg/fizhi/update_ocean_exports.F |
409 |
GETSST |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
./pkg/fizhi/update_ocean_exports.F |
411 |
GETSST |
_RL sstbc1(xsize,ysize) |
./pkg/fizhi/update_ocean_exports.F |
412 |
GETSST |
_RL sstbc2(xsize,ysize) |
./pkg/fizhi/update_ocean_exports.F |
41 |
UPDATE_OCEAN_EXPORTS |
_RL sst1(xsize,ysize),sst2(xsize,ysize) |
./pkg/fizhi/update_ocean_exports.F |
42 |
UPDATE_OCEAN_EXPORTS |
_RL sice1(xsize,ysize),sice2(xsize,ysize) |
./pkg/fizhi/update_ocean_exports.F |
471 |
GETSST |
. recl=xsize*ysize*4) |
./pkg/fizhi/update_ocean_exports.F |
486 |
GETSST |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
./pkg/fizhi/update_ocean_exports.F |
489 |
GETSST |
write(6,*) 'Model Resolution: ',xsize*ysize |
./pkg/fizhi/update_ocean_exports.F |
82 |
UPDATE_OCEAN_EXPORTS |
. nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,sst1,sst2, |
./pkg/fizhi/update_ocean_exports.F |
87 |
UPDATE_OCEAN_EXPORTS |
. nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,sice1,sice2, |