|
| real(kind=wp) | t |
| |
| real(kind=wp) | t_old |
| |
| real(kind=wp) | t_start |
| |
| real(kind=wp) | t_end |
| |
| real(kind=wp) | dir |
| |
| real(kind=wp) | h |
| |
| real(kind=wp) | h_old |
| |
| real(kind=wp) | h_start |
| |
| real(kind=wp) | h_average |
| |
| real(kind=wp) | tol |
| |
| integer | f_count |
| |
| integer | full_f_count |
| |
| integer | step_count |
| |
| integer | bad_step_count |
| |
| logical | at_t_start |
| |
| logical | at_t_end |
| |
| real(kind=wp), dimension(:), pointer | thresh |
| |
| real(kind=wp), dimension(:), pointer | weights |
| |
| real(kind=wp), dimension(:), pointer | ymax |
| |
| real(kind=wp), dimension(:), pointer | scratch |
| |
| real(kind=wp), dimension(:), pointer | y |
| |
| real(kind=wp), dimension(:), pointer | yp |
| |
| real(kind=wp), dimension(:), pointer | y_new |
| |
| real(kind=wp), dimension(:), pointer | y_old |
| |
| real(kind=wp), dimension(:), pointer | yp_old |
| |
| real(kind=wp), dimension(:), pointer | v0 |
| |
| real(kind=wp), dimension(:), pointer | v1 |
| |
| real(kind=wp), dimension(:), pointer | err_estimates |
| |
| real(kind=wp), dimension(:), pointer | v2 |
| |
| real(kind=wp), dimension(:), pointer | v3 |
| |
| real(kind=wp), dimension(:), pointer | vtemp |
| |
| real(kind=wp), dimension(:,:), pointer | stages |
| |
| real(kind=wp), dimension(13, 13) | a |
| |
| real(kind=wp), dimension(13) | b |
| |
| real(kind=wp), dimension(13) | c |
| |
| real(kind=wp), dimension(13) | bhat |
| |
| real(kind=wp), dimension(11, 6) | r |
| |
| real(kind=wp), dimension(7) | e |
| |
| integer, dimension(13) | ptr |
| |
| integer | no_of_stages |
| |
| integer | rk_method |
| |
| integer | intrp_degree |
| |
| logical | intrp_able |
| |
| logical | intrp_needs_stages |
| |
| real(kind=wp) | toosml |
| |
| real(kind=wp) | cost |
| |
| real(kind=wp) | safety |
| |
| real(kind=wp) | expon |
| |
| real(kind=wp) | stability_radius |
| |
| real(kind=wp) | tan_angle |
| |
| real(kind=wp) | rs |
| |
| real(kind=wp) | rs1 |
| |
| real(kind=wp) | rs2 |
| |
| real(kind=wp) | rs3 |
| |
| real(kind=wp) | rs4 |
| |
| integer | order |
| |
| integer | last_stage |
| |
| integer | max_stiff_iters |
| |
| integer | no_of_ge_steps |
| |
| logical | fsal |
| |
| real(kind=wp) | ge_max_contrib |
| |
| real(kind=wp) | t_ge_max_contrib |
| |
| integer | ge_f_count |
| |
| real(kind=wp), dimension(:), pointer | ge_assess |
| |
| real(kind=wp), dimension(:), pointer | ge_y |
| |
| real(kind=wp), dimension(:), pointer | ge_yp |
| |
| real(kind=wp), dimension(:), pointer | ge_y_new |
| |
| real(kind=wp), dimension(:), pointer | ge_err_estimates |
| |
| real(kind=wp), dimension(:,:), pointer | ge_stages |
| |
| logical | erason |
| |
| logical | erasfl |
| |
| real(kind=wp) | mcheps |
| |
| real(kind=wp) | dwarf |
| |
| real(kind=wp) | round_off |
| |
| real(kind=wp) | sqrrmc |
| |
| real(kind=wp) | cubrmc |
| |
| real(kind=wp) | sqtiny |
| |
| integer | outch |
| |
| logical | print_message |
| |
| logical | use_range |
| |
| character(len=80), dimension(10) | rec |
| |
| real(kind=wp) | tlast |
| |
| real(kind=wp) | range_t_end |
| |
| real(kind=wp), dimension(:), pointer | xstage |
| |
| real(kind=wp), dimension(:), pointer | ytemp |
| |
| real(kind=wp), dimension(:,:), pointer | p |
| |
| integer | stiff_bad_step_count |
| |
| integer | hit_t_end_count |
| |
| real(kind=wp) | errold |
| |
| logical | chkeff |
| |
| logical | phase2 |
| |
| integer, dimension(7) | save_states |
| |
| logical | stop_on_fatal |
| |
| logical | saved_fatal_err |
| |
