Symbol Description Uses
fin 7



File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 2137 SAGPOL
      function expmn(fin)
./pkg/fizhi/fizhi_swrad.F 2143 SAGPOL
      _RL  fin,expmn
./pkg/fizhi/fizhi_swrad.F 2150 SAGPOL
      if (fin .lt. expmin) fin = expmin
./pkg/fizhi/fizhi_swrad.F 2151 SAGPOL
      expmn = ((e4*fin + e3)*fin+e2)*fin+e1