%$      !"#(C) 2015 Oleg GrenrusBSD3"Oleg Grenrus <oleg.grenrus@iki.fi>None!"&'(+-./0123468=HJKM  Interleaving k3 | 9 . . . . 2 | 5 8 . . . 1 | 2 4 7 11 . 0 | 0 1 3 6 10 ----------------- 0 1 2 3 4This can be calculated by f x y = sum ([0..x+y]) + yA helper type family for encodeTaggedFile and decodeTaggedFile.The default definition is  a = 0Type class providing  for each data type.For regular non-recursive ADTs  can be derived generically. ndata Record = Record { a :: Int, b :: Bool, c :: [Char] } deriving (Generic) instance hasStructuralInfo Record0For stable types, you can provide only type name instance HasStructuralInfo Int where structuralInfo = ghcNominalType -- infer name from Generic information instance HasStructuralInfo Integer where structuralInfo _ = NominalType "Integer"SRecursive type story is a bit sad atm. If the type structure is stable, you can do: _instance HasStructuralInfo a => HasStructuralInfo [a] where structuralInfo = ghcStructuralInfo15Data type structure, with (some) nominal information. -Type the semantic version is serialised with. $R serialisable class, which tries to be less error-prone to data structure changes.8Values are serialised with header consisting of version v and hash of .Tagged version of %Tagged version of &Tagged version of 'Tagged version of (Tagged version of )Tagged version of *+=Version and structure hash are prepended to serialised stream| ,-. !"#/0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~+$  !"#$     "!#u   ,-. !"#/0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~+       !"#$%&$'($')$'*$'+$',$'-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~binary-tagged-0.1.0.0Data.Binary.TaggedSumUpTo InterleaveHasSemanticVersionSemanticVersionHasStructuralInfostructuralInfoStructuralInfoNominalNewtype NominalTypeVersion BinaryTagged' BinaryTaggedunBinaryTagged binaryTag binaryTag' binaryUntag binaryUntag' taggedEncode taggedDecodetaggedDecodeOrFailtaggedEncodeFiletaggedDecodeFiletaggedDecodeFileOrFailstructuralInfoSha1Digest"structuralInfoSha1ByteStringDigestghcStructuralInfoghcNominalTypeghcStructuralInfo1sopStructuralInfosopStructuralInfoSsopNominalTypesopNominalTypeSsopStructuralInfo1sopStructuralInfo1Sbinary-0.7.1.0Data.Binary.ClassBinary Data.Binaryencodedecode decodeOrFail encodeFile decodeFiledecodeFileOrFail$fBinaryBinaryTaggedsopNominalNewtype sopNominalAdtsopStructuralInfoP datatypeNametoNPtoNP'$fHasSemanticVersionValue$fHasStructuralInfoValue$fHasSemanticVersionLocalTime$fHasSemanticVersionTimeOfDay$fHasSemanticVersionTimeZone$fHasSemanticVersionDay#$fHasSemanticVersionNominalDiffTime!$fHasSemanticVersionUniversalTime$fHasSemanticVersionDiffTime$fHasSemanticVersionUTCTime$fHasStructuralInfoLocalTime$fHasStructuralInfoTimeOfDay$fHasStructuralInfoTimeZone$fHasStructuralInfoDay"$fHasStructuralInfoNominalDiffTime $fHasStructuralInfoUniversalTime$fHasStructuralInfoDiffTime$fHasStructuralInfoUTCTime$fHasSemanticVersionVector$fHasStructuralInfoVector$fHasSemanticVersionVector0$fHasStructuralInfoVector0$fHasSemanticVersionVector1$fHasStructuralInfoVector1$fHasSemanticVersionUArray$fHasStructuralInfoUArray$fHasSemanticVersionArray$fHasStructuralInfoArray$fHasSemanticVersionHashSet$fHasStructuralInfoHashSet$fHasSemanticVersionHashMap$fHasStructuralInfoHashMap$fHasSemanticVersionSet$fHasStructuralInfoSet$fHasSemanticVersionSeq$fHasStructuralInfoSeq$fHasSemanticVersionMap$fHasStructuralInfoMap$fHasSemanticVersionIntSet$fHasStructuralInfoIntSet$fHasSemanticVersionIntMap$fHasStructuralInfoIntMap$fHasSemanticVersionText$fHasSemanticVersionText0$fHasStructuralInfoText$fHasStructuralInfoText0$fHasSemanticVersionByteString$fHasSemanticVersionByteString0$fHasStructuralInfoByteString$fHasStructuralInfoByteString0$fHasSemanticVersionProduct$fHasStructuralInfoProduct$fHasSemanticVersionSum$fHasStructuralInfoSum$fHasStructuralInfo(,,,)$fHasStructuralInfo(,,)$fHasStructuralInfo(,)$fHasSemanticVersionEither$fHasStructuralInfoEither$fHasSemanticVersionMaybe$fHasStructuralInfoMaybe$fHasSemanticVersion[]$fHasStructuralInfo[]$fHasStructuralInfoWord64$fHasStructuralInfoWord32$fHasStructuralInfoWord16$fHasStructuralInfoWord8$fHasStructuralInfoInt64$fHasStructuralInfoInt32$fHasStructuralInfoInt16$fHasStructuralInfoInt8$fHasStructuralInfoInteger$fHasStructuralInfoInt$fHasStructuralInfoChar$fHasStructuralInfoBool"$fHasSemanticVersionStructuralInfo!$fHasStructuralInfoStructuralInfo$fBinaryStructuralInfo$fMonoidBinaryTagged$fMonadBinaryTagged$fApplicativeBinaryTagged