showConstant :: Constant t -> String
showConstant (DoubleConst c) = show c ++ "f"
showConstant :: Constant t -> String
showConstant (DoubleConst c) = show c ++ "f"
showConstant (DoubleConst c) = show c ++ "f"