Symbol Description Uses
selectMode > 0 = find Pfld from Hfld ; < 0 = compute Hfld from Pfld 8



File Line number Procedure Code
./model/src/ini_p_ground.F 101 INI_P_GROUND
      IF (selectFindRoSurf.EQ.0 .AND. selectMode .GT. 0 ) THEN
./model/src/ini_p_ground.F 10 INI_P_GROUND
      SUBROUTINE INI_P_GROUND(selectMode,
./model/src/ini_p_ground.F 169 INI_P_GROUND
      IF ( selectFindRoSurf*selectMode .GT. 0) THEN
./model/src/ini_p_ground.F 208 INI_P_GROUND
     &        ' selectMode,i,j,bi,bj=',selectMode,i,j,bi,bj
./model/src/ini_p_ground.F 222 INI_P_GROUND
        IF (selectMode.EQ.2 .AND. integr_GeoPot.NE.1) THEN
./model/src/ini_p_ground.F 261 INI_P_GROUND
      IF (selectMode .LT. 0) THEN
./model/src/ini_p_ground.F 313 INI_P_GROUND
             IF (selectMode.EQ.-2 .AND. integr_GeoPot.NE.1) THEN
./model/src/ini_p_ground.F 39 INI_P_GROUND
      INTEGER selectMode