get_rk_schemes_as_text_options Function

public pure function get_rk_schemes_as_text_options() result(options)

Returns an array of text_option values representing the known rk schemes, mapping names to integer ids

Arguments

None

Return Value type(text_option), dimension(:), allocatable


Contents


Source Code

  pure function get_rk_schemes_as_text_options() result(options)
    use text_options, only: text_option
    implicit none
    type(text_option), dimension(:), allocatable :: options

    options = [ &
         text_option(rk_dopri%name, rk_dopri%id), &
         text_option(rk_f45%name, rk_f45%id), &
         text_option(rk_cashkarp%name, rk_cashkarp%id), &
         text_option(rk_heun%name, rk_heun%id), &
         text_option(rk_ralston%name, rk_ralston%id), &
         text_option(rk_midpoint%name, rk_midpoint%id), &
         text_option(rk_bs23%name, rk_bs23%id), &
         text_option(rk_bs45%name, rk_bs45%id), &
         text_option(rk_euler%name, rk_euler%id), &
         text_option('default', rk_heun%id) &
         ]
  end function get_rk_schemes_as_text_options