Symbol Description Uses
fracl 6



File Line number Procedure Code
./pkg/fizhi/update_earth_exports.F 102 UPDATE_EARTH_EXPORTS
        call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp,
./pkg/fizhi/update_earth_exports.F 114 UPDATE_EARTH_EXPORTS
        call GETEMISS(fracl,im2,jm2,nchp,nchptot(bi,bj),nSx,nSy,bi,bj,
./pkg/fizhi/update_earth_exports.F 132 UPDATE_EARTH_EXPORTS
     &                    nchp,nchptot(bi,bj),fracl,tmpij,im2,jm2)
./pkg/fizhi/update_earth_exports.F 136 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 36 UPDATE_EARTH_EXPORTS
      _RL fraci(sNx,sNy), fracl(sNx,sNy)
./pkg/fizhi/update_earth_exports.F 71 UPDATE_EARTH_EXPORTS
     &                                                            fracl)