Symbol Description Uses
tsurf 3



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 138 LWRIO
       CALL STRIP (tgz,tsurf   ,im*jm,ISTRIP,1    ,NN)
./pkg/fizhi/fizhi_lwrad.F 170 LWRIO
      TZL(I,lm) = ( 2*tzl(i,lm)+tsurf(i) )/3.0  
./pkg/fizhi/fizhi_lwrad.F 213 LWRIO
      call IRRAD ( istrip,1,1,lm,ple,tzl,shzl,ozl,tsurf,co2,