initEnv :: Env
initEnv = fromList [("true", Boolean True),
                    ("false", Boolean False),
                    ("+", Fn (stdFn lispAdd)),
                    ("let", Fn lispLet),
                    ("fn", Fn lispFn),
                    ("macro", Fn lispMacro),
                    ("eval", Fn lispEval),
                    ("def", Fn lispDef),
                    ("if", Fn lispIf),
                    ("cons", Fn lispCons),
                    ("first", Fn (stdFn lispFirst)),
                    ("rest", Fn (stdFn lispRest)),
                    ("print", Fn (stdFn lispPrint))]
initEnv :: Env
initEnv = fromList [("true", Boolean True),
                    ("false", Boolean False),
                    ("+", Fn (stdFn lispAdd)),
                    ("let", Fn lispLet),
                    ("fn", Fn lispFn),
                    ("macro", Fn lispMacro),
                    ("eval", Fn lispEval),
                    ("def", Fn lispDef),
                    ("if", Fn lispIf),
                    ("cons", Fn lispCons),
                    ("first", Fn (stdFn lispFirst)),
                    ("rest", Fn (stdFn lispRest)),
                    ("print", Fn (stdFn lispPrint))]
initEnv = fromList [("true", Boolean True),
                    ("false", Boolean False),
                    ("+", Fn (stdFn lispAdd)),
                    ("let", Fn lispLet),
                    ("fn", Fn lispFn),
                    ("macro", Fn lispMacro),
                    ("eval", Fn lispEval),
                    ("def", Fn lispDef),
                    ("if", Fn lispIf),
                    ("cons", Fn lispCons),
                    ("first", Fn (stdFn lispFirst)),
                    ("rest", Fn (stdFn lispRest)),
                    ("print", Fn (stdFn lispPrint))]