Symbol Description Uses
P5SR 6



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1569 TRBFLX
      P5SR = 0.5**0.5
./pkg/fizhi/fizhi_turb.F 1824 TRBFLX
       FCC(I,NLEV) = (1./2.) * ( 1. + ERRF( P5SR*Q1M(I,NLEV) ) )
./pkg/fizhi/fizhi_turb.F 1934 TRBFLX
       FCC(I,1) = (1./2.) * ( 1. + ERRF( P5SR*Q1M(I,1) ) )