projects
/
testub10.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Merge commit 'lewurm/master' into local
[testub10.git]
/
parser
/
tom_all.0
1
/* all - teste alle ableitungen */
2
struct
3
a
4
end;
5
6
method b(c d)
7
var e := 0;
8
c := e;
9
d = e;
10
if (e = d) then c := 1-2; end;
11
if (e < d) then c := 1 or 2 or 3; else c := c * d * e; end;
12
while (not d) do
13
d := d.c - d -d - d;
14
d.c := c.d - d.c;
15
b (d, c);
16
b.b (c, d);
17
end;
18
return c = d;
19
end;