Symbol Description Uses
count0 record number for forcing field preceding myTime 105


File Line number Procedure Code
./pkg/exf/exf_getffieldrec.F 107 EXF_GETFFIELDREC 
        count0  = 1
./pkg/exf/exf_getffieldrec.F 108 EXF_GETFFIELDREC 
        count1  = count0
./pkg/exf/exf_getffieldrec.F 133 EXF_GETFFIELDREC 
          count0       = INT((fldsectot+0.5)/fldPeriod) + 1
./pkg/exf/exf_getffieldrec.F 134 EXF_GETFFIELDREC 
          count1       = count0 + 1
./pkg/exf/exf_getffieldrec.F 13 EXF_GETFFIELDREC 
     O               count0, count1, year0, year1,
./pkg/exf/exf_getffieldrec.F 144 EXF_GETFFIELDREC 
          count0       = INT((fldsecs0+0.5)/fldPeriod) + 1
./pkg/exf/exf_getffieldrec.F 179 EXF_GETFFIELDREC 
         count0    = INT((fldsectot+0.5)/fldPeriod) + 1
./pkg/exf/exf_getffieldrec.F 183 EXF_GETFFIELDREC 
         count1 = count0 + 1
./pkg/exf/exf_getffieldrec.F 184 EXF_GETFFIELDREC 
         if ( (fldStartTime+count0*fldPeriod) .ge. secondsInYear ) then
./pkg/exf/exf_getffieldrec.F 193 EXF_GETFFIELDREC 
     &       fac = 1. - fldsecs/(secondsInYear-(count0-1)*fldPeriod)
./pkg/exf/exf_getffieldrec.F 219 EXF_GETFFIELDREC 
        count0  = 1
./pkg/exf/exf_getffieldrec.F 233 EXF_GETFFIELDREC 
        count0  = intime0
./pkg/exf/exf_getffieldrec.F 63 EXF_GETFFIELDREC 
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_fld.F 103 EXF_SET_FLD 
      INTEGER count0, count1
./pkg/exf/exf_set_fld.F 134 EXF_SET_FLD 
     O           count0, count1,
./pkg/exf/exf_set_fld.F 150 EXF_SET_FLD 
     O           count0, count1, year0, year1,
./pkg/exf/exf_set_fld.F 157 EXF_SET_FLD 
     &       '  myIter, count0, count1:', myIter, count0, count1
./pkg/exf/exf_set_fld.F 178 EXF_SET_FLD 
     &          ', loading rec=', count0
./pkg/exf/exf_set_fld.F 197 EXF_SET_FLD 
     I             count0, fld_xout, fld_yout,
./pkg/exf/exf_set_fld.F 203 EXF_SET_FLD 
     &                             fld1, count0, myIter, myThid )
./pkg/exf/exf_set_fld.F 212 EXF_SET_FLD 
             IF ( count0.NE.1 )
./pkg/exf/exf_set_fld.F 214 EXF_SET_FLD 
             CALL WRITE_REC_XY_RL( out_file,fld1,count0,myIter,myThid )
./pkg/exf/exf_set_obcs.F 128 EXF_SET_OBCS_YZ 
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 163 EXF_SET_OBCS_YZ 
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 191 EXF_SET_OBCS_YZ 
     &                           obcs_yz_1, count0, myIter, myThid )
./pkg/exf/exf_set_obcs.F 19 EXF_SET_OBCS_XZ 
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 235 EXF_SET_OBCS_X 
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 270 EXF_SET_OBCS_X 
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 298 EXF_SET_OBCS_X 
     &                           obcs_x_1, count0, myIter, myThid )
./pkg/exf/exf_set_obcs.F 337 EXF_SET_OBCS_Y 
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 371 EXF_SET_OBCS_Y 
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 399 EXF_SET_OBCS_Y 
     &                           obcs_y_1, count0, myIter, myThid )
./pkg/exf/exf_set_obcs.F 56 EXF_SET_OBCS_XZ 
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 84 EXF_SET_OBCS_XZ 
     &                           obcs_xz_1, count0, myIter, myThid )
./pkg/exf/exf_set_uv.F 122 EXF_SET_UV 
      INTEGER count0, count1
./pkg/exf/exf_set_uv.F 156 EXF_SET_UV 
     O             count0, count1,
./pkg/exf/exf_set_uv.F 172 EXF_SET_UV 
     O             count0, count1, year0, year1,
./pkg/exf/exf_set_uv.F 178 EXF_SET_UV 
     &       ' myIter, count0, count1:', myIter, count0, count1
./pkg/exf/exf_set_uv.F 209 EXF_SET_UV 
     &      'loading rec=', count0, ' from file: "', uVecFile0(1:j), '"'
./pkg/exf/exf_set_uv.F 214 EXF_SET_UV 
     &      'loading rec=', count0, ' from file: "', vVecFile0(1:j), '"'
./pkg/exf/exf_set_uv.F 223 EXF_SET_UV 
     I             uVecFile0, vVecFile0, exf_iprec, count0,
./pkg/exf/exf_set_uv.F 242 EXF_SET_UV 
     I             count0, xC, yC,
./pkg/exf/exf_set_uv.F 253 EXF_SET_UV 
     I             count0, xC, yC,
./pkg/exf/exf_set_uv.F 266 EXF_SET_UV 
           IF ( count0.NE.1 )
./pkg/exf/exf_set_uv.F 268 EXF_SET_UV 
           CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,count0,myIter,myThid)
./pkg/exf/exf_set_uv.F 271 EXF_SET_UV 
           IF ( count0.NE.1 )
./pkg/exf/exf_set_uv.F 273 EXF_SET_UV 
           CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,count0,myIter,myThid)
./pkg/obcs/obcs_exf_load.F 279 OBCS_EXF_READ_XZ 
      INTEGER count0, count1
./pkg/obcs/obcs_exf_load.F 293 OBCS_EXF_READ_XZ 
     O              count0, count1,
./pkg/obcs/obcs_exf_load.F 309 OBCS_EXF_READ_XZ 
     O              count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 319 OBCS_EXF_READ_XZ 
     &     ' myIter, count0, count1:', myIter, count0, count1
./pkg/obcs/obcs_exf_load.F 331 OBCS_EXF_READ_XZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 335 OBCS_EXF_READ_XZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 339 OBCS_EXF_READ_XZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 343 OBCS_EXF_READ_XZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 348 OBCS_EXF_READ_XZ 
     I                       obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 359 OBCS_EXF_READ_XZ 
     I                        obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 373 OBCS_EXF_READ_XZ 
     O              count0, count1,
./pkg/obcs/obcs_exf_load.F 389 OBCS_EXF_READ_XZ 
     O              count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 399 OBCS_EXF_READ_XZ 
     &     ' myIter, count0, count1:', myIter, count0, count1
./pkg/obcs/obcs_exf_load.F 411 OBCS_EXF_READ_XZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 415 OBCS_EXF_READ_XZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 419 OBCS_EXF_READ_XZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 423 OBCS_EXF_READ_XZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 427 OBCS_EXF_READ_XZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 431 OBCS_EXF_READ_XZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 554 OBCS_EXF_READ_YZ 
      INTEGER count0, count1
./pkg/obcs/obcs_exf_load.F 568 OBCS_EXF_READ_YZ 
     O              count0, count1,
./pkg/obcs/obcs_exf_load.F 584 OBCS_EXF_READ_YZ 
     O              count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 594 OBCS_EXF_READ_YZ 
     &     ' myIter, count0, count1:', myIter, count0, count1
./pkg/obcs/obcs_exf_load.F 606 OBCS_EXF_READ_YZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 610 OBCS_EXF_READ_YZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 614 OBCS_EXF_READ_YZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 618 OBCS_EXF_READ_YZ 
     I                      obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 623 OBCS_EXF_READ_YZ 
     I                       obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 634 OBCS_EXF_READ_YZ 
     I                        obcsPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 648 OBCS_EXF_READ_YZ 
     O              count0, count1,
./pkg/obcs/obcs_exf_load.F 664 OBCS_EXF_READ_YZ 
     O              count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 674 OBCS_EXF_READ_YZ 
     &     ' myIter, count0, count1:', myIter, count0, count1
./pkg/obcs/obcs_exf_load.F 686 OBCS_EXF_READ_YZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 690 OBCS_EXF_READ_YZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 694 OBCS_EXF_READ_YZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 698 OBCS_EXF_READ_YZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 702 OBCS_EXF_READ_YZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/obcs/obcs_exf_load.F 706 OBCS_EXF_READ_YZ 
     I                       siobPeriod, count0, count1, year0, year1,
./pkg/cal/cal_getmonthsrec.F 135 CAL_GETMONTHSREC 
        count0    = mod(present+nmonthyear-2,nmonthyear)+1
./pkg/cal/cal_getmonthsrec.F 136 CAL_GETMONTHSREC 
        prevcount = count0
./pkg/cal/cal_getmonthsrec.F 162 CAL_GETMONTHSREC 
        count0 = present
./pkg/cal/cal_getmonthsrec.F 196 CAL_GETMONTHSREC 
      if ( (.not. first) .and. (prevcount .ne. count0) ) then
./pkg/cal/cal_getmonthsrec.F 43 CAL_GETMONTHSREC 
      integer count0
./pkg/cal/cal_getmonthsrec.F 8 CAL_GETMONTHSREC 
     O                             count0, count1,
./pkg/ctrl/ctrl_get_gen_rec.F 115 CTRL_GET_GEN_REC 
     O      count0, count1,
./pkg/ctrl/ctrl_get_gen_rec.F 125 CTRL_GET_GEN_REC 
       count0  = 1
./pkg/ctrl/ctrl_get_gen_rec.F 126 CTRL_GET_GEN_REC 
       count1  = count0
./pkg/ctrl/ctrl_get_gen_rec.F 12 CTRL_GET_GEN_REC 
     O                        count0,
./pkg/ctrl/ctrl_get_gen_rec.F 170 CTRL_GET_GEN_REC 
       count0 = fldcount - startrec + 1
./pkg/ctrl/ctrl_get_gen_rec.F 197 CTRL_GET_GEN_REC 
       count0  = 1
./pkg/ctrl/ctrl_get_gen_rec.F 204 CTRL_GET_GEN_REC 
     O                   countP, count0, count1, tmpFac, fac,
./pkg/ctrl/ctrl_get_gen_rec.F 208 CTRL_GET_GEN_REC 
       IF ( count0.NE.countP ) THEN
./pkg/ctrl/ctrl_get_gen_rec.F 232 CTRL_GET_GEN_REC 
     &                               count0, count1
./pkg/ctrl/ctrl_get_gen_rec.F 50 CTRL_GET_GEN_REC 
      integer count0
./pkg/ctrl/ctrl_getrec.F 11 CTRL_GETREC 
     O                        count0,
./pkg/ctrl/ctrl_getrec.F 357 CTRL_GETREC 
      count0 = fldcount
./pkg/ctrl/ctrl_getrec.F 388 CTRL_GETREC 
     &                               count0, count1
./pkg/ctrl/ctrl_getrec.F 58 CTRL_GETREC 
      integer count0