ice – STIM

This module provides the GOTM interface to STIM

author: Karsten Bolding

Uses

- stim_models
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Variables

ice_cover ice_model

Enumerations

Interfaces

init_ice post_init_ice do_ice clean_ice

Subroutines

init_stim_yaml post_init_stim do_stim clean_stim

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public		::	ice_cover	=	0
integer,	public		::	ice_model			select ice model to apply

Enumerations

enum, bind(c)

Enumerators

enumerator	::	SIMPLE	=	0
enumerator	::	BASAL_MELT	=	1
enumerator	::	LEBEDEV	=	2
enumerator	::	MYLAKE	=	3
enumerator	::	WINTON	=	4

Interfaces

public interface init_ice

private subroutine init_stim_yaml()

Initialize configuration via entries in a YAML-file Using the GOTM settings module

Arguments
None

public interface post_init_ice

private subroutine post_init_stim(Ta, S)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=selected_real_kind),	intent(in)			::	Ta	Air temperature [C]
real(kind=selected_real_kind),	intent(in)			::	S	Salinity [g/kg]

public interface do_ice

private subroutine do_stim(dz, dt, ustar, Tw, S, Ta, precip, Qsw, Qfluxes)

Arguments

Type

Intent

Optional

Attributes

Name

real(kind=selected_real_kind),

intent(inout)

layer thickness [m]

real(kind=selected_real_kind),

intent(inout)

time step [s]

real(kind=selected_real_kind),

intent(inout)

ustar

surface friction velocity [m/s]

real(kind=selected_real_kind),

intent(inout)

water temperature [C]

real(kind=selected_real_kind),

intent(inout)

salinity [g/kg]

real(kind=selected_real_kind),

intent(inout)

air temperature [C]

real(kind=selected_real_kind),

intent(inout)

precip

precipitation [mm?]

real(kind=selected_real_kind),

intent(inout)

Qsw

short wave radiation [W/m^2]

private subroutine Qfluxes(T, qh, qe, qb)

Arguments

Type	Intent		Name
real(kind=selected_real_kind),	intent(in)	::	T	temperature [C]
real(kind=selected_real_kind),	intent(out)	::	qh	latent heat [W/m^2]
real(kind=selected_real_kind),	intent(out)	::	qe	sensible heat [W/m^2]
real(kind=selected_real_kind),	intent(out)	::	qb	net longwave radiation [W/m^2]

public interface clean_ice

private subroutine clean_stim()

De-allocates all memory allocated via init_ice()

Arguments
None

Subroutines

private subroutine init_stim_yaml()

Initialize configuration via entries in a YAML-file Using the GOTM settings module

Arguments

None

private subroutine post_init_stim(Ta, S)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=selected_real_kind),	intent(in)			::	Ta	Air temperature [C]
real(kind=selected_real_kind),	intent(in)			::	S	Salinity [g/kg]

private subroutine do_stim(dz, dt, ustar, Tw, S, Ta, precip, Qsw, Qfluxes)

Arguments

Type

Intent

Optional

Attributes

Name

real(kind=selected_real_kind),

intent(inout)

layer thickness [m]

real(kind=selected_real_kind),

intent(inout)

time step [s]

real(kind=selected_real_kind),

intent(inout)

ustar

surface friction velocity [m/s]

real(kind=selected_real_kind),

intent(inout)

water temperature [C]

real(kind=selected_real_kind),

intent(inout)

salinity [g/kg]

real(kind=selected_real_kind),

intent(inout)

air temperature [C]

real(kind=selected_real_kind),

intent(inout)

precip

precipitation [mm?]

real(kind=selected_real_kind),

intent(inout)

Qsw

short wave radiation [W/m^2]

private subroutine Qfluxes(T, qh, qe, qb)

Arguments

Type	Intent		Name
real(kind=selected_real_kind),	intent(in)	::	T	temperature [C]
real(kind=selected_real_kind),	intent(out)	::	qh	latent heat [W/m^2]
real(kind=selected_real_kind),	intent(out)	::	qe	sensible heat [W/m^2]
real(kind=selected_real_kind),	intent(out)	::	qb	net longwave radiation [W/m^2]

private subroutine clean_stim()

De-allocates all memory allocated via init_ice()

Arguments

None

ice Module

Contents

Uses

Contents

Variables

Enumerations

enum, bind(c)

Enumerators

Interfaces

public interface init_ice

private subroutine init_stim_yaml()

Arguments

public interface post_init_ice

private subroutine post_init_stim(Ta, S)

Arguments

public interface do_ice

private subroutine do_stim(dz, dt, ustar, Tw, S, Ta, precip, Qsw, Qfluxes)

Arguments

private subroutine Qfluxes(T, qh, qe, qb)

Arguments

public interface clean_ice

private subroutine clean_stim()

Arguments

Subroutines

private subroutine init_stim_yaml()

Arguments

private subroutine post_init_stim(Ta, S)

Arguments

private subroutine do_stim(dz, dt, ustar, Tw, S, Ta, precip, Qsw, Qfluxes)

Arguments

private subroutine Qfluxes(T, qh, qe, qb)

Arguments

private subroutine clean_stim()

Arguments