Symbol Description Uses
ksrf loop indices 4


File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 219 EXF_BULKFORMULAE 
      INTEGER ksrf, ksrfp1
./pkg/exf/exf_bulkformulae.F 260 EXF_BULKFORMULAE 
        ksrf   = 1
./pkg/exf/exf_bulkformulae.F 290 EXF_BULKFORMULAE 
           Tsf = theta(i,j,ksrf,bi,bj) + cen2kel
./pkg/exf/exf_bulkformulae.F 293 EXF_BULKFORMULAE 
     &              *( theta(i,j,ksrf,bi,bj)-theta(i,j,ksrfp1,bi,bj) )