| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/do_fizhi.F |
250 |
DO_FIZHI |
& albnirdf(1,1,bi,bj),emiss(1,1,1,bi,bj),alai(1,bi,bj), |
|
./pkg/fizhi/do_fizhi.F |
56 |
DO_FIZHI |
_RL fracland(im2,jm2,nSxIn,nSyIn),emiss(im2,jm2,10,nSxIn,nSyIn) |
|
./pkg/fizhi/do_fizhi.F |
9 |
DO_FIZHI |
& tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
|
./pkg/fizhi/fizhi_driver.F |
12 |
FIZHI_DRIVER |
& albvisdr,albvisdf,albnirdr,albnirdf,emiss,alai,agrn, |
|
./pkg/fizhi/fizhi_driver.F |
190 |
FIZHI_DRIVER |
& cfc11,cfc12,cfc22,methane,n2o,emiss,tgz,radlwg,st4,dst4, |
|
./pkg/fizhi/fizhi_driver.F |
83 |
FIZHI_DRIVER |
_RL albnirdf(im,jm),emiss(im,jm,10) |
|
./pkg/fizhi/fizhi_earth_coms.h |
15 |
NO PROCEDURE |
. albvisdr, albvisdf, albnirdr, albnirdf, emiss, |
|
./pkg/fizhi/fizhi_earth_coms.h |
24 |
NO PROCEDURE |
_RL emiss(sNx,sNy,10,Nsx,Nsy) |
|
./pkg/fizhi/fizhi_lwrad.F |
1038 |
IRRAD |
* +cb(2,ib))+cb(1,ib) )*emiss(i,j,ib) |
|
./pkg/fizhi/fizhi_lwrad.F |
1044 |
IRRAD |
* +3.*cb(4,ib))+2.*cb(3,ib))+cb(2,ib))*emiss(i,j,ib) |
|
./pkg/fizhi/fizhi_lwrad.F |
140 |
LWRIO |
CALL STRIP (emissivity,emiss,im*jm,ISTRIP,10,NN) |
|
./pkg/fizhi/fizhi_lwrad.F |
1670 |
IRRAD |
* flcd(i,j,np+1)*trantcr(i,j,k)*(1.-emiss(i,j,ib)) |
|
./pkg/fizhi/fizhi_lwrad.F |
1672 |
IRRAD |
* flxd(i,j,np+1)*transfc(i,j,k)*(1.-emiss(i,j,ib)) |
|
./pkg/fizhi/fizhi_lwrad.F |
214 |
LWRIO |
. n2o,methane,cfc11,cfc12,cfc22,emiss, |
|
./pkg/fizhi/fizhi_lwrad.F |
347 |
IRRAD |
* n2o,ch4,cfc11,cfc12,cfc22,emiss, |
|
./pkg/fizhi/fizhi_lwrad.F |
571 |
IRRAD |
_RL co2,n2o(np),ch4(np),cfc11,cfc12,cfc22,emiss(m,ndim,10) |
|
./pkg/fizhi/fizhi_lwrad.F |
58 |
LWRIO |
_RL emiss(istrip,10) |
|
./pkg/fizhi/fizhi_wrapper.F |
267 |
FIZHI_WRAPPER |
& tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |
|
./pkg/fizhi/update_earth_exports.F |
1000 |
GETEMISS |
_RL emiss(im,jm,10,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
1029 |
GETEMISS |
emiss(i,j,k,bi,bj) = tmpij(i,j) |
|
./pkg/fizhi/update_earth_exports.F |
128 |
UPDATE_EARTH_EXPORTS |
& igrd,ityp,chfr,snodep,ficetile,emiss) |
|
./pkg/fizhi/update_earth_exports.F |
964 |
GETEMISS |
& igrd,ityp,chfr,snowdep,fraci,emiss) |
|
./pkg/thsice/thsice_get_exf.F |
143 |
THSICE_GET_EXF |
_RL emiss |
|
./pkg/thsice/thsice_get_exf.F |
233 |
THSICE_GET_EXF |
emiss = snow_emissivity |
|
./pkg/thsice/thsice_get_exf.F |
235 |
THSICE_GET_EXF |
emiss = ice_emissivity |
|
./pkg/thsice/thsice_get_exf.F |
264 |
THSICE_GET_EXF |
flwup = emiss*stefanBoltzmann*Ts2*Ts2 |
|
./pkg/thsice/thsice_get_exf.F |
265 |
THSICE_GET_EXF |
dflwupdT = emiss*stefanBoltzmann*Ts2*Tsf * 4. _d 0 |
|
./pkg/thsice/thsice_get_exf.F |
268 |
THSICE_GET_EXF |
flwNet_dwn = emiss*lwdown(i,j,bi,bj) - flwup |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
56 |
DO_FIZHI |
_RL fracland(im2,jm2,nSxin,nSyin),emiss(im2,jm2,10,nSxin,nSyin) |
|
./verification/fizhi-gridalt-hs/code/do_fizhi.F |
9 |
DO_FIZHI |
& tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf, |