| 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 |
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 |
28 |
UPDATE_OCEAN_EXPORTS |
integer i, j, bi, bj, bislot, bjslot |
|
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
74 |
UPDATE_OCEAN_EXPORTS |
bislot = exch2_txglobalo(W2_myTileList(bi))-1 |
|
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F |
77 |
UPDATE_OCEAN_EXPORTS |
bislot = myXGlobalLo-1+(bi-1)*sNx |
|
./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 |
28 |
UPDATE_OCEAN_EXPORTS |
integer i, j, bi, bj, bislot, bjslot |
|
./pkg/fizhi/update_ocean_exports.F |
337 |
GETSICE |
sice(i,j,bi,bj) = sicebc1(i+bislot,j+bjslot)*fac1 |
|
./pkg/fizhi/update_ocean_exports.F |
338 |
GETSICE |
. + sicebc2(i+bislot,j+bjslot)*fac2 |
|
./pkg/fizhi/update_ocean_exports.F |
362 |
GETSST |
. nSumx,nSumy,xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms, |
|
./pkg/fizhi/update_ocean_exports.F |
409 |
GETSST |
integer xsize,ysize,bi,bj,bislot,bjslot,nymd,nhms,mythid |
|
./pkg/fizhi/update_ocean_exports.F |
590 |
GETSST |
sst(i,j,bi,bj) = sstbc1(i+bislot,j+bjslot)*fac1 |
|
./pkg/fizhi/update_ocean_exports.F |
591 |
GETSST |
. + sstbc2(i+bislot,j+bjslot)*fac2 |
|
./pkg/fizhi/update_ocean_exports.F |
74 |
UPDATE_OCEAN_EXPORTS |
bislot = exch2_txglobalo(W2_myTileList(bi))-1 |
|
./pkg/fizhi/update_ocean_exports.F |
77 |
UPDATE_OCEAN_EXPORTS |
bislot = myXGlobalLo-1+(bi-1)*sNx |
|
./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, |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
100 |
FIZHI_INIT_VEGSURFTILES |
. tempgrid(i,j) = globalarr(i+bislot,j+bjslot,1) - 0.5 |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
110 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,3) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
122 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,4) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
134 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,5) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
146 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,6) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
158 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,7) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
170 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,8) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
44 |
FIZHI_INIT_VEGSURFTILES |
integer bislot,bjslot,iunit |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
76 |
FIZHI_INIT_VEGSURFTILES |
bislot = exch2_txglobalo(W2_myTileList(bi))-1 |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
79 |
FIZHI_INIT_VEGSURFTILES |
bislot = myXGlobalLo-1+(bi-1)*sNx |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
88 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,1) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
98 |
FIZHI_INIT_VEGSURFTILES |
tempgrid(i,j) = globalarr(i+bislot,j+bjslot,2) |