Symbol Description Uses
gm3 16


File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1989 DELEDD 
      _RL  zth,ff,xx,taup,sscp,gp,gm1,gm2,gm3,akk,alf1,alf2,
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2015 DELEDD 
                gm3 =  (two   -        zth*xx )*fourth
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2024 DELEDD 
                alf1 = gm1 - gm3 * xx
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2025 DELEDD 
                alf2 = gm2 + gm3 * xx
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2031 DELEDD 
                all1 = (gm3 - alf2 * zth    )*xx*td
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2032 DELEDD 
                bll = (one - gm3 + alf1*zth)*xx
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2038 DELEDD 
                xx  = akk * gm3
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2042 DELEDD 
                xx  = akk * (one-gm3)
./pkg/fizhi/fizhi_swrad.F 1988 DELEDD 
      _RL  zth,ff,xx,taup,sscp,gp,gm1,gm2,gm3,akk,alf1,alf2,
./pkg/fizhi/fizhi_swrad.F 2014 DELEDD 
                gm3 =  (two   -        zth*xx )*fourth
./pkg/fizhi/fizhi_swrad.F 2023 DELEDD 
                alf1 = gm1 - gm3 * xx
./pkg/fizhi/fizhi_swrad.F 2024 DELEDD 
                alf2 = gm2 + gm3 * xx
./pkg/fizhi/fizhi_swrad.F 2030 DELEDD 
                all1 = (gm3 - alf2 * zth    )*xx*td
./pkg/fizhi/fizhi_swrad.F 2031 DELEDD 
                bll = (one - gm3 + alf1*zth)*xx
./pkg/fizhi/fizhi_swrad.F 2037 DELEDD 
                xx  = akk * gm3
./pkg/fizhi/fizhi_swrad.F 2041 DELEDD 
                xx  = akk * (one-gm3)