gildor changed the topic of #ocaml to: Discussions about the OCaml programming language | http://caml.inria.fr/ | OCaml 3.12.1 http://bit.ly/nNVIVH
<agust1n> just saying hi
<agust1n> thanks :)
pumpkin has quit [Quit: Computer has gone to sleep.]
leboulanger has quit [Remote host closed the connection]
Anarchos has quit [Quit: Vision[0.9.7-H-090423]: i've been blurred!]
copumpkin has joined #ocaml
ikaros has quit [Quit: Ex-Chat]
ikaros has joined #ocaml
mjonsson has joined #ocaml
<everyonemines> Ah, sorry. A lot of the time on IRC you get people who come in, and have a question but go "hey, anyone here".
<agust1n> no problem sir :) eventually ill have a question and for sure ill ask here if I cannot solve it myself
copumpkin is now known as JesusGarcia
JesusGarcia is now known as copumpkin
sebz has quit [Quit: Computer has gone to sleep.]
arubin has joined #ocaml
Sysop_fb has joined #ocaml
struktured has joined #ocaml
sebz has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
Sysop_fb has quit [Ping timeout: 252 seconds]
sebz has joined #ocaml
sebz has quit [Client Quit]
sebz has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
dnolen has quit [Quit: dnolen]
sebz has joined #ocaml
sebz has quit [Client Quit]
sebz has joined #ocaml
peddie has joined #ocaml
dnolen has joined #ocaml
xmichaelx has quit [Quit: Leaving]
probst has joined #ocaml
ulfdoz_ has joined #ocaml
probst has quit [Ping timeout: 256 seconds]
ulfdoz has quit [Ping timeout: 244 seconds]
ulfdoz_ is now known as ulfdoz
dnolen has quit [Read error: Connection reset by peer]
dnolen has joined #ocaml
ikaros has quit [Quit: Ex-Chat]
sebz has quit [Quit: Computer has gone to sleep.]
copumpkin has quit [Ping timeout: 260 seconds]
copumpkin has joined #ocaml
sebz has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
dnolen has quit [Quit: dnolen]
sebz has quit [Quit: Computer has gone to sleep.]
EmmanuelOga has joined #ocaml
arubin has quit [Quit: arubin]
mjonsson has quit [Remote host closed the connection]
ybit3 has joined #ocaml
iris1 has quit [Quit: iris1]
sebz has joined #ocaml
probst has joined #ocaml
probst has quit [Ping timeout: 260 seconds]
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
sepp2k has quit [Remote host closed the connection]
rossberg has quit [Ping timeout: 240 seconds]
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
EmmanuelOga has quit [Ping timeout: 252 seconds]
probst has joined #ocaml
probst has quit [Read error: Operation timed out]
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
musically_ut has quit [Read error: Connection reset by peer]
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
leoncamel has joined #ocaml
LarryB has joined #ocaml
LarryB has quit [Read error: Connection reset by peer]
LarryB has joined #ocaml
LarryB has quit [Read error: Connection reset by peer]
sebz has quit [Quit: Computer has gone to sleep.]
chp has joined #ocaml
probst has joined #ocaml
copumpkin has left #ocaml []
probst has quit [Ping timeout: 256 seconds]
chp has quit [Quit: IRC webchat at http://irc2go.com/]
chp_ has joined #ocaml
caaakeeey has quit [Ping timeout: 240 seconds]
edwin has joined #ocaml
<chp_> hi folks! I'm new on this channel so please stop me if this isn't the right place for questions...
<adrien> it is
* adrien is leaving however
ygrek has joined #ocaml
<chp_> I'm trying to use an ocaml library about Fibonacci Heap... that I found at http://code.google.com/p/fiblib/source/browse/trunk/src/fibHeap_test.ml...
<chp_> but when I implemented it non my program I obtain an error that my ocaml skills can't handle... Can someone help me?
<krktz> can you give us the error?
<chp_> so..
<chp_> module MioTipo:FibHeap.KeyOrderType = struct
<chp_> type t = int
<chp_> let compare = Pervasives.compare
<chp_> let min = 0
<chp_> end;;
<chp_> module MioHeap = FibHeap.Make(MioTipo);;
<chp_> the error is: when i try to create a node with fibnode_new I obtain an error about type
<chp_> for example: let node10 = fibnode_new ~key:10 ~data:10
<chp_> the error is: Error: This expression has type int but an expression was expected of type MioHeap.key = MioTipo.t
Associat0r has joined #ocaml
Associat0r has quit [Changing host]
Associat0r has joined #ocaml
<flux> chp_, you have too strict module type for FibHeap.Make
<flux> or it is lacking the 'with' statement
<chp_> I'm new with Ocaml... what does it means "too strict module"?
<flux> it maked MioHeap.key abstract
<flux> (makes)
<chp_> and what about type t = int... this statement doesn't restrict the type of the structure???
<flux> I mean FibHeap.Make, not the code you pasted
<flux> your functor propably ends with ..: MioHeap?
<flux> or is thr heap not your code?
<chp_> I've downloaded the library at the above url... I'v just write the following few lines
<chp_> module MioTipo:FibHeap.KeyOrderType = struct
<chp_> type t = int
<chp_> let compare = Pervasives.compare
<chp_> let min = 0
<chp_> end;;
<chp_> open MioTipo;;
<chp_> module MioHeap = FibHeap.Make(MioTipo);;
<chp_> open MioHeap;;
<chp_> let node10 = fibnode_new ~key:10 ~data:10;;
<flux> maybe a paste site wouls be more convenient
<chp_> it's too long... anyway
<chp_> (** This module provides an efficient, imperative implementation of Fibonacci
<chp_> heaps based on the pseudocode from CLRS, 2nd ed., ch. 20.
<chp_> {3 Fiblib }
<chp_> Fibonacci heaps are kind of an obscure data structure, but they have their
<chp_> purposes. Operations that do not delete an element run in [O(1)] amortised
<chp_> time. In particular, if the number of [extract-min] and [delete] operations is
<chp_> small compared to the number of other operations, fibonacci heaps are a win
<chp_> (CLRS 477).
<chp_> In this library, each heap is conceptually a min-heap (elements are closer
<chp_> to the root whose keys are less than other keys). However, the comparison
<chp_> function is parameterised by functorisation, so it is just as easy to create a
<chp_> min-heap as a max-heap.
<chp_> In particular, if your keys are integers, and the comparison function is
<chp_> {!Pervasives.compare}, you will get a min-heap, e.g., data with key 5 will come
<chp_> out of the heap before data with key 10.
<chp_> *)
<chp_> (** The signature of the output of {!Make}. *)
<chp_> module type S = sig
<chp_> (** {3 Types } *)
<chp_> type key
<chp_> (** The totally-ordered key type.
<chp_> The comparison of this key determines whether this is a min-heap or a
<chp_> max-heap. If [fibkey] is [int], for example, and is compared by
<chp_> [Pervasives.compare], you get a min-heap.
<chp_> In general, if [f] compares keys, it is required that that [f k k' <
<chp_> 0] if and only if [k] should occur before [k'] in extraction order. *)
<chp_> type 'a fibheap
<chp_> (** A fibonacci heap containing elements of type ['a]. *)
<_habnabit> uh
<chp_> type 'a fibnode
<chp_> (** A fibonacci heap node. *)
<chp_> (** {3 Exceptions } *)
<chp_> exception Empty;;
<_habnabit> why are you pasting that here
<chp_> (** Thrown when the heap is empty. *)
<chp_> exception Key_too_big;;
<chp_> (** Thrown when the new key given for a call to {!fibheap_decrease_key}
<chp_> would not result in a decreased key. *)
<chp_> (** {3 Operations } *)
<chp_> val fibheap_create : unit -> 'a fibheap
<_habnabit> jesus christ
<chp_> (** Create a fibonacci heap.
<chp_> @return a fresh heap *)
<chp_> val fibheap_insert : 'a fibheap
<chp_> sorry...
<_habnabit> NEVER post more than, like, three lines to irc
<chp_> Maybe I don't understand the flux request
<_habnabit> paste.pocoo.org
<chp_> I'm totaly new about ocaml and irc... I'm a disaster... Please explain me what I have to done...
<_habnabit> you use a site like paste.pocoo.org so you don't spam the channel
sebz has joined #ocaml
bobry has quit [Ping timeout: 248 seconds]
<chp_> fibheap.mli that I've downloaded: http://paste.pocoo.org/show/503192/
<chp_> and finally fibheap.ml: http://paste.pocoo.org/show/503194/
testcocoon has quit [Quit: Coyote finally caught me]
sebz has quit [Quit: Computer has gone to sleep.]
testcocoon has joined #ocaml
<flux> the files are somehow corrupted, they cannot be compiled
rwmjones has quit [Read error: Operation timed out]
<flux> oh, managed to fix them
bobry has joined #ocaml
sebz has joined #ocaml
Associat0r has quit [Quit: Associat0r]
<flux> ah
<flux> chp_, you need to remove ":FibHeap.KeyOrderType"
<flux> chp_, alternative, you can replace it with ":FibHeap.KeyOrderType with type t = int"
sebz has quit [Client Quit]
<flux> chp_, that's what I meant that it's restricting too much
<chp_> I'm trying...
<flux> because the type signature says that type t is abstract, when you say :FibHeap.KeyOrderType, the type of t will in module MioTipo will be abstract as well
<flux> unless it's annotated that type t should be som concrete type
leboulanger has joined #ocaml
testcocoon has quit [Read error: Connection reset by peer]
Associat0r has joined #ocaml
Associat0r has quit [Changing host]
Associat0r has joined #ocaml
<chp_> It's works
<chp_> :-)
<chp_> Thanks for your time
<flux> chp_, may your ocaml learning experience have fewer obstacles in the future :)
testcocoon has joined #ocaml
testcocoon has quit [Quit: Coyote finally caught me]
testcocoon has joined #ocaml
ygrek has quit [Ping timeout: 248 seconds]
sebz has joined #ocaml
ttamttam has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
testcocoon has quit [Quit: Coyote finally caught me]
testcocoon has joined #ocaml
Associat0r has quit [Quit: Associat0r]
bobry has quit [Ping timeout: 258 seconds]
ttamttam has quit [Quit: Leaving.]
chp_ has quit [Quit: Ex-Chat]
ttamttam has joined #ocaml
sebz has joined #ocaml
bobry has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
sebz has joined #ocaml
ttamttam has quit [Quit: Leaving.]
ttamttam has joined #ocaml
Cyanure has quit [Ping timeout: 255 seconds]
sebz has quit [Quit: Computer has gone to sleep.]
Cyanure has joined #ocaml
ikaros has joined #ocaml
Snark has joined #ocaml
ikaros has quit [Quit: Ex-Chat]
ttamttam1 has joined #ocaml
ttamttam has quit [Read error: Connection reset by peer]
ikaros has joined #ocaml
leboulanger has quit [Ping timeout: 240 seconds]
ikaros has quit [Quit: Ex-Chat]
Associat0r has joined #ocaml
Associat0r has quit [Changing host]
Associat0r has joined #ocaml
Kakadu has joined #ocaml
lopex has quit [Remote host closed the connection]
gmcabrita has quit [Read error: Connection reset by peer]
joewilliams has quit [Remote host closed the connection]
ttamttam1 has quit [Quit: Leaving.]
ttamttam has joined #ocaml
ikaros has joined #ocaml
ttamttam has quit [Quit: Leaving.]
ttamttam has joined #ocaml
gmcabrita has joined #ocaml
joewilliams has joined #ocaml
lopex has joined #ocaml
ttamttam has quit [Ping timeout: 256 seconds]
bobry has quit [Ping timeout: 258 seconds]
ankit9|zzz is now known as ankit9
rwmjones has joined #ocaml
bobry has joined #ocaml
ttamttam has joined #ocaml
gnuvince has joined #ocaml
sepp2k has joined #ocaml
caaakeeey has joined #ocaml
caaakeeey has quit [Ping timeout: 240 seconds]
caaakeeey has joined #ocaml
ttamttam has quit [Quit: Leaving.]
caaakeeey has quit [Ping timeout: 240 seconds]
ttamttam has joined #ocaml
leboulanger has joined #ocaml
ttamttam has quit [Client Quit]
musically_ut has joined #ocaml
ttamttam has joined #ocaml
ttamttam has quit [Quit: Leaving.]
ttamttam has joined #ocaml
musically_ut has quit [Ping timeout: 240 seconds]
<adrien> I'm tempted to make it possible to link against only parts of lablgtk2; the beast takes quite a lot of time to start up because it initializes all the g[A-Z] modules (the ones with the object layer)
rossberg has joined #ocaml
ygrek has joined #ocaml
raichoo has joined #ocaml
rwmjones has quit [Quit: leaving]
ttamttam has quit [Ping timeout: 245 seconds]
rwmjones has joined #ocaml
arubin has joined #ocaml
musically_ut has joined #ocaml
<musically_ut> Is there some reason why (or): bool -> bool -> bool is defined and (and) : bool -> bool -> bool is not defined?
<adrien> let rec f ... and g ...
<adrien> BUT
<adrien> val (or) : bool -> bool -> bool
<adrien> Deprecated.
<adrien> val (&) : bool -> bool -> bool
<adrien> Deprecated.
<musically_ut> adrien, Thanks.
<NaCl> adrien: !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
<adrien> damn, NaCl spotted me, I better hide :P
* NaCl throws a net on adrien
* adrien keeps the cookies for himself and hands nothing to NaCl
<NaCl> COOKIES
* musically_ut thinks "Is it the latency (* munches popcorn *) or is the movie running in slow motion?"
<adrien> latency? for messages over IRC?
<NaCl> adrien is stuck in a time dialation field
<adrien> yup, the time dilatation field know as "I should update the META file generator"
leboulanger has quit [Ping timeout: 252 seconds]
<adrien> ("and it's not even hard to do")
<agust1n> morning
<adrien> hi
sepp2k has quit [Remote host closed the connection]
probst has joined #ocaml
raichoo has quit [Quit: leaving]
probst has quit [Ping timeout: 252 seconds]
<agust1n> how are you adrien ?
<adrien> fine, thanks, and you?
<agust1n> great, enjoying saturday :) thanks
leboulanger has joined #ocaml
emmanuelux has joined #ocaml
blinky- has joined #ocaml
ygrek has quit [Ping timeout: 248 seconds]
sebz has joined #ocaml
blinky-- has joined #ocaml
fschwidom has joined #ocaml
blinky- has quit [Ping timeout: 256 seconds]
EmmanuelOga has joined #ocaml
caaakeeey has joined #ocaml
Smerdyakov has joined #ocaml
probst has joined #ocaml
probst has quit [Ping timeout: 276 seconds]
fschwidom has quit [Remote host closed the connection]
EmmanuelOga has quit [Quit: WeeChat 0.3.6-rc2]
struktured has quit [Remote host closed the connection]
musically_ut has quit [Ping timeout: 240 seconds]
ztfw has joined #ocaml
dnolen has joined #ocaml
Smerdyakov has quit [Quit: Leaving]
joewilliams has quit [Max SendQ exceeded]
joewilliams has joined #ocaml
emmanuelux has quit [Ping timeout: 240 seconds]
sebz has quit [Quit: Computer has gone to sleep.]
sepp2k has joined #ocaml
blinky-- has quit [Quit: /unquit]
musically_ut has joined #ocaml
leboulanger has quit [Remote host closed the connection]
ttamttam has joined #ocaml
raichoo has joined #ocaml
Snark has quit [Quit: Quitte]
sepp2k has quit [Ping timeout: 240 seconds]
dnolen_ has joined #ocaml
dnolen has quit [Ping timeout: 260 seconds]
dnolen_ is now known as dnolen
sepp2k has joined #ocaml
Smerdyakov has joined #ocaml
sebz has joined #ocaml
sepp2k has quit [Remote host closed the connection]
sebz has quit [Quit: Computer has gone to sleep.]
Smerdyakov has quit [Quit: Leaving]
sebz has joined #ocaml
Kakadu has quit [Remote host closed the connection]
EmmanuelOga has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
Reaganomicon has joined #ocaml
ttamttam has quit [Quit: Leaving.]
dnolen has quit [Quit: dnolen]
edwin has quit [Remote host closed the connection]
sebz has joined #ocaml
sepp2k has joined #ocaml
ztfw has quit [Read error: Connection reset by peer]
sebz has quit [Quit: Computer has gone to sleep.]
dnolen has joined #ocaml
everyonemines has quit [Quit: Leaving.]
sebz_ has joined #ocaml
sebz_ has quit [Client Quit]
sebz has joined #ocaml
sebz has quit [Client Quit]
sebz has joined #ocaml
Amorphous has quit [Ping timeout: 240 seconds]
dnolen has quit [Quit: dnolen]
dnolen has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
dnolen has quit [Ping timeout: 240 seconds]
sebz has joined #ocaml
sebz has quit [Client Quit]
Amorphous has joined #ocaml
sebz has joined #ocaml
sebz has quit [Quit: Computer has gone to sleep.]
raichoo has quit [Quit: leaving]
sebz has joined #ocaml
sebz has quit [Client Quit]
probst has joined #ocaml
NaCl has quit [Ping timeout: 255 seconds]
probst has quit [Ping timeout: 245 seconds]
Boscop has quit [Ping timeout: 258 seconds]