let scan4 f = stdin.ReadLine().Split() |> Array.map f |> (fun a -> (a.[0], a.[1], a.[2], a.[3]))

let rot vx vy = -vy,vx 
let nextp x0 y0 x1 y1 =
  let dx,dy = rot (x1-x0) (y1-y0)
  x1+dx, y1+dy

let x1,y1,x2,y2 = scan4 int
let x3,y3 = nextp x1 y1 x2 y2 
let x4,y4 = nextp x2 y2 x3 y3
printfn "%d %d %d %d" x3 y3 x4 y4
