nml_real_array_key_t Derived Type

type, public, extends(nml_key_t) :: nml_real_array_key_t

Real-array key: accepts 1..size(tgt) values, fills from element 1, errors if more than size(tgt) values are given.


Inherits

type~~nml_real_array_key_t~~InheritsGraph type~nml_real_array_key_t nml_real_array_key_t type~nml_key_t nml_key_t type~nml_real_array_key_t->type~nml_key_t

Components

Type Visibility Attributes Name Initial
character(len=:), public, allocatable :: dead_reason

Unallocated/empty = live. Non-empty = this knob is registered (accepted, type/range-validated) but does NOT reach any ocean-path behaviour – e.g. &vcoord_nml zstar_stretching is captured on cfg but never copied onto ocean_state%vcoord (rdb_ocean_vcoord.F90:179,182). Carried into the JSON emitter (render_json) so a generated caller-side layer can warn on assignment instead of presenting a dead knob as live.
real(kind=rk), public, allocatable :: default(:)
character(len=:), public, allocatable :: doc

Human-readable description (FORD-style synthesis doc).
logical, public :: found = .false.

Parse-state: set true when the key is seen in the file.
character(len=:), public, allocatable :: name

Key name (matched case-insensitively).
logical, public :: required = .false.

If true, the key must appear whenever its group appears.
real(kind=rk), public, pointer :: tgt(:) => null()
character(len=:), public, allocatable :: units

Optional units string, default ‘’.

Type-Bound Procedures

procedure, public :: default_string => real_array_default_string

procedure, public :: is_default => real_array_is_default

procedure, public :: parse_tokens => real_array_parse

  • private subroutine real_array_parse(this, values, err_msg)

    Arguments

    Type IntentOptional Attributes Name
    class(nml_real_array_key_t), intent(inout) :: this
    character(len=*), intent(in) :: values(:)
    character(len=:), intent(out), allocatable :: err_msg

procedure, public :: value_string => real_array_value_string

Source Code

   type, extends(nml_key_t) :: nml_real_array_key_t
      !! Real-array key: accepts 1..size(tgt) values, fills from
      !! element 1, errors if more than size(tgt) values are given.
      real(rk), pointer :: tgt(:) => null()
      real(rk), allocatable :: default(:)
   contains
      procedure :: parse_tokens => real_array_parse
      procedure :: value_string => real_array_value_string
      procedure :: default_string => real_array_default_string
      procedure :: is_default => real_array_is_default
   end type nml_real_array_key_t