Symbol Description Uses
factor 35



File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 261 ECCO_COST_WEIGHTS
        factor = 0. _d 0
./pkg/ecco/ecco_cost_weights.F 263 ECCO_COST_WEIGHTS
        factor = 1. _d 0
./pkg/ecco/ecco_cost_weights.F 70 ECCO_COST_WEIGHTS
      _RL factor
./pkg/longstep/longstep_average_3d.F 44 LONGSTEP_AVERAGE_3D
      _RL factor
./pkg/longstep/longstep_average_3d.F 49 LONGSTEP_AVERAGE_3D
        factor = lsCnt(bi,bj)
./pkg/longstep/longstep_average_3d.F 50 LONGSTEP_AVERAGE_3D
        IF (lsCnt(bi,bj).NE.0) factor = 1. _d 0 / factor
./pkg/longstep/longstep_average_3d.F 54 LONGSTEP_AVERAGE_3D
           lsFld(i,j,k,bi,bj) = lsFld(i,j,k,bi,bj)*factor
./pkg/longstep/longstep_average_3d_fac.F 46 LONGSTEP_AVERAGE_3D_FAC
      _RL factor
./pkg/longstep/longstep_average_3d_fac.F 54 LONGSTEP_AVERAGE_3D_FAC
           factor = lsCnt(bi,bj)
./pkg/longstep/longstep_average_3d_fac.F 55 LONGSTEP_AVERAGE_3D_FAC
           factor = factor*fac(i,j,k,bi,bj)
./pkg/longstep/longstep_average_3d_fac.F 56 LONGSTEP_AVERAGE_3D_FAC
           IF (factor.NE.zeroRL) factor = 1. _d 0 / factor
./pkg/longstep/longstep_average_3d_fac.F 57 LONGSTEP_AVERAGE_3D_FAC
           lsFld(i,j,k,bi,bj) = lsFld(i,j,k,bi,bj)*factor
./verification/flt_example/extra/cvprofiles.F 25 NO PROCEDURE
      integer factor(6)
./verification/flt_example/extra/cvprofiles.F 26 NO PROCEDURE
      data factor / 1.e5, 1.e4, 1.e3, 1.e2, 1.e1, 1.e0 /
./lsopt/lsline.F 70 LSLINE
      double precision    factor
./lsopt/lsline.F 71 LSLINE
      parameter( factor = 0.2 )
./pkg/diagnostics/diagnostics_utils.F 137 DIAGNOSTICS_GET_DIAG
      _RL factor
./pkg/diagnostics/diagnostics_utils.F 157 DIAGNOSTICS_GET_DIAG
          factor = FLOAT(ndiag(ip,bi,bj))
./pkg/diagnostics/diagnostics_utils.F 158 DIAGNOSTICS_GET_DIAG
          IF (ndiag(ip,bi,bj).NE.0) factor = 1. _d 0 / factor
./pkg/diagnostics/diagnostics_utils.F 164 DIAGNOSTICS_GET_DIAG
                qtmp(i,j,k) = qdiag(i,j,ipnt,bi,bj)*factor
./pkg/diagnostics/diagnostics_utils.F 173 DIAGNOSTICS_GET_DIAG
              qtmp(i,j,k) = qdiag(i,j,ipnt,bi,bj)*factor
./pkg/ecco/cost_gencost_sshv4.F 344 COST_GENCOST_SSHV4
      factor =  0.01 _d 0
./pkg/ecco/cost_gencost_sshv4.F 361 COST_GENCOST_SSHV4
                mdtob(i,j,bi,bj) = mdtob(i,j,bi,bj)*factor
./pkg/ecco/cost_gencost_sshv4.F 82 COST_GENCOST_SSHV4
      _RL spval, factor
./pkg/ecco/cost_sla_read.F 166 COST_SLA_READ
              sla_obs(i,j,bi,bj)  = sla_mask(i,j,bi,bj)*factor*
./pkg/ecco/cost_sla_read.F 56 COST_SLA_READ
      _RL factor
./pkg/ecco/cost_sla_read.F 93 COST_SLA_READ
      factor = 0.01
./pkg/ecco/cost_sla_read_yd.F 145 COST_SLA_READ_YD
              sla_obs(i,j,bi,bj)  = sla_mask(i,j,bi,bj)*factor*
./pkg/ecco/cost_sla_read_yd.F 64 COST_SLA_READ_YD
      _RL factor
./pkg/ecco/cost_sla_read_yd.F 96 COST_SLA_READ_YD
      factor = 0.01