%N tveras %F $MIR/src/subs/tv.for
%D Erase a channel on the image display device.
%P jm
%: tv, display
%B
        subroutine tveras(channel)
        implicit none
        integer channel

  TvEras causes a particular image channel to be erased.
  Channels are numbers from 1 to NCHAN (where NCHAN is the
  maximum number of channels that the display possesses.
  NOTE: If a device is unable to erase only one particular
  channel, then it initializes all channels (via TvReset).

  Input:
    channel    Channel number to erase.
