%N tvclose %F $MIR/src/subs/tv.for
%D Close the display device.
%P jm
%: tv, display
%B
        subroutine tvclose
        implicit none

  TvClose closes up the image display device, flushing any buffers before
  it finishes.
