Symbol Description Uses
ierr1 3


File Line number Procedure Code
./pkg/fizhi/fizhi_init_veg.F 71 FIZHI_INIT_VEG 
      INTEGER ierr1,kveg
./pkg/fizhi/fizhi_init_veg.F 86 FIZHI_INIT_VEG 
     &                      iostat=ierr1)
./pkg/fizhi/fizhi_init_veg.F 87 FIZHI_INIT_VEG 
      if( ierr1.eq.0 ) then