hypoxia_srm_def.h

Go to the documentation of this file.

/*
** git $id$
*************************************************** hernan g. arango ***
** copyright(c) 2002-2025 the roms group                             **
**   licensed under a mit/x style license                             **
**   see license_roms.md                                              **
************************************************************************
**                                                                    **
**  defines hypoxia simple respiration model input parameters in      **
**  output netcdf files. it is included in routine  "def_info.F".     **
**                                                                    **
************************************************************************
*/
 
!
!  Define Hypoxia Simple Respiration Model parameters.
!
      vinfo( 1)='BioIter'
      vinfo( 2)='number of iterations to achieve convergence'
      status=def_var(ng, model, ncid, varid, nf90_int,                  &
     &               1, (/0/), aval, vinfo, ncname,                     &
     &               setparaccess = .false.)
      IF (founderror(exit_flag, noerror, __line__, myfile)) RETURN
 
      vinfo( 1)='ResRate'
      vinfo( 2)='total biological respiration rate'
      vinfo( 3)='day-1'
      status=def_var(ng, model, ncid, varid, nf_type,                   &
     &               1, (/0/), aval, vinfo, ncname,                     &
     &               setparaccess = .false.)
      IF (founderror(exit_flag, noerror, __line__, myfile)) RETURN