Îõ³h$]”Û      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZNone-/ÉÖןExtensible products(c) Samuel Schlesinger 2020MITsgschlesinger@gmail.com experimental non-portableNone&+-./0>?ÀÁÂÉÊÔÖ×Ùì summerA class for folding over a æ using a function which only requires that every element of the product satisfy a certain constraint.summer9A class for constructing the select function inductively.summer:Extracts the fields intended from the given selector type.summerÕA typeclass for creating a selection function which is valid on the given definition.summerÃA typeclass to rearrange and possibly remove things from a product. summerÚA typeclass that is useful to define the scott encoding/decoding for extensible products.summer8This is a reified pattern match on an extensible productsummerÄType family for replacing one type in a type level list with anothersummeráA class that is used for convenience in order to make certain type signatures read more clearly.summerÄA type family for computing the initial segment of a type level listsummer9A type family for computing the tail of a type level listsummer;A type family for computing the length of a type level listsummer/A type family for indexing into lists of types.summerÃA type family for computing the index of a type in a list of types.summer8A type for constructing products with linear memory use.summerAn extensible product typesummer(Lens to modify one element of a product.summer#Cons an element onto the head of a .summerEmpty .summer Execute a , pulling out a .summer Appends two s.summerÂComputes the index of the given type in the given type level list.summer%Extract a value at a particular index summer2Takes the tail of a product after the nth element.!summer0Takes the initial length n segment of a product."summer÷Drop the first element of a product. Sometimes needed for better type inference and less piping around of constraints.#summer-Replaces one type with another via a function(  !"#$%&'( !" $%'&#Extensible sums(c) Samuel Schlesinger 2020MITsgschlesinger@gmail.com experimental non-portableNone&-./0>?ÀÁÂÉÊÔÖ×Ùàèì\3summerÞUsing functions which only require constraints which are satisfied by all members of the sum.5summer6A utility typeclass which makes the implementation of 6 cleaner.6summer.A typeclass for scott encoding extensible sums:summer'The scott encoding of an extensible sum;summerÄTransforming one sum into a sum which contains all of the same types=summer›A class which checks that every type has the same tag in the first list as the second. In other words, checks if the first list is a prefix of the other.>summer5A type family for deleting the given type from a list?summeráA class that is used for convenience in order to make certain type signatures read more clearly.@summerœA type family for computing the tag of a given type in an extensible sum. In practice, this means computing the first index of the given type in the list.AsummeràThe extensible sum type, allowing inhabitants to be of any of the types in the given type list.BsummerâA pattern to match on for convenience. Without this, the user facing interface is rather baroque.Csummer0A prism which operates on a chosen variant of a ADsummerÀComputes the tag of the given type in the given type level list.Esummer'Injects a type into the extensible sum.Fsummer1Inspects an extensible sum for a particular type.GsummerÒConsider a certain type, discarding it as an option if it is not the correct one.HsummerâConsider the first type in the list of possibilities, a useful specialization for type inference.Isummer,Transforms one type in the sum into another.Jsummer?Transform one type in one sum into another type in another sum.KsummeríA free version of weakening, where all you're doing is adding more possibilities at exclusively higher tags.Msummer%Testing extensible sums for equality.3456798:;<=>?@ABCDEFGHIJKABDEFGHC67985@?>=:;?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ß%summer-0.3.4.0-CxvUMMfNyw9HjeN3tlnPfW Data.Prodder Data.Summer Data.ForAllForAllFoldProdfoldProd SelectionselectFieldsFromSelectorSelector Strengthen strengthenPConsumeconsumeproduceBextend1cmapConsumerReplace<> HasIndexInInitTailLengthIndexIndexIn ProdBuilderProdatTypeconsBemptyB buildProdappendBindexextracttailNinitN dropFirstremapproduceempty strengthentoList$fEqProd $fEqProd0$fHasIndexInkxxs $fConsume: $fConsume[]$fStrengthenxs[]$fStrengthenxs:$fSelectiondef->a$fSelectiondefaa $fFoldProdc: $fFoldProdc[] ApplyFunctionapplyUnmatchMatchmatchunmatchoverrideMatcherWeakenweakenHaveSameTagsInDeleteHasTagInTagInSumInjvarianttaginjectinspectconsider considerFirstinmapsmap noOpWeaken$fEqSum$fEqSum0 $fGenericSum $fGenericSum0$fHasTagInkxxs$fHaveSameTagsIn[][]::$fHaveSameTagsIn[]k[]ys $fWeaken[]ys $fWeaken:ys $fMatch[] $fUnmatch:ys $fUnmatch[]ys$fMatch:$fApplyFunctionc:$fApplyFunctionc[]