500 FORMAT (1H0, 2F10.3, E15.1, TR1, A10, 7HIN BOOK)
1001 FORMAT (2(5E10.2, I10/), (1X, SP, I7, ss, ES10.2))
130 FORMAT (9HMORE SNOW)
140 FORMAT (a, 9X, 3A5, 7/ a, 10X, 3L4)
! 17   format (7Ha"cde'g, 4 I8, '***')   ! This still doesn't work (Holleriths in free form)

string = ASCII_"Hello"

end