;+
pro close_tidi_file, ncid
;;  author:   Marie L. Cooper
;;  created:  12 Dec 2002
    COMMON MISSIONTIME_BLOCK
    ncdf_close, ncid
;; Need to read in new values into the common block for the next TIDI file
    new_read_flag = 1
    return
END
;-