Symbol Description Uses
h13 30



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 1421 IRRAD
     *                 w1,p1,dwe,dpe,h11,h12,h13,trant)
./pkg/fizhi/fizhi_lwrad.F 616 IRRAD
      _RL h11(nx,nh,nt),h12(nx,nh,nt),h13(nx,nh,nt)
./pkg/fizhi/fizhi_lwrad.F 834 IRRAD
           h13(ip,iw,it)=h13(ip,iw,1)
./pkg/fizhi/h2o-tran3.h 116 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 5, 5)/
./pkg/fizhi/h2o-tran3.h 140 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 6, 6)/
./pkg/fizhi/h2o-tran3.h 164 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 7, 7)/
./pkg/fizhi/h2o-tran3.h 188 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 8, 8)/
./pkg/fizhi/h2o-tran3.h 20 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 1, 1)/
./pkg/fizhi/h2o-tran3.h 212 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 9, 9)/
./pkg/fizhi/h2o-tran3.h 236 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=10,10)/
./pkg/fizhi/h2o-tran3.h 260 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=11,11)/
./pkg/fizhi/h2o-tran3.h 284 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=12,12)/
./pkg/fizhi/h2o-tran3.h 308 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=13,13)/
./pkg/fizhi/h2o-tran3.h 332 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=14,14)/
./pkg/fizhi/h2o-tran3.h 356 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=15,15)/
./pkg/fizhi/h2o-tran3.h 380 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=16,16)/
./pkg/fizhi/h2o-tran3.h 404 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=17,17)/
./pkg/fizhi/h2o-tran3.h 428 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=18,18)/
./pkg/fizhi/h2o-tran3.h 44 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 2, 2)/
./pkg/fizhi/h2o-tran3.h 452 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=19,19)/
./pkg/fizhi/h2o-tran3.h 476 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=20,20)/
./pkg/fizhi/h2o-tran3.h 500 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=21,21)/
./pkg/fizhi/h2o-tran3.h 524 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=22,22)/
./pkg/fizhi/h2o-tran3.h 548 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=23,23)/
./pkg/fizhi/h2o-tran3.h 572 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=24,24)/
./pkg/fizhi/h2o-tran3.h 596 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=25,25)/
./pkg/fizhi/h2o-tran3.h 620 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip=26,26)/
./pkg/fizhi/h2o-tran3.h 68 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 3, 3)/
./pkg/fizhi/h2o-tran3.h 92 NO PROCEDURE
      data ((h13(ip,iw,1),iw=1,31),ip= 4, 4)/