inpout Module Reference

Input/Output module. More...

Public Member Functions
subroutine	init_param
	Initialization of the variables read from the input file. More...
subroutine	read_param
	Read the input file. More...
subroutine	read_solution
	Read the solution from the restart unit. More...
subroutine	output_solution (t)
	Write the solution on the output unit. More...
subroutine	close_units
character *4 function	lettera (k)
	Numeric to String conversion. More...
subroutine	output_dakota

Public Attributes
character(len=40)	run_name
	Name of the run. More...
character(len=40)	bak_name
	Backup file for the parameters. More...
character(len=40)	input_file
	File with the run parameters. More...
character(len=40)	output_file
	Name of the output files. More...
character(len=40)	restart_file
	Name of the restart file. More...
character(len=40)	batimetry_file
	Name of the batimetry file. More...
character(len=40)	dakota_file
	Name of the dakota file. More...
integer, parameter	input_unit = 7
	Input data unit. More...
integer, parameter	backup_unit = 8
	Backup input data unit. More...
integer, parameter	output_unit = 9
	Output data unit. More...
integer, parameter	restart_unit = 10
	Restart data unit. More...
integer, parameter	dakota_unit = 11
	Dakota data unit. More...
integer	output_idx
	Counter for the output files. More...
logical	restart
	Flag to start a run from a previous output: . More...
type(bc)	hb_bcl
type(bc)	u_bcl
type(bc)	hb_bcr
type(bc)	u_bcr

Detailed Description

Input/Output module.

This module contains all the input/output subroutine and the realted variables.

Date

07/10/2016

Author

Mattia de' Michieli Vitturi

Definition at line 13 of file inpout.f90.

Member Function/Subroutine Documentation

subroutine inpout::close_units

(

)

Definition at line 608 of file inpout.f90.

Here is the caller graph for this function:

subroutine inpout::init_param

(

)

Initialization of the variables read from the input file.

This subroutine initialize the input variables with default values that solve for a Riemann problem. If the input file does not exist one is created with the default values.

Author

Mattia de' Michieli Vitturi

Date

07/10/2016

Definition at line 105 of file inpout.f90.

Here is the caller graph for this function:

character*4 function inpout::lettera

(

integer

k

)

Numeric to String conversion.

This function convert the integer in input into a numeric string for the subfix of the output files.

Parameters

[in]

k

integer to convert

Date

07/10/2016

Author

Mattia de' Michieli Vitturi

Definition at line 628 of file inpout.f90.

Here is the caller graph for this function:

subroutine inpout::output_dakota

(

)

Definition at line 649 of file inpout.f90.

Here is the caller graph for this function:

subroutine inpout::output_solution

(

real*8, intent(in)

t

)

Write the solution on the output unit.

This subroutine write the parameters of the grid, the output time and the solution to a file with the name "run_name.q****", where run_name is the name of the run read from the input file and **** is the counter of the output.

Parameters

[in]

t

output time

Author

Mattia de' Michieli Vitturi

Date

07/10/2016

Definition at line 509 of file inpout.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine inpout::read_param

(

)

Read the input file.

This subroutine read the input parameters from the file "two_phases.inp" and write a backup file of the input parameters with name "run_name.bak", where run_name is read from the input file.

Date

07/10/2016

Author

Mattia de' Michieli Vitturi

Definition at line 239 of file inpout.f90.

Here is the caller graph for this function:

subroutine inpout::read_solution

(

)

Read the solution from the restart unit.

This subroutine is called when the parameter "restart" in the input file is TRUE. Then the initial solution is read from a file.

Date

07/10/2016

Author

Mattia de' Michieli Vitturi

Definition at line 442 of file inpout.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

Member Data Documentation

integer, parameter inpout::backup_unit = 8

Backup input data unit.

Definition at line 50 of file inpout.f90.

character(len=40) inpout::bak_name

Backup file for the parameters.

Definition at line 42 of file inpout.f90.

character(len=40) inpout::batimetry_file

Name of the batimetry file.

Definition at line 46 of file inpout.f90.

character(len=40) inpout::dakota_file

Name of the dakota file.

Definition at line 47 of file inpout.f90.

integer, parameter inpout::dakota_unit = 11

Dakota data unit.

Definition at line 53 of file inpout.f90.

type(bc) inpout::hb_bcl

Definition at line 65 of file inpout.f90.

type(bc) inpout::hb_bcr

Definition at line 68 of file inpout.f90.

character(len=40) inpout::input_file

File with the run parameters.

Definition at line 43 of file inpout.f90.

integer, parameter inpout::input_unit = 7

Input data unit.

Definition at line 49 of file inpout.f90.

character(len=40) inpout::output_file

Name of the output files.

Definition at line 44 of file inpout.f90.

integer inpout::output_idx

Counter for the output files.

Definition at line 56 of file inpout.f90.

integer, parameter inpout::output_unit = 9

Output data unit.

Definition at line 51 of file inpout.f90.

logical inpout::restart

Flag to start a run from a previous output:
.

• T => Restart from a previous output
• F => Restart from initial condition read from two_phases.inp

Definition at line 62 of file inpout.f90.

character(len=40) inpout::restart_file

Name of the restart file.

Definition at line 45 of file inpout.f90.

integer, parameter inpout::restart_unit = 10

Restart data unit.

Definition at line 52 of file inpout.f90.

character(len=40) inpout::run_name

Name of the run.

Definition at line 41 of file inpout.f90.

type(bc) inpout::u_bcl

Definition at line 65 of file inpout.f90.

type(bc) inpout::u_bcr

Definition at line 68 of file inpout.f90.

---

The documentation for this module was generated from the following file:

• src/inpout.f90