forcing Module

  1. forcing.f90
  2. forcing

For setting all time-dependent forcing fields.


Uses

  • module~~forcing~~UsesGraph module~forcing forcing module~types types module~forcing->module~types iso_fortran_env iso_fortran_env module~types->iso_fortran_env

Used by

  • module~~forcing~~UsedByGraph module~forcing forcing proc~do_single_step do_single_step proc~do_single_step->module~forcing proc~initialize_state initialize_state proc~initialize_state->module~forcing

Contents

Subroutines


Subroutines

public subroutine set_forcing(state, imode, model_datetime, tyear)

Compute forcing fields for the current date and correction terms for horizontal diffusion

Arguments

Type IntentOptional AttributesName
type(ModelState_t), intent(inout) :: state
integer, intent(in) :: imode

Mode -> 0 = initialization step, 1 = daily update
type(Datetime_t), intent(in) :: model_datetime
real(kind=p), intent(in) :: tyear

The fraction of the current year elapsed

private subroutine setgam(gamlat)

Compute reference lapse rate as a function of latitude and date

Arguments

Type IntentOptional AttributesName
real(kind=p), intent(inout) :: gamlat(il)

The reference lapse rate