Symbol Description Uses
fourth 10


File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1975 DELEDD 
      _RL  zero,one,two,three,four,fourth,seven,tumin
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F 1978 DELEDD 
      parameter (four=4., fourth=.25)
./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 2015 DELEDD 
                gm3 =  (two   -        zth*xx )*fourth
./pkg/fizhi/fizhi_swrad.F 1974 DELEDD 
      _RL  zero,one,two,three,four,fourth,seven,tumin
./pkg/fizhi/fizhi_swrad.F 1977 DELEDD 
      parameter (four=4., fourth=.25)
./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 2014 DELEDD 
                gm3 =  (two   -        zth*xx )*fourth