tracks/fsharp/exercises/all-your-base/Example.fs in trackler-2.2.1.88 vs tracks/fsharp/exercises/all-your-base/Example.fs in trackler-2.2.1.89
- old
+ new
@@ -17,14 +17,14 @@
if digit >= b then None else
loop (acc * b + digit) rest
loop 0 nums
-let rebase inB inDigits outB =
- match inB < 2 || outB < 2 with
+let rebase digits inputBase outputBase =
+ match inputBase < 2 || outputBase < 2 with
| true ->
None
| false ->
- inDigits
+ digits
|> List.skipWhile ((=) 0)
- |> fromBase inB
- |> Option.bind (toBase outB)
+ |> fromBase inputBase
+ |> Option.bind (toBase outputBase)
\ No newline at end of file