Problem:
Score: 300 points

Problem Statement

Consider an analog clock whose hour and minute hands are A and B centimeters long, respectively.

An endpoint of the hour hand and an endpoint of the minute hand are fixed at the same point, around which each hand rotates clockwise at constant angular velocity. It takes the hour and minute hands 12 hours and 1 hour to make one full rotation, respectively.

At 0 o'clock, the two hands overlap each other. H hours and M minutes later, what is the distance in centimeters between the unfixed endpoints of the hands?

Constraints

All values in input are integers.

1 \leq A, B \leq 1000

0 \leq H \leq 11

0 \leq M \leq 59

Input

Input is given from Standard Input in the following format:

A B H M

Output

Print the answer without units. Your output will be accepted when its absolute or relative error from the correct value is at most 10^{-9}.

Sample Input 1

3 4 9 0

Sample Output 1

5.00000000000000000000

The two hands will be in the positions shown in the figure below, so the answer is 5 centimeters.

Sample Input 2

3 4 10 40

Sample Output 2

4.56425719433005567605

The two hands will be in the positions shown in the figure below. Note that each hand always rotates at constant angular velocity.

Solution in OCaml (4.10.0) (judge verdict: Wrong Answer)

open Batteries
let a,b,h,m = Scanf.sscanf (read_line()) "%d %d %d %d" (fun a b h m -> a,b,h,m)
let get_hour_kakudo hour = (15 * (hour+3))
let get_minute_kakudo minutes = (6 * (minutes+15))
let pi = 4.0 *. atan 1.0
let f_a = float_of_int a
let f_b = float_of_int b
let _ = (
  if get_hour_kakudo h = get_minute_kakudo m then (float_of_int @@ abs (a-b)) else (
    let hour_x = f_a *. (cos @@ (((float_of_int @@ get_hour_kakudo h) /. 180.) *. pi))  in
    let hour_y = f_a *. (sin @@ (((float_of_int @@ get_hour_kakudo h) /. 180.) *. pi)) in
    let min_x = f_b *. (cos @@ (((float_of_int @@ get_minute_kakudo m) /. 180.) *. pi)) in
    let min_y = f_b *. (sin @@ (((float_of_int @@ get_minute_kakudo m) /. 180.) *. pi)) in
    (* Printf.printf "%.1f %.8f %.8f %.8f hour %d minutes %d\n" hour_x hour_y min_x min_y (get_hour_kakudo h) (get_minute_kakudo m); *)
    (((min_x -. hour_x) ** 2.) +. ((min_y -. hour_y) ** 2.)) |> sqrt
  )
) |> Printf.printf "%f\n"