Symbol Description Uses
myDateSeconds seconds from beginning of year to mydate 12


File Line number Procedure Code
./pkg/exf/exf_getffieldrec.F 145 EXF_GETFFIELDREC 
       CALL CAL_TOSECONDS (difftime,myDateSeconds,myThid)
./pkg/exf/exf_getffieldrec.F 148 EXF_GETFFIELDREC 
        if ( myDateSeconds .lt. fldstartdate ) year0 = year0 - 1
./pkg/exf/exf_getffieldrec.F 156 EXF_GETFFIELDREC 
        if ( myDateSeconds .lt. fldstartdate )
./pkg/exf/exf_getffieldrec.F 157 EXF_GETFFIELDREC 
     &       myDateSeconds = myDateSeconds + secondsInYear
./pkg/exf/exf_getffieldrec.F 158 EXF_GETFFIELDREC 
        fldsectot = myDateSeconds - fldstartdate
./pkg/exf/exf_getffieldrec.F 71 EXF_GETFFIELDREC 
      _RL secondsInYear, myDateSeconds
./pkg/exf/exf_zenithangle.F 56 EXF_ZENITHANGLE 
      _RL secondsInYear, myDateSeconds
./pkg/exf/exf_zenithangle.F 82 EXF_ZENITHANGLE 
       CALL CAL_TOSECONDS (difftime,myDateSeconds,myThid)
./pkg/exf/exf_zenithangle.F 84 EXF_ZENITHANGLE 
       TYEAR=myDateSeconds/secondsInYear
./pkg/exf/exf_zenithangle.F 91 EXF_ZENITHANGLE 
       CALL CAL_TOSECONDS (difftime,myDateSeconds,myThid)
./pkg/exf/exf_zenithangle.F 93 EXF_ZENITHANGLE 
       TDAY= myDateSeconds / ( 86400 . _d 0 )