Symbol Description Uses
const uniform default field value 8


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 249 TURBIO 
      _RL edle,rmu,cltj10,atimstp,tice,const
./pkg/fizhi/fizhi_turb.F 417 TURBIO 
      const = ( cti / hice ) * cltj10
./pkg/fizhi/fizhi_turb.F 422 TURBIO 
             qice(i) =  const*(tice-tground(i))
./pkg/fizhi/fizhi_turb.F 423 TURBIO 
            dqice(i) = -const
./pkg/gmredi/gmredi_calc_urms.F 47 GMREDI_CALC_URMS 
      _RL const( 1-Olx:sNx+Olx,1-Oly:sNy+Oly)
./pkg/gmredi/gmredi_calc_urms.F 62 GMREDI_CALC_URMS 
          const(i,j) = (urms(i,j,k)-urms(i,j,1))
./pkg/gmredi/gmredi_calc_urms.F 65 GMREDI_CALC_URMS 
          const(i,j) = zeroRL
./pkg/gmredi/gmredi_calc_urms.F 75 GMREDI_CALC_URMS 
     &          const(i,j)*(modesC(1,i,j,k,bi,bj)-modesC(1,i,j,1,bi,bj))