MOM6
regrid_consts::state_dependent Interface Reference

Detailed Description

Definition at line 55 of file regrid_consts.F90.

Public functions

logical function state_dependent_char (string)
 Returns true if the coordinate is dependent on the state density, returns false otherwise. More...
 
logical function state_dependent_int (mode)
 Returns true if the coordinate is dependent on the state density, returns false otherwise. More...
 

Functions and subroutines

◆ state_dependent_char()

logical function regrid_consts::state_dependent::state_dependent_char ( character(len=*), intent(in)  string)

Returns true if the coordinate is dependent on the state density, returns false otherwise.

Parameters
[in]stringString to indicate coordinate mode

Definition at line 114 of file regrid_consts.F90.

114  character(len=*), intent(in) :: string !< String to indicate coordinate mode
115 
116  state_dependent_char = state_dependent_int( coordinatemode(string) )
117 

◆ state_dependent_int()

logical function regrid_consts::state_dependent::state_dependent_int ( integer, intent(in)  mode)

Returns true if the coordinate is dependent on the state density, returns false otherwise.

Parameters
[in]modeCoordinate mode

Definition at line 122 of file regrid_consts.F90.

122  integer, intent(in) :: mode !< Coordinate mode
123  select case ( mode )
124  case (regridding_layer); state_dependent_int = .true.
125  case (regridding_zstar); state_dependent_int = .false.
126  case (regridding_sigma_shelf_zstar); state_dependent_int = .false.
127  case (regridding_rho); state_dependent_int = .true.
128  case (regridding_sigma); state_dependent_int = .false.
129  case (regridding_hycom1); state_dependent_int = .true.
130  case (regridding_slight); state_dependent_int = .true.
131  case (regridding_adaptive); state_dependent_int = .true.
132  case default ; call mom_error(fatal, "state_dependent: "//&
133  "Unrecognized choice of coordinate.")
134  end select

The documentation for this interface was generated from the following file: