Routine to initialize solver head with name, version and revision number
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(tem_solveHead_type), | intent(out) | :: | me |
solver info |
||
character(len=*), | intent(in) | :: | solName |
name of the solver |
||
character(len=*), | intent(in) | :: | version |
version of the solver |
subroutine tem_init_solveHead( me, solName, version ) !> solver info type( tem_solveHead_type), intent(out) :: me !> name of the solver character(len=*), intent(in) :: solName !> version of the solver character(len=*), intent(in) :: version ! --------------------------------------------------------------------------- me%solName = trim(solName) me%version = trim(version) me%revision = soi_solver_revision end subroutine tem_init_solveHead