Daniel Fischer daniel.is.fischer at web.de
Thu Apr 15 15:24:02 EDT 2010

```Am Donnerstag 15 April 2010 19:19:15 schrieb Romulus:
> Hello everyone,
>

>
> I'm stuck with the definition of the helper for LAnd'. I expect :
>
> land' :: ((LAnd' p) :<: (f p)) =>  Mu (f p) ->  Mu (f p) ->  Mu (f p)
> land' = \x y -> inject (LAnd' x y)
>
> ... but ghci 6.10.4 does not really like this definition...
>
>     Could not deduce (LAnd' p :<: f p1)
>       from the context (LAnd' p1 :<: f p1)
>       arising from a use of `inject' at PropSample.hs:128:16-33
>     Possible fix:
>       add (LAnd' p :<: f p1) to the context of
>         the type signature for `land''
>       or add an instance declaration for (LAnd' p :<: f p1)
>     In the expression: inject (LAnd' x y)
>     In the expression: \ x y -> inject (LAnd' x y)
>     In the definition of `land'': land' = \ x y -> inject (LAnd' x y)
>
>
>
> Does anybody have a clue for this problem ?
> I don't really understand where is the trouble actually.

The expression (Land' x y) can have the type (Land' q (Mu (f p))) for all
q. But there's only an instance for the p used in Mu (f p) provided, so

Could not deduce (LAnd' p :<: f p1)
from the context (LAnd' p1 :<: f p1)

The solution is to tell the compiler that this expression should have the
type LAnd' p (Mu (f p)) for the f and p from the type signature, add

{-# LANGUAGE ScopedTypeVariables #-}

and modify land' to

land' :: forall f p. ((LAnd' p) :<: (f p)) =>  Mu (f p) ->  Mu (f p) ->  Mu
(f p)
land' = \x y -> inject (LAnd' x y :: LAnd' p (Mu (f p)))

to be greeted by

[1 of 1] Compiling Prop             ( PropSample.hs, interpreted )

PropSample.hs:31:16:
Warning: Declaration of `In' uses deprecated syntax
In :: {out :: f (Mu f)} -> Mu f
*Prop>

by 6.12.1 and

\$ ghci-6.10.3 PropSample
GHCi, version 6.10.3: http://www.haskell.org/ghc/  :? for help
[1 of 1] Compiling Prop             ( PropSample.hs, interpreted )
*Prop>

from the older GHC.

>
> Cheers,
>

+1

>
>
> 
> Swierstra, W.
> Data types à la carte
> J. Funct. Program.
> Cambridge University Press, 2008, 18, 423-436
>
> 
> Knowles, K.
> First-Order Logic à la Carte