!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
begin data gag_scratch:uv-clip.init
  task\character "UV table"                           UVDATA$      'name'".uvt"
  task\real      "Clipping value"                     VCLIP$       'uvclip%val'
  task\integer   "First and last channel to consider" CHANNELS$[2] 'first' 'last'
  task\logical   "Kill all channels on bad data"      CLIPALL$     'uvclip%all'
  task\go
end data gag_scratch:uv-clip.init
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
vector\run uv_clip gag_scratch:uv-clip.init /nowindow
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
