ioc_print Subroutine

private subroutine ioc_print(self)

打印输入输出参数

Type Bound

io_configuration

Arguments

Type IntentOptional Attributes Name
class(io_configuration), intent(in) :: self

Contents

Source Code

ioc_print

Source Code

    subroutine ioc_print(self)
        class(io_configuration), intent(in) :: self

        write (lgr_obj%unit, lgr_obj%fmt) 'is_save_acceleration', self%is_save_acceleration
        write (lgr_obj%unit, lgr_obj%fmt) 'input_file', self%input_file
        write (lgr_obj%unit, lgr_obj%fmt) 'output_file', self%output_file

    end subroutine ioc_print