X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fcodeb_abgabe_bd.0;fp=gesamt%2Fcodeb_abgabe_bd.0;h=3d086a9b5f203eae440555c68a0d109559eb3380;hp=0000000000000000000000000000000000000000;hb=db2886cc9203ecfa582f2a7ae83e6630187329aa;hpb=b69df8b7819d52f5f432fed67fc5a317d2c19d7f

diff --git a/gesamt/codeb_abgabe_bd.0 b/gesamt/codeb_abgabe_bd.0
new file mode 100644
index 0000000..3d086a9
--- /dev/null
+++ b/gesamt/codeb_abgabe_bd.0
@@ -0,0 +1,6 @@
+method mymax(that)
+  if not (this<that) then
+    that:=this;
+  end;
+  return that;
+end;