|
FEDEM Solver
R8.0
Source code of the dynamics solver
|
Module with data and subroutines for program version handling. More...
Functions/Subroutines | |
| subroutine | getcurrentdate (curDate, nospace) |
| Returns current date and time in the format "dd Mmm yyyy hh:mm:ss". More... | |
| subroutine | openresfile (chname, solver, lpu, ierr) |
| Opens the solver res-file and print header information to it. More... | |
Variables | |
| character(len=32), save | progver |
| Version ID for this release. More... | |
| character(len=32), save | builddate |
| The date this program was built. More... | |
Module with data and subroutines for program version handling.
| subroutine versionmodule::getcurrentdate | ( | character(len=*), intent(out) | curDate, |
| logical, intent(in), optional | nospace | ||
| ) |
Returns current date and time in the format "dd Mmm yyyy hh:mm:ss".
| [out] | curDate | String with current data and time |
| [in] | nospace | If .true. use format "yyyy-Mmm-dd_hhmmss" instead |

| subroutine versionmodule::openresfile | ( | character(len=*), intent(in) | chname, |
| character(len=*), intent(in) | solver, | ||
| integer, intent(out) | lpu, | ||
| integer, intent(out) | ierr | ||
| ) |
Opens the solver res-file and print header information to it.
| [in] | chname | Name of the solver res-file |
| [in] | solver | Name of the solver executable |
| [out] | lpu | File unit number of the solver res-file |
| [out] | ierr | Error flag |

| character(len=32), save versionmodule::builddate |
The date this program was built.
| character(len=32), save versionmodule::progver |
Version ID for this release.