:def vis    \_ -> return $ "GHC.Vis.visualization"
:def view   \x -> return $ "GHC.Vis.view (" ++ x ++ ") " ++ show x
:def eval   \x -> return $ "GHC.Vis.eval \"" ++ x ++ "\""
:def switch \_ -> return $ "GHC.Vis.switch"
:def update \_ -> return $ "GHC.Vis.update"
:def clear  \_ -> return $ "GHC.Vis.clear"
:def export \x -> return $ "GHC.Vis.export " ++ show x