Skip to content
This repository was archived by the owner on Aug 13, 2020. It is now read-only.

Commit fe0a03e

Browse files
committed
Adds comment to test and removes unnecessary whitespace.
1 parent 65f2a41 commit fe0a03e

File tree

1 file changed

+4
-3
lines changed

1 file changed

+4
-3
lines changed

Numsense/Portuguese.fs

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,7 @@ open System.Diagnostics
55

66
let rec internal toPortugueseImp x =
77

8-
// Concatenates classes of numbers and simplifies some cases like trailing zeros
8+
// Concatenates classes of numbers and simplifies some cases like zero
99
let formatSimple prefix factor number =
1010
let remainder = number % factor
1111

@@ -15,15 +15,16 @@ let rec internal toPortugueseImp x =
1515

1616
let remainderHundreds = remainder |> getRemainderHundreds
1717

18-
let outputWithComma() = sprintf "%s, %s" prefix (toPortugueseImp remainder)
19-
let outputWithAnd() = sprintf "%s e %s" prefix (toPortugueseImp remainder)
18+
let outputWithComma() = sprintf "%s, %s" prefix (toPortugueseImp remainder)
19+
let outputWithAnd() = sprintf "%s e %s" prefix (toPortugueseImp remainder)
2020

2121
match remainder, remainderHundreds with
2222
| 0, _ -> prefix
2323
| _, r when r > 0 && r <= 100 -> outputWithAnd()
2424
| _, r when r > 100 && r % 100 = 0 -> outputWithAnd()
2525
| _ -> outputWithComma()
2626

27+
// Formats numbers that can be represented in different ways
2728
let format' suffixPlural suffixSingular factor value ignoreOne =
2829
let digits = value / factor
2930
match digits, ignoreOne with

0 commit comments

Comments
 (0)