Symbol Description Uses
Rit 7



File Line number Procedure Code
./verification/dome/code/obcs_calc.F 164 OBCS_CALC
            IF (zt.GE.(Rit/(2. _d 0 -Rit))) THEN
./verification/dome/code/obcs_calc.F 167 OBCS_CALC
             IF (zt.GE.(-Rit/(2.+Rit))) THEN
./verification/dome/code/obcs_calc.F 168 OBCS_CALC
              Fz=1. _d 0/Rit*zt/(zt+1. _d 0) + 0.5 _d 0
./verification/dome/code/obcs_calc.F 46 OBCS_CALC
      _RL Width,x,Xcenter,Fz,zt,Rit
./verification/dome/code/obcs_calc.F 73 OBCS_CALC
      Rit = 1. _d 0/3. _d 0