Symbol Description Uses
P5SR 3



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1460 TRBFLX
      P5SR = 0.5**0.5
./pkg/fizhi/fizhi_turb.F 1738 TRBFLX
       FCC(I,NLEV) = (1./2.) * ( 1. + ERRF( P5SR*Q1M(I,NLEV) ) )
./pkg/fizhi/fizhi_turb.F 1859 TRBFLX
        FCC(I,L) = (1./2.) * ( 1. + ERRF( P5SR*Q1M(I,L) ) )