                         Patterns



[ These were originally two programs in one, with a STOP

  in between. To run them, you were expected to either

  RUN 50 or RUN 1700. For convenience, I've split them

  into two auto-running programs. If, for some reason,

  you want the original double program, you can MERGE

  them together - I've left the STOP statement in. ]