FORTRAN T-shirt

I was getting on a bus in Playa del Carmen, Mexico yesterday and ran into a guy wearing a T-shirt whose decoration was a bunch of FORTRAN code. The wearer said he didn't know its background or what it meant or came from. Maybe it was something cooked up by a graphic artist who just thought it looked cool, but if it was from a real system, it's something I didn't recognize. It was some sort of interactive system. Here is what it looked like, structurally, more or less, from memory. *READY A = 3+3 *READY A = 6 *READY *READY PROGRAM TEST *READY DIMENSION B(6) *READY READ(3,10) (B(I),I = 1,6) *READY 10 FORMAT(6F10.5) *READY DO 20 I = 1, 20 . . (and so on --- about 30 lines of ordinary fortran code here) . *READY 20 CONTINUE *READY GOAT 2 STATEMENT NOT IN *READY GOTO 2 *READY 30 CALL XPLOT(B,10) *READY STOP74 *READY END Each line started with *READY, except for the blank line, the line with the result 6 and the line with STATEMENT NOT IN. The font looked like standard ASR33 teletype. Does this format look familiar to anyone? The bit about prompting for each line with *READY is something I've never seen. It also appeared to do some preliminary syntax checking, as it flagged the line "GOAT 2" with an error message (which was itself grammatically incomplete). Any recollections on this one? Brian