Symbol Description Uses
fracl 6



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)