Scanf.scanf "%d %d %d" (fun d a b ->
    Printf.printf "%d\n" @@ d * min a b
)