Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(xml_file), | intent(inout) | :: | file | XML file. |
Free dynamic memory when finalizing.
subroutine finalize(file)
!---------------------------------------------------------------------------------------------------------------------------------
!< Free dynamic memory when finalizing.
!---------------------------------------------------------------------------------------------------------------------------------
type(xml_file), intent(inout) :: file !< XML file.
!---------------------------------------------------------------------------------------------------------------------------------
!---------------------------------------------------------------------------------------------------------------------------------
call file%free
!---------------------------------------------------------------------------------------------------------------------------------
endsubroutine finalize