| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_init_fixed.F |
100 |
FIZHI_INIT_FIXED |
print *,' xsize is ',xsize |
|
./pkg/fizhi/fizhi_init_fixed.F |
143 |
FIZHI_INIT_FIXED |
if(xsize.eq.192) then |
|
./pkg/fizhi/fizhi_init_fixed.F |
145 |
FIZHI_INIT_FIXED |
elseif(xsize.eq.612) then |
|
./pkg/fizhi/fizhi_init_fixed.F |
148 |
FIZHI_INIT_FIXED |
print *,' xsize is ',xsize |
|
./pkg/fizhi/fizhi_init_fixed.F |
53 |
FIZHI_INIT_FIXED |
INTEGER xsize, ysize |
|
./pkg/fizhi/fizhi_init_fixed.F |
56 |
FIZHI_INIT_FIXED |
xsize = exch2_global_Nx |
|
./pkg/fizhi/fizhi_init_fixed.F |
59 |
FIZHI_INIT_FIXED |
xsize = Nx |
|
./pkg/fizhi/fizhi_init_fixed.F |
95 |
FIZHI_INIT_FIXED |
if(xsize.eq.192) then |
|
./pkg/fizhi/fizhi_init_fixed.F |
97 |
FIZHI_INIT_FIXED |
elseif(xsize.eq.612) then |
|
./pkg/fizhi/fizhi_init_vars.F |
248 |
FIZHI_INIT_VARS |
call FIZHI_INIT_VEGSURFTILES( globalArr, xsize, ysize, |
|
./pkg/fizhi/fizhi_init_vars.F |
62 |
FIZHI_INIT_VARS |
INTEGER xsize, ysize |
|
./pkg/fizhi/fizhi_init_vars.F |
67 |
FIZHI_INIT_VARS |
xsize = exch2_global_Nx |
|
./pkg/fizhi/fizhi_init_vars.F |
70 |
FIZHI_INIT_VARS |
xsize = Nx |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
33 |
FIZHI_INIT_VEGSURFTILES |
integer xsize, ysize |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
34 |
FIZHI_INIT_VEGSURFTILES |
Real*8 globalArr(xsize,ysize,8) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
55 |
FIZHI_INIT_VEGSURFTILES |
if(xsize.eq.192) then |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
58 |
FIZHI_INIT_VEGSURFTILES |
elseif(xsize.eq.612) then |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
62 |
FIZHI_INIT_VEGSURFTILES |
print *,' xsize is ',xsize |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
9 |
FIZHI_INIT_VEGSURFTILES |
subroutine FIZHI_INIT_VEGSURFTILES(globalArr,xsize,ysize, |
|
./pkg/fizhi/update_ocean_exports.F |
118 |
GETSICE |
. jm1,jm2,nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./pkg/fizhi/update_ocean_exports.F |
165 |
GETSICE |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
|
./pkg/fizhi/update_ocean_exports.F |
168 |
GETSICE |
_RL sicebc1(xsize,ysize) |
|
./pkg/fizhi/update_ocean_exports.F |
169 |
GETSICE |
_RL sicebc2(xsize,ysize) |
|
./pkg/fizhi/update_ocean_exports.F |
207 |
GETSICE |
if(xsize.eq.192)sicedata='sice19232.weekly.clim' |
|
./pkg/fizhi/update_ocean_exports.F |
208 |
GETSICE |
if(xsize.eq.612)sicedata='sice612102.weekly.clim' |
|
./pkg/fizhi/update_ocean_exports.F |
210 |
GETSICE |
if(xsize.eq.192) |
|
./pkg/fizhi/update_ocean_exports.F |
212 |
GETSICE |
if(xsize.eq.612) |
|
./pkg/fizhi/update_ocean_exports.F |
237 |
GETSICE |
. recl=xsize*ysize*4) |
|
./pkg/fizhi/update_ocean_exports.F |
252 |
GETSICE |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
|
./pkg/fizhi/update_ocean_exports.F |
255 |
GETSICE |
write(6,*) 'Model Resolution: ',xsize*ysize |
|
./pkg/fizhi/update_ocean_exports.F |
36 |
UPDATE_OCEAN_EXPORTS |
integer xsize, ysize |
|
./pkg/fizhi/update_ocean_exports.F |
379 |
GETSST |
. jm1,jm2,nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./pkg/fizhi/update_ocean_exports.F |
426 |
GETSST |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
|
./pkg/fizhi/update_ocean_exports.F |
429 |
GETSST |
_RL sstbc1(xsize,ysize) |
|
./pkg/fizhi/update_ocean_exports.F |
430 |
GETSST |
_RL sstbc2(xsize,ysize) |
|
./pkg/fizhi/update_ocean_exports.F |
468 |
GETSST |
if(xsize.eq.192)sstdata='sst19232.weekly.clim' |
|
./pkg/fizhi/update_ocean_exports.F |
469 |
GETSST |
if(xsize.eq.612)sstdata='sst612102.weekly.clim' |
|
./pkg/fizhi/update_ocean_exports.F |
471 |
GETSST |
if(xsize.eq.192) |
|
./pkg/fizhi/update_ocean_exports.F |
473 |
GETSST |
if(xsize.eq.612) |
|
./pkg/fizhi/update_ocean_exports.F |
497 |
GETSST |
. recl=xsize*ysize*4) |
|
./pkg/fizhi/update_ocean_exports.F |
512 |
GETSST |
if(.not.error.and.imbc*jmbc.ne.xsize*ysize)then |
|
./pkg/fizhi/update_ocean_exports.F |
515 |
GETSST |
write(6,*) 'Model Resolution: ',xsize*ysize |
|
./pkg/fizhi/update_ocean_exports.F |
62 |
UPDATE_OCEAN_EXPORTS |
xsize = exch2_global_Nx |
|
./pkg/fizhi/update_ocean_exports.F |
65 |
UPDATE_OCEAN_EXPORTS |
xsize = Nx |
|
./pkg/fizhi/update_ocean_exports.F |
90 |
UPDATE_OCEAN_EXPORTS |
. jm1,jm2,nSx,nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./pkg/fizhi/update_ocean_exports.F |
95 |
UPDATE_OCEAN_EXPORTS |
. jm1,jm2,nSx,nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
30 |
FIZHI_INIT_VEGSURFTILES |
integer xsize, ysize |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
31 |
FIZHI_INIT_VEGSURFTILES |
Real*8 globalArr(xsize,ysize,8) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
9 |
FIZHI_INIT_VEGSURFTILES |
subroutine FIZHI_INIT_VEGSURFTILES(globalArr,xsize,ysize, |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
118 |
GETSICE |
. jm1,jm2,nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
166 |
GETSICE |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
168 |
GETSICE |
_RL sicebc1(xsize,ysize) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
169 |
GETSICE |
_RL sicebc2(xsize,ysize) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
191 |
GETSST |
. jm1,jm2,nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
239 |
GETSST |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
241 |
GETSST |
_RL sstbc1(xsize,ysize) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
242 |
GETSST |
_RL sstbc2(xsize,ysize) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
36 |
UPDATE_OCEAN_EXPORTS |
integer xsize, ysize |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
62 |
UPDATE_OCEAN_EXPORTS |
xsize = exch2_global_Nx |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
65 |
UPDATE_OCEAN_EXPORTS |
xsize = Nx |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
90 |
UPDATE_OCEAN_EXPORTS |
. jm1,jm2,nSx,nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
95 |
UPDATE_OCEAN_EXPORTS |
. jm1,jm2,nSx,nSy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |