nf95_constants.f90

module nf95_constants

  use nc_constants, only: NC_NOERR, NC_ENOGRP
  use type_sizes, only: EightByteReal, TwoByteInt

  implicit none

  Integer, Parameter:: Nf95_NOERR = NC_NOERR
  Integer, Parameter:: Nf95_ENOGRP = NC_ENOGRP
  integer, parameter:: nf95_global = 0
  integer, parameter:: nf95_unlimited = 0

  ! External netcdf data types:
  integer, parameter:: nf95_float = 5, nf95_double = 6, nf95_char = 2

  ! Mode flags for opening and creating a netcdf dataset:
  integer, parameter:: nf95_nowrite = 0, nf95_clobber = 0
  integer, parameter:: nf95_write = 1, nf95_noclobber = 4

  ! Implementation limits:
  integer, parameter:: nf95_max_name = 256
  integer, parameter:: nf95_max_var_dims = 1024

  ! Default fill values:
  integer, parameter:: nf95_fill_int = - 2147483647
  integer(kind =  TwoByteInt), parameter:: nf95_fill_short = -32767
  real, parameter:: nf95_fill_real = 9.9692099683868690e+36
  real(kind = EightByteReal), parameter:: nf95_fill_double &
       = 9.9692099683868690e36
  character, parameter:: nf95_fill_char = achar(0)

  private NC_NOERR, NC_ENOGRP, EightByteReal, TwoByteInt

end module nf95_constants