File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_earth_exports.F |
114 |
UPDATE_EARTH_EXPORTS |
call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp, |
./pkg/fizhi/update_earth_exports.F |
127 |
UPDATE_EARTH_EXPORTS |
call GETEMISS(fracl,im2,jm2,nchp,nchptot(bi,bj),nSx,nSy,bi,bj, |
./pkg/fizhi/update_earth_exports.F |
145 |
UPDATE_EARTH_EXPORTS |
& nchp,nchptot(bi,bj),fracl,tmpij,im2,jm2) |
./pkg/fizhi/update_earth_exports.F |
149 |
UPDATE_EARTH_EXPORTS |
if(fracl(i,j).lt.0.3.and.sice(i,j,bi,bj).eq.0.0) |
./pkg/fizhi/update_earth_exports.F |
48 |
UPDATE_EARTH_EXPORTS |
_RL fraci(sNx,sNy), fracl(sNx,sNy) |
./pkg/fizhi/update_earth_exports.F |
83 |
UPDATE_EARTH_EXPORTS |
& fracl) |