<div>Thank you very much, Stephen and Jean!</div>
<div>I guess I missed something in my tests.</div>
<div>You definition gives me valid results.</div>
<div>How I can missed it!</div>
<div> </div>
<div>Thank you very much again!<br><br></div>
<div class="gmail_quote">2010/9/17 jean verdier <span dir="ltr">&lt;<a href="mailto:verdier.jean@gmail.com">verdier.jean@gmail.com</a>&gt;</span><br>
<blockquote style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex" class="gmail_quote">I think that your compare function has the result inverted, you could<br>try:<br><br>between a b x<br> | x &lt; a     = GT<br>
 | x &gt; b     = LT<br> | otherwise = EQ<br><br>I think that the tree is correct.<br>
<div>
<div></div>
<div class="h5"><br><br>On Fri, 2010-09-17 at 08:41 +0100, Stephen Tetley wrote:<br>&gt; Hello Alexander<br>&gt;<br>&gt; I suspect mydelete&#39; isn&#39;t working because it needs a &quot;sorted&quot; tree -<br>&gt; either the initial tree you are supplying isn&#39;t sorted or it becomes<br>
&gt; unsorted after one delete step.<br>&gt;<br>&gt; I don&#39;t know the AVL library at all (I only installed it now to look<br>&gt; at your problem) so I can&#39;t say from looking at the constructors<br>&gt; whether the problem tree is malformed, the problem tree being:<br>
&gt;<br>&gt; &gt; P (Z E 1 E) 3 E<br>&gt;<br>&gt; Potentially very few people use the Avl module which is why you<br>&gt; haven&#39;t had a reply yet. You could try posting to the Cafe instead if<br>&gt; you don&#39;t get a better answer.<br>
&gt;<br>&gt; Best wishes<br>&gt;<br>&gt; Stephen<br></div></div>&gt; _______________________________________________<br>&gt; Beginners mailing list<br>&gt; <a href="mailto:Beginners@haskell.org">Beginners@haskell.org</a><br>
&gt; <a href="http://www.haskell.org/mailman/listinfo/beginners" target="_blank">http://www.haskell.org/mailman/listinfo/beginners</a><br><br><br></blockquote></div><br>