! aedit - test a format editing

      program aedit
      character*10 string
      string = '0123456789'
      write(0,10) string
10    format('/',a,'/')
      stop
      end