~ubuntu-branches/ubuntu/trusty/clc-intercal/trusty-proposed

« back to all changes in this revision

Viewing changes to examples/quantum/ignore.i

  • Committer: Bazaar Package Importer
  • Author(s): Mark Brown
  • Date: 2006-10-08 13:30:54 UTC
  • mfrom: (1.1.1 upstream) (3.1.1 dapper)
  • Revision ID: james.westby@ubuntu.com-20061008133054-fto70u71yoyltr3m
Tags: 1:1.0~2pre1.-94.-4.1-1
* New upstream release.
* Change to dh_installman.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
        PLEASE NOTE: this program demonstrates quantum ignore, but it could
 
2
        just as easily demonstrate quantum remember: uncomment the commented
 
3
        out quantum remember, and comment out the quantum ignore, to produce
 
4
        an identical program.
 
5
 
 
6
        Requires CLC-INTERCAL 1.-94 or newer.
 
7
 
 
8
Copyright (c) 2006 Claudio Calvelli, all rights reserved.
 
9
 
 
10
CLC-INTERCAL is copyrighted software. However, permission to use, modify,
 
11
and distribute it is granted provided that the conditions set out in the
 
12
licence agreement are met. See files README and COPYING in the distribution.
 
13
 
 
14
        DO .5 <- #5
 
15
        DO .1 <- #1
 
16
        DO .2 <- #2
 
17
        PLEASE IGNORE .1 WHILE REMEMBERING IT
 
18
        DO NOT REMEMBER .1 WHILE IGNORING IT
 
19
(1)     DO .1 <- #0
 
20
        DO COME FROM (4)
 
21
(5)     PLEASE COME FROM .5
 
22
        DO .5 <- #5
 
23
        DO WRITE IN .3
 
24
(8)     DO .4 <- #2 � "'.3 ~ .3' ~ #1"
 
25
(4)     DO .2 <- #0
 
26
 
 
27
        PLEASE COME FROM (3)
 
28
        DO .2 <- #2
 
29
        PLEASE COME FROM .1
 
30
        DO .5 <- #0
 
31
(2)     DO COME FROM .2
 
32
 
 
33
        DON'T WORRY THAT I'M REPEATING A LABEL - YOU CAN NOW QUITE
 
34
        GET AWAY WITH IT AS LONG AS YOU ARE VERY CAREFUL ABOUT WHAT
 
35
        EVIDENCE YOU LEAVE AROUND. SO, WITHOUT FURTHER DELAY, HERE
 
36
        FOLLOWS THE REPEATED LABEL:
 
37
(8)     PLEASE DO NOT PRODUCE AN ERROR
 
38
 
 
39
(3)     DO READ OUT .3
 
40
 
 
41
        DO NOT DESPAIR TO UNDERSTAND THE ABOVE
 
42
        IT'S ALL REALLY REALLY SIMPLE
 
43
        THERE ARE TWO STATES (QUANTUM, SUPERPOSED)
 
44
        AND IN THESE TWO STATES
 
45
        THE VALUES OF REGISTER .1
 
46
        DO NOT QUITE CORRESPOND,
 
47
        BEING THEY ONE AND ZERO
 
48
        AT THE SAME TIME
 
49
        AND THERE IS SOMEWHERE
 
50
        A COMPUTED "COME FROM .1", WHICH, SURPRISE!
 
51
        WILL WORK IN ONE STATE BUT NOT IN THE OTHER.
 
52
        THE TWO STATES WILL THEN QUITE DIFFER FROM EACH OTHER
 
53
        ONE BEING WRITING NUMBERS
 
54
        AND THE OTHER READING THEM IN THE SAME ORDER
 
55
        BUT NOT NECESSARILY IMMEDIATELY
 
56
        AND THAT'S ALL I'M GOING TO SAY
 
57
        BUT DO NOT THINK FOR A SECOND
 
58
        THAT IT'S ALL THERE IS TO SEE.
 
59
 
 
60
        BUT WAIT! THERE'S MORE:
 
61
 
 
62
        PLEASE COME FROM .4
 
63
        DO .2 <- #0
 
64
        DO GIVE UP NOW - I'M TIRED OF THIS
 
65
 
 
66
        THE END
 
67