; docformat = 'rst'
;
; NAME:
;    GENOIDE_XMLCLOSE
; PURPOSE:
;    Write the footer of a VOTable for Genoide, and close the file
;
;+
; :Description:
;    Write the footer of a VOTable for Genoide, and close the file
;
;    The suite of small routines GENOIDE_XML... allow to open, complete, close, read
;    an XML file in the Genoid standards. 
;
; :Categories:
;    Disk I/O, Genoide
;
; :Params:
;    UNIT: in, required, type=long
;        The file unit to be closed
;
; :Author:
;    B.Carry (IMCCE)
;
; :History:
;     Change History::
;        Written in July 2013, B. Carry (IMCCE)
;-
pro genoide_xmlClose, UNIT

 ;--I-- Write the VOTable Footer
  printf, unit, '        </vot:TABLEDATA>'
  printf, unit, '      </vot:DATA>'
  printf, unit, '    </vot:TABLE>'
  printf, unit, '  </vot:RESOURCE>'
  printf, unit, '</vot:VOTABLE>'

 ;--II-- Close the File and Free the File Unit
  close, unit
  free_lun, unit

end