From 37e2504f6f82e078f441198187ff0526dbcab490 Mon Sep 17 00:00:00 2001 From: Arnav Borborah Date: Sat, 1 Jun 2024 13:56:47 -0400 Subject: [PATCH] Add missing file --- Converters.fs | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 Converters.fs diff --git a/Converters.fs b/Converters.fs new file mode 100644 index 0000000..b751260 --- /dev/null +++ b/Converters.fs @@ -0,0 +1,10 @@ +module JimBroBot.Converters + +open JimBroBot.DomainTypes + +let stringToExerciseType str = + match str with + | "set" -> SetBased + | "speed" -> SpeedBased + | "time" -> TimeBased + | _ -> failwith "Unexpected exercise type"