let [|a;b|] = stdin.ReadLine().Split() |> Array.map int

let [|x;y|] = (if (a > b) then [|a;b|] else [|b;a|])

let rec gcd k l =
 match l with
 |0 -> k
 |_ -> gcd l (k % l)

let f x = int64 x

((f a) * (f b)) / (f (gcd x y))
|>stdout.WriteLine