|
996
|
1 PLEASE NOTE: This program shows how a student can be attending a
|
|
|
2 lecture while, at the same time, be somewhere completely different.
|
|
|
3
|
|
|
4 Requires CLC-INTERCAL 1.-94.
|
|
|
5
|
|
|
6 Copyright (c) 2006 Claudio Calvelli, all rights reserved.
|
|
|
7
|
|
|
8 CLC-INTERCAL is copyrighted software. However, permission to use, modify,
|
|
|
9 and distribute it is granted provided that the conditions set out in the
|
|
|
10 licence agreement are met. See files README and COPYING in the distribution.
|
|
|
11
|
|
|
12 DO STUDY #1 AT (1000) IN CLASS @1
|
|
|
13 DO ENROL .1 TO LEARN #1
|
|
|
14 DO .1 <- #1
|
|
|
15 DO .1 LEARNS #1
|
|
|
16 PLEASE READ OUT .1
|
|
|
17 DO GIVE UP
|
|
|
18
|
|
|
19 (1000) PLEASE FINISH LECTURE WHILE CONTINUING IT
|
|
|
20 DO NOTHING FOR A SHORT WHILE
|
|
|
21 DO .1 <- #2
|
|
|
22 DO FINISH LECTURE
|
|
|
23
|
|
|
24 PLEASE DON'T ASK ME WHAT HAPPENS HERE
|
|
|
25 Just run the program and see, will you?
|
|
|
26 You'll never know (until you observe) if you'll see
|
|
|
27 a repeated "II" or maybe a "I" and a "II", not
|
|
|
28 necessarily in that order.
|
|
|
29
|
