Symbol Description Uses
ksrf loop indices 4


File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 215 EXF_BULKFORMULAE 
      INTEGER ksrf, ksrfp1
./pkg/exf/exf_bulkformulae.F 256 EXF_BULKFORMULAE 
        ksrf   = 1
./pkg/exf/exf_bulkformulae.F 288 EXF_BULKFORMULAE 
           Tsf = theta(i,j,ksrf,bi,bj) + cen2kel
./pkg/exf/exf_bulkformulae.F 291 EXF_BULKFORMULAE 
     &              *( theta(i,j,ksrf,bi,bj)-theta(i,j,ksrfp1,bi,bj) )