mult :: Int -> Elliptic -> Elliptic mult n = mconcat . replicate n