Symbol Description Uses
IGRD 5



File Line number Procedure Code
./pkg/fizhi/fizhi_utils.F 652 GRD2MSC
      SUBROUTINE GRD2MSC(A,IM,JM,IGRD,B,MXCHPS,NCHP)
./pkg/fizhi/fizhi_utils.F 665 GRD2MSC
         B(I) = A(IGRD(I))
./pkg/fizhi/fizhi_utils.F 674 MSC2GRD
      SUBROUTINE MSC2GRD(IGRD,CHFR,B,MXCHPS,NCHP,FRACG,A,IM,JM)
./pkg/fizhi/fizhi_utils.F 697 MSC2GRD
         VT1(IGRD(I)) = VT1(IGRD(I)) + B(I)*CHFR(I)