Hyper.Syntax.Let

Documentation

data Let v expr h

A term for let-expressions with let-generalization.

Let v exprs express let-expressions with vs as variable names and exprs for terms.

Apart from the data type, an Infer instance is also provided.

Constructors

Let

Fields

• _letVar :: v
• _letEquals :: h :# expr
• _letIn :: h :# expr

Instances

(MonadScopeLevel m, LocalScopeType v (GTerm (UVarOf m) # TypeOf expr) m, UnifyGen m (TypeOf expr), HasInferredType expr, HNodesConstraint (InferOf expr) (UnifyGen m), HTraversable (InferOf expr), Infer m expr) => Infer m (Let v expr)

Defined in Hyper.Syntax.Let

Methods

inferBody :: forall (h :: AHyperType -> Type). (Let v expr # InferChild m h) -> m (Let v expr # h, InferOf (Let v expr) # UVarOf m)

inferContext :: proxy0 m -> proxy1 (Let v expr) -> Dict (HNodesConstraint (Let v expr) (Infer m), HNodesConstraint (InferOf (Let v expr)) (UnifyGen m))

Semigroup v => HApply (Let v expr)

Defined in Hyper.Syntax.Let

Methods

hzip :: forall (p :: HyperType) (q :: HyperType). (Let v expr # p) -> (Let v expr # q) -> Let v expr # (p :*: q)

HContext (Let v expr)

Defined in Hyper.Syntax.Let

Methods

hcontext :: forall (p :: HyperType). (Let v expr # p) -> Let v expr # (HFunc p (Const (Let v expr # p)) :*: p)

HFoldable (Let v expr)

Defined in Hyper.Syntax.Let

Methods

hfoldMap :: Monoid a => (forall (n :: HyperType). HWitness (Let v expr) n -> (p # n) -> a) -> (Let v expr # p) -> a

HFunctor (Let v expr)

Defined in Hyper.Syntax.Let

Methods

hmap :: (forall (n :: HyperType). HWitness (Let v expr) n -> (p # n) -> q # n) -> (Let v expr # p) -> Let v expr # q

HNodes (Let v expr)

Defined in Hyper.Syntax.Let

Associated Types

type HNodesConstraint (Let v expr) c

type HWitnessType (Let v expr) :: HyperType -> Type

Methods

hLiftConstraint :: forall c (n :: HyperType) r. HNodesConstraint (Let v expr) c => HWitness (Let v expr) n -> Proxy c -> (c n => r) -> r

Monoid v => HPointed (Let v expr)

Defined in Hyper.Syntax.Let

Methods

hpure :: (forall (n :: HyperType). HWitness (Let v expr) n -> p # n) -> Let v expr # p

HTraversable (Let v expr)

Defined in Hyper.Syntax.Let

Methods

hsequence :: forall f (p :: AHyperType -> Type). Applicative f => (Let v expr # ContainedH f p) -> f (Let v expr # p)

Eq v => ZipMatch (Let v expr)

Defined in Hyper.Syntax.Let

Methods

zipMatch :: forall (p :: HyperType) (q :: HyperType). (Let v expr # p) -> (Let v expr # q) -> Maybe (Let v expr # (p :*: q))

HMorph (Let v expr0) (Let v expr1)

Defined in Hyper.Syntax.Let

Associated Types

type MorphConstraint (Let v expr0) (Let v expr1) c

data MorphWitness (Let v expr0) (Let v expr1) :: HyperType -> HyperType -> Type

Methods

morphMap :: (forall (a :: HyperType) (b :: HyperType). MorphWitness (Let v expr0) (Let v expr1) a b -> (p # a) -> q # b) -> (Let v expr0 # p) -> Let v expr1 # q

morphLiftConstraint :: forall c (a :: HyperType) (b :: HyperType) r. MorphConstraint (Let v expr0) (Let v expr1) c => MorphWitness (Let v expr0) (Let v expr1) a b -> Proxy c -> (c a b => r) -> r

Generic (Let v expr h)

Defined in Hyper.Syntax.Let

Associated Types

type Rep (Let v expr h) :: Type -> Type

Methods

from :: Let v expr h -> Rep (Let v expr h) x

to :: Rep (Let v expr h) x -> Let v expr h

Constraints (Let v expr h) Show => Show (Let v expr h)

Defined in Hyper.Syntax.Let

Methods

showsPrec :: Int -> Let v expr h -> ShowS

show :: Let v expr h -> String

showList :: [Let v expr h] -> ShowS

Constraints (Let v expr h) Binary => Binary (Let v expr h)

Defined in Hyper.Syntax.Let

Methods

put :: Let v expr h -> Put

get :: Get (Let v expr h)

putList :: [Let v expr h] -> Put

Constraints (Let v expr h) NFData => NFData (Let v expr h)

Defined in Hyper.Syntax.Let

Methods

rnf :: Let v expr h -> ()

Constraints (Let v expr h) Eq => Eq (Let v expr h)

Defined in Hyper.Syntax.Let

Methods

(==) :: Let v expr h -> Let v expr h -> Bool

(/=) :: Let v expr h -> Let v expr h -> Bool

Constraints (Let v expr h) Ord => Ord (Let v expr h)

Defined in Hyper.Syntax.Let

Methods

compare :: Let v expr h -> Let v expr h -> Ordering

(<) :: Let v expr h -> Let v expr h -> Bool

(<=) :: Let v expr h -> Let v expr h -> Bool

(>) :: Let v expr h -> Let v expr h -> Bool

(>=) :: Let v expr h -> Let v expr h -> Bool

max :: Let v expr h -> Let v expr h -> Let v expr h

min :: Let v expr h -> Let v expr h -> Let v expr h

Constraints (Let v expr h) Pretty => Pretty (Let v expr h)

Defined in Hyper.Syntax.Let

Methods

pPrintPrec :: PrettyLevel -> Rational -> Let v expr h -> Doc

pPrint :: Let v expr h -> Doc

pPrintList :: PrettyLevel -> [Let v expr h] -> Doc

type InferOf (Let _1 e)

Defined in Hyper.Syntax.Let

type InferOf (Let _1 e) = InferOf e

type HWitnessType (Let v expr)

Defined in Hyper.Syntax.Let

type HWitnessType (Let v expr) = W_Let v expr

type HNodesConstraint (Let v expr) constraint

Defined in Hyper.Syntax.Let

type HNodesConstraint (Let v expr) constraint = constraint expr

data MorphWitness (Let v expr0) (Let v expr1) _ _1

Defined in Hyper.Syntax.Let

data MorphWitness (Let v expr0) (Let v expr1) _ _1 where

• M_Let_expr :: forall v (expr0 :: HyperType) (expr1 :: HyperType). MorphWitness (Let v expr0) (Let v expr1) expr0 expr1

type MorphConstraint (Let v expr0) (Let v expr1) constraint

Defined in Hyper.Syntax.Let

type MorphConstraint (Let v expr0) (Let v expr1) constraint = constraint expr0 expr1

type Rep (Let v expr h)

Defined in Hyper.Syntax.Let

type Rep (Let v expr h) = D1 ('MetaData "Let" "Hyper.Syntax.Let" "hypertypes-0.2.2-9g9pX7Hb2mGI4yyssTDpOd" 'False) (C1 ('MetaCons "Let" 'PrefixI 'True) (S1 ('MetaSel ('Just "_letVar") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 v) :*: (S1 ('MetaSel ('Just "_letEquals") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (h :# expr)) :*: S1 ('MetaSel ('Just "_letIn") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (h :# expr)))))

letVar :: forall v expr h v. Lens (Let v expr h) (Let v expr h) v v

letEquals :: forall v expr h. Lens' (Let v expr h) ((:#) h expr)

letIn :: forall v expr h. Lens' (Let v expr h) ((:#) h expr)

data W_Let (v :: Type) (expr :: HyperType) node where

Constructors

W_Let_expr :: W_Let v expr expr

data family MorphWitness s t :: HyperType -> HyperType -> Type

Instances

data MorphWitness (ANode a) (ANode b) _ _1

Defined in Hyper.Combinator.ANode

data MorphWitness (ANode a) (ANode b) _ _1 where

• M_ANode :: forall (a :: HyperType) (b :: HyperType). MorphWitness (ANode a) (ANode b) a b

data MorphWitness (App expr0) (App expr1) _ _1

Defined in Hyper.Syntax.App

data MorphWitness (App expr0) (App expr1) _ _1 where

• M_App_expr :: forall (expr0 :: HyperType) (expr1 :: HyperType). MorphWitness (App expr0) (App expr1) expr0 expr1

data MorphWitness (FuncType typ0) (FuncType typ1) _ _1

Defined in Hyper.Syntax.FuncType

data MorphWitness (FuncType typ0) (FuncType typ1) _ _1 where

• M_FuncType_typ :: forall (typ0 :: HyperType) (typ1 :: HyperType). MorphWitness (FuncType typ0) (FuncType typ1) typ0 typ1

data MorphWitness (Lam v expr0) (Lam v expr1) _ _1

Defined in Hyper.Syntax.Lam

data MorphWitness (Lam v expr0) (Lam v expr1) _ _1 where

• M_Lam_expr :: forall v (expr0 :: HyperType) (expr1 :: HyperType). MorphWitness (Lam v expr0) (Lam v expr1) expr0 expr1

data MorphWitness (Let v expr0) (Let v expr1) _ _1

Defined in Hyper.Syntax.Let

data MorphWitness (Let v expr0) (Let v expr1) _ _1 where

• M_Let_expr :: forall v (expr0 :: HyperType) (expr1 :: HyperType). MorphWitness (Let v expr0) (Let v expr1) expr0 expr1

data MorphWitness (TermMap h expr0) (TermMap h expr1) _ _1

Defined in Hyper.Syntax.Map

data MorphWitness (TermMap h expr0) (TermMap h expr1) _ _1 where

• M_TermMap_expr :: forall h (expr0 :: HyperType) (expr1 :: HyperType). MorphWitness (TermMap h expr0) (TermMap h expr1) expr0 expr1

data MorphWitness (ToNom nomId term0) (ToNom nomId term1) _ _1

Defined in Hyper.Syntax.Nominal

data MorphWitness (ToNom nomId term0) (ToNom nomId term1) _ _1 where

• M_ToNom_term :: forall nomId (term0 :: HyperType) (term1 :: HyperType). MorphWitness (ToNom nomId term0) (ToNom nomId term1) term0 term1

data MorphWitness (Var v expr0) (Var v expr1) _ _1

Defined in Hyper.Syntax.Var

data MorphWitness (Var v expr0) (Var v expr1) _ _1

data MorphWitness (RowExtend key val0 rest0) (RowExtend key val1 rest1) _ _1

Defined in Hyper.Syntax.Row

data MorphWitness (RowExtend key val0 rest0) (RowExtend key val1 rest1) _ _1 where

• M_RowExtend_val :: forall key (val0 :: HyperType) (rest0 :: HyperType) (val1 :: HyperType) (rest1 :: HyperType). MorphWitness (RowExtend key val0 rest0) (RowExtend key val1 rest1) val0 val1
• M_RowExtend_rest :: forall key (val0 :: HyperType) (rest0 :: HyperType) (val1 :: HyperType) (rest1 :: HyperType). MorphWitness (RowExtend key val0 rest0) (RowExtend key val1 rest1) rest0 rest1

data MorphWitness (TypedLam var typ0 expr0) (TypedLam var typ1 expr1) _ _1

Defined in Hyper.Syntax.TypedLam

data MorphWitness (TypedLam var typ0 expr0) (TypedLam var typ1 expr1) _ _1 where

• M_TypedLam_typ :: forall var (typ0 :: HyperType) (expr0 :: HyperType) (typ1 :: HyperType) (expr1 :: HyperType). MorphWitness (TypedLam var typ0 expr0) (TypedLam var typ1 expr1) typ0 typ1
• M_TypedLam_expr :: forall var (typ0 :: HyperType) (expr0 :: HyperType) (typ1 :: HyperType) (expr1 :: HyperType). MorphWitness (TypedLam var typ0 expr0) (TypedLam var typ1 expr1) expr0 expr1