parse simulation information
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(toml_table), | intent(inout) | :: | table |
Input Toml table |
||
type(toml_error), | intent(out), | allocatable | :: | error |
Error message |
subroutine parse_simulation(table, error) !! parse simulation information use sim_state_mod, only : state !> Input Toml table type(toml_table), intent(inout) :: table !> Error message type(toml_error), allocatable, intent(out) :: error type(toml_table), pointer :: child call get_value(table, "simulation", child) if(associated(child))then call get_value(child, "iseed", state%iseed, 123456789) call get_value(child, "tev", state%tev, .false.) call get_value(child, "absorb", state%absorb, .false.) call get_value(child, "load_checkpoint", state%loadckpt, .false.) call get_value(child, "checkpoint_file", state%ckptfile, "check.ckpt") call get_value(child, "checkpoint_every_n", state%ckptfreq, 1000000) else call make_error(error, "Need simulation table in input param file", -1) return end if end subroutine parse_simulation