Symbol Description Uses
coordsSet can be interms of z, p or r. e.g. delZ or delP or delR for the vertical grid spacing. The following rules apply: All parameters must use the same vertical coordinate system. e.g. delZ and viscAz is legal but delZ and viscAr is an error. Similarly specifying delZ and delP is an error. zCoord..., pCoord..., rCoord... are used to flag when z, p or r are used. coordsSet counts how many vertical coordinate systems have been used to specify variables. coordsSet > 1 is an error. 18



File Line number Procedure Code
./model/src/ini_parms.F 1254 INI_PARMS
      coordsSet = 0
./model/src/ini_parms.F 1255 INI_PARMS
      IF ( zCoordInputData ) coordsSet = coordsSet + 1
./model/src/ini_parms.F 1256 INI_PARMS
      IF ( pCoordInputData ) coordsSet = coordsSet + 1
./model/src/ini_parms.F 1257 INI_PARMS
      IF ( rCoordInputData ) coordsSet = coordsSet + 1
./model/src/ini_parms.F 1258 INI_PARMS
      IF ( coordsSet .GT. 1 ) THEN
./model/src/ini_parms.F 291 INI_PARMS
      coordsSet       = 0
./model/src/ini_parms.F 638 INI_PARMS
      coordsSet = 0
./model/src/ini_parms.F 639 INI_PARMS
      IF ( zCoordInputData ) coordsSet = coordsSet + 1
./model/src/ini_parms.F 640 INI_PARMS
      IF ( pCoordInputData ) coordsSet = coordsSet + 1
./model/src/ini_parms.F 641 INI_PARMS
      IF ( rCoordInputData ) coordsSet = coordsSet + 1
./model/src/ini_parms.F 642 INI_PARMS
      IF ( coordsSet .GT. 1 ) THEN
./model/src/ini_parms.F 91 INI_PARMS
      INTEGER coordsSet