Save into file.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(time_object), | intent(inout) | :: | self | Time object. |
||
| type(file_ini), | intent(inout) | :: | fini | Simulation parameters ini file handler. |
subroutine save_into_file(self, fini)
!< Save into file.
class(time_object), intent(inout) :: self !< Time object.
type(file_ini), intent(inout) :: fini !< Simulation parameters ini file handler.
call fini%add(section_name=INI_SECTION_NAME, option_name='is_unsteady', val=self%is_unsteady, error=self%error%status)
call fini%add(section_name=INI_SECTION_NAME, option_name='n_max', val=self%n_max, error=self%error%status)
call fini%add(section_name=INI_SECTION_NAME, option_name='t_max', val=self%t_max, error=self%error%status)
call fini%add(section_name=INI_SECTION_NAME, option_name='cfl', val=self%cfl, error=self%error%status)
endsubroutine save_into_file