tem_init_solveHead Subroutine

public subroutine tem_init_solveHead(me, solName)

Routine to initialize solver head with name, version and revision number

Arguments

Type IntentOptional Attributes Name
type(tem_solveHead_type), intent(out) :: me

solver info
character(len=*), intent(in) :: solName

name of the solver

Source Code

  subroutine tem_init_solveHead( me, solName )
    !> solver info
    type( tem_solveHead_type), intent(out) :: me
    !> name of the solver
    character(len=*), intent(in) :: solName
    ! ---------------------------------------------------------------------------

    me%solName  = trim(solName)
    me%version = soi_solver_version
    me%revision = soi_solver_revision

  end subroutine tem_init_solveHead