1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
\ Common code (insert obligatory sneeze here)
\ for Nested "Exists" Conditionals test
\ Updated Tue, 12 Apr 2005 at 14:45 by David L. Paktor
." Begin Nest Test Test"
[ifexist] NestTest
." Exists, level 1"
[ifexist] NestTest
." Exists and exists, level 2"
[else]
." Exists but doesn't exist. What? Level 2"
[then]
." Resumes existence, level 1"
[ifnexist] NestTest
." Exists but not exists. What? Level 2"
[else]
." Exists and doesn't not exist, level 2"
[then]
." Still exists, level 1"
[else]
." Doesn't exist, level 1"
[ifexist] NestTest
." Doesn't exist but exists. What? Level 2"
[else]
." Doesn't exist and doesn't exist, level 2"
[then]
" Resumes non-existence, level 1"
[ifnexist] NestTest
." Doesn't exist and not exists, level 2"
[else]
." Doesn't exist but doesn't not exist. What? Level 2"
[then]
." Still doesn't exist, level 1"
[then]
." Middle of Nest Test Test"
[ifnexist] NestTest
." Not exists, pass 2, level 1"
[ifexist] NestTest
." Not exists but exists. What? Pass 2, Level 2"
[else]
." Not exists and doesn't exist, pass 2, level 2"
[then]
" Resumes non-existence, pass 2, level 1"
[ifnexist] NestTest
." Not exists and not exists, pass 2, level 2"
[else]
." Not exists but doesn't not exist. What? Pass 2, Level 2"
[then]
." Still not exists, pass 2, level 1"
[else]
." Doesn't not exist, pass 2, level 1"
[ifexist] NestTest
." Doesn't not exist and exists, pass 2, level 2"
[else]
." Doesn't not exist but doesn't exist. What? Pass 2, Level 2"
[then]
" Resumes not non-existing, pass 2, level 1"
[ifnexist] NestTest
." Doesn't not exist but not exists. What? Pass 2, Level 2"
[else]
." Doesn't not exist and doesn't not exist, pass 2, level 1"
[then]
." Still doesn't not exist, pass 2, level 1"
[then]
." End Nest Test Test"
|
