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



File Line number Procedure Code
./model/src/ini_p_ground.F 10 INI_P_GROUND
      SUBROUTINE INI_P_GROUND(selectMode, 
./model/src/ini_p_ground.F 152 INI_P_GROUND
      IF (selectFindRoSurf.EQ.0 .AND. selectMode .GT. 0 ) THEN
./model/src/ini_p_ground.F 220 INI_P_GROUND
      IF ( selectFindRoSurf*selectMode .GT. 0) THEN
./model/src/ini_p_ground.F 258 INI_P_GROUND
     &        ' selectMode,i,j,bi,bj=',selectMode,i,j,bi,bj
./model/src/ini_p_ground.F 272 INI_P_GROUND
        IF (selectMode.EQ.2 .AND. integr_GeoPot.NE.1) THEN
./model/src/ini_p_ground.F 311 INI_P_GROUND
      IF (selectMode .LT. 0) THEN
./model/src/ini_p_ground.F 357 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
./model/src/ini_p_ground.F 94 INI_P_GROUND
      IF (selectMode*selectFindRoSurf .LE. 0) THEN