git.iko.soy/project-m36
on 8b7e4e4 help sign in
project-m36/src/lib/ProjectM36/AtomFunctions/Basic.hs
15 lines 568 B history raw
1--atom functions on primitive atom values plus the basic atom functions
2module ProjectM36.AtomFunctions.Basic where
3import ProjectM36.Base
4import ProjectM36.DataTypes.Day
5import ProjectM36.DataTypes.Either
6import ProjectM36.DataTypes.Maybe
7import ProjectM36.AtomFunctions.Primitive
8import qualified Data.HashSet as HS
10basicAtomFunctions :: AtomFunctions
11basicAtomFunctions = HS.unions [primitiveAtomFunctions,
12 dayAtomFunctions,
13 eitherAtomFunctions,
14 maybeAtomFunctions]