-- Converter functions
getConverter :: Type -> (EExp -> MRSIO EExp)
getConverter t = case t of
    TBool      -> calcBool
    TInt       -> calcExpInt
    TChar      -> calcChar
    TStr       -> calcString
    TFunc      -> calcFunc
    TArr _ _   -> calcArr
    TDict _ _  -> calcDict
getConverter :: Type -> (EExp -> MRSIO EExp)
getConverter t = case t of
    TBool      -> calcBool
    TInt       -> calcExpInt
    TChar      -> calcChar
    TStr       -> calcString
    TFunc      -> calcFunc
    TArr _ _   -> calcArr
    TDict _ _  -> calcDict
getConverter t = case t of
    TBool      -> calcBool
    TInt       -> calcExpInt
    TChar      -> calcChar
    TStr       -> calcString
    TFunc      -> calcFunc
    TArr _ _   -> calcArr
    TDict _ _  -> calcDict