repeatedParallelCubic ::
    (Integral a, Integral b) => [ModularEllipticCurve a] -> [Point a] -> b -> a -> Either [Point a] a
repeatedParallelCubic _ points 1 _ = Left points
repeatedParallelCubic ::
    (Integral a, Integral b) => [ModularEllipticCurve a] -> [Point a] -> b -> a -> Either [Point a] a
repeatedParallelCubic _ points 1 _ = Left points
repeatedParallelCubic _ points 1 _ = Left points