Symbol Description Uses
emt 6


File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 2119 SAGPOL 
      _RL  xx,uuu,ttt,emt,up1,um1,st1
./pkg/fizhi/fizhi_swrad.F 2124 SAGPOL 
             emt = expmn(-ttt)
./pkg/fizhi/fizhi_swrad.F 2127 SAGPOL 
             xx  = um1*emt
./pkg/fizhi/fizhi_swrad.F 2129 SAGPOL 
             rll = up1*um1*(one-emt*emt)*st1
./pkg/fizhi/fizhi_swrad.F 2130 SAGPOL 
             tll = uuu*four*emt         *st1