open the restart dump file and write out the 'normal' restart header.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(tem_restart_type) | :: | me | the restart information |
subroutine tem_restart_openRead(me)
! -------------------------------------------------------------------- !
!> the restart information
type(tem_restart_type) :: me
write(logUnit(1),*)' Open read... '
! read the restart header file
! prepare everything for the serialization of the data
! Invoke the routine to open single variable system from restart file
call tem_restart_openRead_single(me)
end subroutine tem_restart_openRead