salpha_get_sizes Subroutine

public subroutine salpha_get_sizes(nthetaout, nperiodout, nbsetout)

Uses

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
integer, intent(out) :: nthetaout
integer, intent(out) :: nperiodout
integer, intent(out) :: nbsetout

Contents

Source Code

salpha_get_sizes

Source Code

  subroutine salpha_get_sizes (nthetaout, nperiodout, nbsetout)
    use theta_grid_params, only: ntheta, nperiod
    implicit none
    integer, intent (out) :: nthetaout, nperiodout, nbsetout

    nthetaout = ntheta
    nperiodout = nperiod
    nbsetout = ntheta/2+1 ! upper bound when alpha1 model is used
  end subroutine salpha_get_sizes