Symbol Description Uses
atan 13


File Line number Procedure Code
./pkg/fizhi/fizhi_fillnegs.F 107 TRACER_FILL 
      pi = 4.0*atan(1.0)
./pkg/fizhi/fizhi_gwdrag.F 89 GWDRAG 
      pi    = 4.0*atan(1.0)
./pkg/fizhi/fizhi_moist.F 197 MOISTIO 
      PI       = 4.*atan(1.)
./pkg/fizhi/fizhi_moist.F 513 MOISTIO 
     .      ((atan( (2.*(pcheck-pup)/(ppbl-pup)-1.) *
./pkg/fizhi/fizhi_turb.F 281 TURBIO 
       pi = 4.*atan(1.)
./model/src/calc_3d_diffusivity.F 81 CALC_3D_DIFFUSIVITY 
     &       *(atan(-(rF(k)-diffKrBL79Ho)/diffKrBL79scl)/PI+0.5 _d 0)
./model/src/calc_3d_diffusivity.F 84 CALC_3D_DIFFUSIVITY 
     &       *(atan(-(rF(k)-diffKrBLEQHo)/diffKrBLEQscl)/PI+0.5 _d 0)
./model/src/calc_diffusivity.F 67 CALC_DIFFUSIVITY 
     &      *(atan(-(rF(k)-diffKrBL79Ho)/diffKrBL79scl)/PI+0.5 _d 0)
./model/src/calc_diffusivity.F 70 CALC_DIFFUSIVITY 
     &      *(atan(-(rF(k)-diffKrBLEQHo)/diffKrBLEQscl)/PI+0.5 _d 0)
./pkg/ptracers/ptracers_calc_diff.F 66 PTRACERS_CALC_DIFF 
     &     *(atan(-(rF(k)-diffKrBL79Ho)/diffKrBL79scl)/PI+0.5 _d 0)
./pkg/ptracers/ptracers_calc_diff.F 69 PTRACERS_CALC_DIFF 
     &     *(atan(-(rF(k)-diffKrBLEQHo)/diffKrBLEQscl)/PI+0.5 _d 0)
./pkg/bulk_force/bulkf_formula_lanl.F 176 BULKF_FORMULA_LANL 
     &                     2. _d 0*atan(x) + pi*.5 _d 0)
./pkg/cheapaml/cheapaml.F 315 CHEAPAML 
     &                     2. _d 0*atan(x) + pi*.5 _d 0)