Module to handle operations related to file input and output.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | save | :: | stdout | Unit on which stdout is written |
||
character(len=50), | public, | save | :: | seedname | The seedname for this run |
||
integer, | public, | parameter | :: | maxlen | = | 255 | Max column width of input file |
logical, | public, | save | :: | post_proc_flag | Are we in post processing mode |
||
character(len=10), | public, | parameter | :: | w90_version | = | '3.1.0 ' | Label for this version of wannier90 |
integer, | private, | parameter | :: | nmax | = | 100 | Maximum number of stopwatches |
type(timing_data), | private | :: | clocks(nmax) | Data for the stopwatches |
|||
integer, | private, | save | :: | nnames | = | 0 | Number of active stopwatches |
Data about each stopwatch - for timing routines
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | ncalls | Number of times stopwatch has been called |
|||
real(kind=DP), | public | :: | ctime | Total time on stopwatch |
|||
real(kind=DP), | public | :: | ptime | Temporary record of time when watch is started |
|||
character(len=60), | public | :: | label | What is this stopwatch timing |
Returns elapsed CPU time in seconds since its first call. Uses standard f90 call
Returns an unused unit number so we can later open a file on that unit.
Stopwatch to time parts of the code
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | tag | Which stopwatch to act upon |
||
integer, | intent(in) | :: | mode | Action 1=start 2=stop |
Output timing information to stdout
Get the seedname from the commandline
Parse the commandline
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=50), | intent(in) | :: | prog | Name of the calling program |
||
logical, | intent(out) | :: | dryrun | Have we been asked for a dryrun |
Abort the code giving an error message
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | error_msg |
Returns two strings containing the date and the time in human-readable format. Uses a standard f90 call.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=9), | intent(out) | :: | cdate | The date |
||
character(len=9), | intent(out) | :: | ctime | The time |