ret4 x1 y1 x2 y2 =
    (x1 - (y2 - y1), y1 + (x2 - x1))

ret3 x1 y1 x2 y2 =
    (x2 + (y1 - y2), y2 - (x1 - x2))


main = do
    input <- getLine
    let [x1, y1, x2, y2] = map read $ words input
    let (x3, y3) = ret3 x1 y1 x2 y2
        (x4, y4) = ret4 x1 y1 x2 y2
    putStr $ (show x3) ++ " "
    putStr $ (show y3) ++ " "
    putStr $ (show x4) ++ " "
    putStrLn $ (show y4)