! aedit - test a format editing

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