run time error
Fabian Meier
fabian@meier-bielefeld.de
Fri, 22 Nov 2002 14:55:55 +0100
This is a multi-part message in MIME format.
------=_NextPart_000_000C_01C29237.426EA800
Content-Type: multipart/alternative;
boundary="----=_NextPart_001_000D_01C29237.426EA800"
------=_NextPart_001_000D_01C29237.426EA800
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Hello!
The file versuch.lhs (attachment) consists of a function gc2. If you try =
gc2 25 15, hugs produces a run time error.
gc2 ist defined as:
> gc2::Int->Int->Int
> gc2 a1 a2 =3D gc2 a2 (mod a1 a2)
> gc2 a2 0 =3D a2
CU
Fabian Meier
------=_NextPart_001_000D_01C29237.426EA800
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2600.0" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Hello!</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>The file versuch.lhs (attachment) =
consists of a=20
function gc2. If you try gc2 25 15, hugs produces a run time =
error.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>gc2 ist defined as:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>> gc2::Int->Int->Int<BR>> =
gc2 a1 a2 =3D=20
gc2 a2 (mod a1 a2)<BR>> gc2 a2 0 =3D a2</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT><FONT face=3DArial =
size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>CU</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Fabian Meier</FONT></DIV></BODY></HTML>
------=_NextPart_001_000D_01C29237.426EA800--
------=_NextPart_000_000C_01C29237.426EA800
Content-Type: application/octet-stream;
name="versuch.lhs"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment;
filename="versuch.lhs"
> gc2::Int->Int->Int
> gc2 a1 a2 = gc2 a2 (mod a1 a2)
> gc2 a2 0 = a2
------=_NextPart_000_000C_01C29237.426EA800--