Symbol Description Uses
fac 175



File Line number Procedure Code
./pkg/admtlm/admtlm_upxx.F 67 ADMTLM_UPXX
      _RL     fac
./pkg/admtlm/admtlm_upxx.F 92 ADMTLM_UPXX
        fac = 1. _d 0
./pkg/admtlm/admtlm_upxx.F 94 ADMTLM_UPXX
        fac = 0. _d 0
./pkg/ctrl/ctrl_map_ini.F 112 CTRL_MAP_INI
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 144 CTRL_MAP_INI
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 169 CTRL_MAP_INI
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 279 CTRL_MAP_INI
     &                                - fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 307 CTRL_MAP_INI
     &                                  *fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini.F 61 CTRL_MAP_INI
      _RL     fac
./pkg/ctrl/ctrl_map_ini.F 86 CTRL_MAP_INI
        fac = 1. _d 0
./pkg/ctrl/ctrl_map_ini.F 88 CTRL_MAP_INI
        fac = 0. _d 0
./pkg/ctrl/ctrl_getrec.F 245 CTRL_GETREC
      fac = 1. - fldsecs/fldperiod
./pkg/ctrl/ctrl_getrec.F 260 CTRL_GETREC
     &                          first, changed, fac
./pkg/ctrl/ctrl_getrec.F 56 CTRL_GETREC
      _RL     fac
./pkg/ctrl/ctrl_getrec.F 9 CTRL_GETREC
     O                        fac,
./pkg/ctrl/ctrl_get_gen_rec.F 10 CTRL_GET_GEN_REC
     O                        fac,
./pkg/ctrl/ctrl_get_gen_rec.F 145 CTRL_GET_GEN_REC
      fac = 1. - fldsecs/fldperiod
./pkg/ctrl/ctrl_get_gen_rec.F 155 CTRL_GET_GEN_REC
     &                          first, changed, fac
./pkg/ctrl/ctrl_get_gen_rec.F 48 CTRL_GET_GEN_REC
      _RL     fac
./pkg/ctrl/ctrl_map_ini_ecco.F 152 CTRL_MAP_INI_ECCO
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini_ecco.F 214 CTRL_MAP_INI_ECCO
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_map_ini_ecco.F 57 CTRL_MAP_INI_ECCO
      _RL     fac
./pkg/ctrl/ctrl_map_ini_ecco.F 97 CTRL_MAP_INI_ECCO
      fac = 1. _d 0
./pkg/ctrl/ctrl_hfacc_ini.F 130 CTRL_HFACC_INI
     &                               fac*tmpfld3d(i,j,k,bi,bj)
./pkg/ctrl/ctrl_hfacc_ini.F 147 CTRL_HFACC_INI
     &                                  + fac*tmpfld2d(i,j,bi,bj)
./pkg/ctrl/ctrl_hfacc_ini.F 53 CTRL_HFACC_INI
      _RL     fac
./pkg/ctrl/ctrl_hfacc_ini.F 77 CTRL_HFACC_INI
        fac = 1. _d 0
./pkg/ctrl/ctrl_hfacc_ini.F 79 CTRL_HFACC_INI
        fac = 0. _d 0
./model/src/swfrac.F 64 SWFRAC
      _RL     fac
./pkg/exf/exf_set_climsss.F 139 EXF_SET_CLIMSSS
     &                                fac * climsss0(i,j,bi,bj) +
./pkg/exf/exf_set_climsss.F 140 EXF_SET_CLIMSSS
     &                    (exf_one - fac) * climsss1(i,j,bi,bj) )
./pkg/exf/exf_set_climsss.F 54 EXF_SET_CLIMSSS
      _RL     fac
./pkg/exf/exf_set_climsss.F 67 EXF_SET_CLIMSSS
     O           fac, first, changed,
./pkg/exf/exf_set_climsss.F 79 EXF_SET_CLIMSSS
     O           , fac, first, changed
./pkg/exf/exf_set_climsalt.F 123 EXF_SET_CLIMSALT
     &                       fac * climsalt0(i,j,k,bi,bj) +
./pkg/exf/exf_set_climsalt.F 124 EXF_SET_CLIMSALT
     &                       (exf_one - fac) * climsalt1(i,j,k,bi,bj)
./pkg/exf/exf_set_climsalt.F 54 EXF_SET_CLIMSALT
      _RL     fac
./pkg/exf/exf_set_climsalt.F 69 EXF_SET_CLIMSALT
     O           fac, first, changed,
./pkg/exf/exf_set_climsalt.F 81 EXF_SET_CLIMSALT
     O           , fac, first, changed
./pkg/exf/exf_set_gen.F 192 EXF_SET_GEN
     &                                fac * gen0(i,j,bi,bj) +
./pkg/exf/exf_set_gen.F 193 EXF_SET_GEN
     &                    (exf_one - fac) * gen1(i,j,bi,bj) )
./pkg/exf/exf_set_gen.F 76 EXF_SET_GEN
      _RL     fac
./pkg/exf/exf_set_gen.F 98 EXF_SET_GEN
     O        , fac, first, changed
./pkg/exf/exf_getffieldrec.F 10 EXF_GETFFIELDREC
     O                             fac,
./pkg/exf/exf_getffieldrec.F 170 EXF_GETFFIELDREC
      fac = 1. - fldsecs/fldperiod
./pkg/exf/exf_getffieldrec.F 309 EXF_GETFFIELDREC
     &                         first, changed, fac
./pkg/exf/exf_getffieldrec.F 65 EXF_GETFFIELDREC
      _RL     fac
./pkg/exf/exf_set_climtemp.F 129 EXF_SET_CLIMTEMP
     &                       fac * climtemp0(i,j,k,bi,bj) +
./pkg/exf/exf_set_climtemp.F 130 EXF_SET_CLIMTEMP
     &                       (exf_one - fac) * climtemp1(i,j,k,bi,bj)
./pkg/exf/exf_set_climtemp.F 54 EXF_SET_CLIMTEMP
      _RL     fac
./pkg/exf/exf_set_climtemp.F 69 EXF_SET_CLIMTEMP
     O           fac, first, changed,
./pkg/exf/exf_set_climtemp.F 81 EXF_SET_CLIMTEMP
     O           , fac, first, changed
./pkg/exf/exf_set_uv.F 114 EXF_SET_UV
     O           , fac, first, changed
./pkg/exf/exf_set_uv.F 305 EXF_SET_UV
     &                       fac * uvec0(i,j,bi,bj) +
./pkg/exf/exf_set_uv.F 306 EXF_SET_UV
     &                       (exf_one - fac) * uvec1(i,j,bi,bj) )
./pkg/exf/exf_set_uv.F 308 EXF_SET_UV
     &                       fac * vvec0(i,j,bi,bj) +
./pkg/exf/exf_set_uv.F 309 EXF_SET_UV
     &                       (exf_one - fac) * vvec1(i,j,bi,bj) )
./pkg/exf/exf_set_uv.F 89 EXF_SET_UV
      _RL     fac, x1, x2, x3, x4, y1, y2, y3, y4, dx, dy
./pkg/exf/exf_set_obcs.F 129 EXF_SET_OBCS_YZ
      _RL     fac
./pkg/exf/exf_set_obcs.F 164 EXF_SET_OBCS_YZ
     &                    fac             *obcs_yz_0(j,k,bi,bj) +
./pkg/exf/exf_set_obcs.F 165 EXF_SET_OBCS_YZ
     &                    (exf_one - fac) *obcs_yz_1(j,k,bi,bj)
./pkg/exf/exf_set_obcs.F 43 EXF_SET_OBCS_XZ
      _RL     fac
./pkg/exf/exf_set_obcs.F 6 EXF_SET_OBCS_XZ
     I     , fac, first, changed, count0, count1
./pkg/exf/exf_set_obcs.F 78 EXF_SET_OBCS_XZ
     &                    fac * obcs_xz_0(i,k,bi,bj) +
./pkg/exf/exf_set_obcs.F 79 EXF_SET_OBCS_XZ
     &                    (exf_one - fac) * obcs_xz_1(i,k,bi,bj)
./pkg/exf/exf_set_obcs.F 94 EXF_SET_OBCS_YZ
     I     , fac, first, changed, count0, count1
./pkg/exf/exf_set_climsst.F 148 EXF_SET_CLIMSST
     &                                fac * climsst0(i,j,bi,bj) +
./pkg/exf/exf_set_climsst.F 149 EXF_SET_CLIMSST
     &                    (exf_one - fac) * climsst1(i,j,bi,bj) )
./pkg/exf/exf_set_climsst.F 53 EXF_SET_CLIMSST
      _RL     fac
./pkg/exf/exf_set_climsst.F 66 EXF_SET_CLIMSST
     O           fac, first, changed,
./pkg/exf/exf_set_climsst.F 79 EXF_SET_CLIMSST
     O           , fac, first, changed