Symbol Description Uses
gm2 5


File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 1996 DELEDD 
      _RL  zth,ff,xx,taup,sscp,gp,gm1,gm2,gm3,akk,alf1,alf2,
./pkg/fizhi/fizhi_swrad.F 2021 DELEDD 
                gm2 = -(one   - sscp*(four-xx))*fourth
./pkg/fizhi/fizhi_swrad.F 2026 DELEDD 
                xx  = gm1-gm2
./pkg/fizhi/fizhi_swrad.F 2027 DELEDD 
                akk = sqrt((gm1+gm2)*xx)
./pkg/fizhi/fizhi_swrad.F 2032 DELEDD 
                alf2 = gm2 + gm3 * xx