caml-list - the Caml user's mailing list
 help / color / mirror / Atom feed
* [Caml-list] OCaml error message
@ 2004-05-03 18:19 Holger Schulz
  2004-05-03 18:38 ` Jean-Baptiste Rouquier
  2004-05-03 18:42 ` Matt Gushee
  0 siblings, 2 replies; 4+ messages in thread
From: Holger Schulz @ 2004-05-03 18:19 UTC (permalink / raw)
  To: caml-list

I've following declarations

---cut---
type rat = int * int;;

exception Denominator_Zero;;

let rec ggT : (int * int) -> int = fun (x,y) -> if y = 0 then x else ggT 
(y, x mod y)

let kgV : int * int -> int = fun (x,y) -> (x / ggT (x,y)) * y 

let kuerze : rat -> rat = function (m,n)  -> if n = 0 then raise 
Denominator_Zero
				else let g=ggT (m,n) in (m div g,n div g)
---cut---

Loading it with #use give the following error message, which I do not 
understand. Could anyone help me?

---cut--
# #use "B2A3.ml";;
type rat = int * int
exception Denominator_Zero
val ggT : int * int -> int = <fun>
val kgV : int * int -> int = <fun>
File "B2A3.ml", line 10, characters 29-30:
This expression is not a function, it cannot be applied
---cut---

Thanks

hs

-- 
"Sie haben neue Mails!" - Die GMX Toolbar informiert Sie beim Surfen!
Jetzt aktivieren unter http://www.gmx.net/info

-------------------
To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr
Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners


^ permalink raw reply	[flat|nested] 4+ messages in thread
* [Caml-list] OCaml error message
@ 2004-05-03 18:19 Holger Schulz
  0 siblings, 0 replies; 4+ messages in thread
From: Holger Schulz @ 2004-05-03 18:19 UTC (permalink / raw)
  To: caml-list

I've following declarations

---cut---
type rat = int * int;;

exception Denominator_Zero;;

let rec ggT : (int * int) -> int = fun (x,y) -> if y = 0 then x else ggT 
(y, x mod y)

let kgV : int * int -> int = fun (x,y) -> (x / ggT (x,y)) * y 

let kuerze : rat -> rat = function (m,n)  -> if n = 0 then raise 
Denominator_Zero
				else let g=ggT (m,n) in (m div g,n div g)
---cut---

Loading it with #use give the following error message, which I do not 
understand. Could anyone help me?

---cut--
# #use "B2A3.ml";;
type rat = int * int
exception Denominator_Zero
val ggT : int * int -> int = <fun>
val kgV : int * int -> int = <fun>
File "B2A3.ml", line 10, characters 29-30:
This expression is not a function, it cannot be applied
---cut---

Thanks

hs

-- 
"Sie haben neue Mails!" - Die GMX Toolbar informiert Sie beim Surfen!
Jetzt aktivieren unter http://www.gmx.net/info

-------------------
To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr
Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners


^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2004-05-03 18:42 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-05-03 18:19 [Caml-list] OCaml error message Holger Schulz
2004-05-03 18:38 ` Jean-Baptiste Rouquier
2004-05-03 18:42 ` Matt Gushee
2004-05-03 18:19 Holger Schulz

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).