Symbol Description Uses
sscp 10


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 2001 DELEDD 
                sscp= ssc*(one-ff)/xx
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2013 DELEDD 
                gm1 =  (seven - sscp*(four+xx))*fourth
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2014 DELEDD 
                gm2 = -(one   - sscp*(four-xx))*fourth
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 2052 DELEDD 
                st1 =  sscp / ((akk+gm1 + (akk-gm1)*st4) * st3)
./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 2000 DELEDD 
                sscp= ssc*(one-ff)/xx
./pkg/fizhi/fizhi_swrad.F 2012 DELEDD 
                gm1 =  (seven - sscp*(four+xx))*fourth
./pkg/fizhi/fizhi_swrad.F 2013 DELEDD 
                gm2 = -(one   - sscp*(four-xx))*fourth
./pkg/fizhi/fizhi_swrad.F 2051 DELEDD 
                st1 =  sscp / ((akk+gm1 + (akk-gm1)*st4) * st3)