Skip to content

Commit

Permalink
Changing name back to SIGMA_SHELF_ZSTAR, but increaing the amount of …
Browse files Browse the repository at this point in the history
…characters to 17, so that it works.
  • Loading branch information
sternalon committed Dec 22, 2016
1 parent a6e5eff commit 97e72e4
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/ALE/regrid_consts.F90
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ module regrid_consts
character(len=6), parameter :: REGRIDDING_ARBITRARY_STRING = "ARB" !< Arbitrary coordinates
character(len=6), parameter :: REGRIDDING_HYCOM1_STRING = "HYCOM1" !< Hycom string
character(len=6), parameter :: REGRIDDING_SLIGHT_STRING = "SLIGHT" !< Hybrid S-rho string
character(len=6), parameter :: REGRIDDING_SIGMA_SHELF_ZSTAR_STRING = "SSZ*" !< Hybrid z*/sigma (SIGMA_SHELF_ZSTAR)
character(len=17), parameter :: REGRIDDING_SIGMA_SHELF_ZSTAR_STRING = "SIGMA_SHELF_ZSTAR" !< Hybrid z*/sigma
character(len=6), parameter :: DEFAULT_COORDINATE_MODE = REGRIDDING_LAYER_STRING !< Default coordinate mode

integer, dimension(REGRIDDING_NUM_TYPES), parameter :: vertical_coords = &
Expand Down

0 comments on commit 97e72e4

Please sign in to comment.