invent_state.f90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	invent_state (flds, config)
	Invent an initial state for the QG model. More...

Function/Subroutine Documentation

invent_state()

subroutine invent_state	(	type(qg_field), intent(inout)	flds,
		type(c_ptr), intent(in)	config
	)

Invent an initial state for the QG model.

This routine invent an initial state for the QG model. It is used to initialise the "truth run". The initial state consists of a horizontally uniform wind in each layer, with a vertical shear sufficient to produce baroclinic instability. Povided the orography is non-zero and is not symmetrically place in the domain, this is sufficient to generate a non-trivial flow after a few days of integration.

Two slightly different initial states may be created (according to whether or not ctype is set to 'f').

Parameters

[in,out]	flds	Model fields
[in]	config	Configuration structure

Definition at line 22 of file invent_state.f90.

Here is the call graph for this function:

Here is the caller graph for this function: