This commit is contained in:
Danil Negrienko 2024-08-21 17:59:36 -04:00
parent 64030231bf
commit b21db6b2f9
10 changed files with 392 additions and 0 deletions

View File

@ -0,0 +1,29 @@
{
"authors": [
"zporter"
],
"contributors": [
"aifrak",
"amencarini",
"angelikatyborska",
"Cohen-Carlisle",
"devonestes",
"neenjaw",
"parkerl",
"sotojuan"
],
"files": {
"solution": [
"lib/say.ex"
],
"test": [
"test/say_test.exs"
],
"example": [
".meta/example.ex"
]
},
"blurb": "Given a number from 0 to 999,999,999,999, spell out that number in English.",
"source": "A variation on the JavaRanch CattleDrive, Assignment 4",
"source_url": "https://coderanch.com/wiki/718804"
}

View File

@ -0,0 +1 @@
{"track":"elixir","exercise":"say","id":"85975fde45c04f6b8433af76568462eb","url":"https://exercism.org/tracks/elixir/exercises/say","handle":"negrienko","is_requester":true,"auto_approve":false}

View File

@ -0,0 +1,4 @@
# Used by "mix format"
[
inputs: ["{mix,.formatter}.exs", "{config,lib,test}/**/*.{ex,exs}"]
]

24
elixir/say/.gitignore vendored Normal file
View File

@ -0,0 +1,24 @@
# The directory Mix will write compiled artifacts to.
/_build/
# If you run "mix test --cover", coverage assets end up here.
/cover/
# The directory Mix downloads your dependencies sources to.
/deps/
# Where third-party dependencies like ExDoc output generated docs.
/doc/
# Ignore .fetch files in case you like to edit your project deps locally.
/.fetch
# If the VM crashes, it generates a dump, let's ignore it too.
erl_crash.dump
# Also ignore archive artifacts (built via "mix archive.build").
*.ez
# Ignore package tarball (built via "mix hex.build").
say-*.tar

75
elixir/say/HELP.md Normal file
View File

@ -0,0 +1,75 @@
# Help
## Running the tests
From the terminal, change to the base directory of the exercise then execute the tests with:
```bash
$ mix test
```
This will execute the test file found in the `test` subfolder -- a file ending in `_test.exs`
Documentation:
* [`mix test` - Elixir's test execution tool](https://hexdocs.pm/mix/Mix.Tasks.Test.html)
* [`ExUnit` - Elixir's unit test library](https://hexdocs.pm/ex_unit/ExUnit.html)
## Pending tests
In test suites of practice exercises, all but the first test have been tagged to be skipped.
Once you get a test passing, you can unskip the next one by commenting out the relevant `@tag :pending` with a `#` symbol.
For example:
```elixir
# @tag :pending
test "shouting" do
assert Bob.hey("WATCH OUT!") == "Whoa, chill out!"
end
```
If you wish to run all tests at once, you can include all skipped test by using the `--include` flag on the `mix test` command:
```bash
$ mix test --include pending
```
Or, you can enable all the tests by commenting out the `ExUnit.configure` line in the file `test/test_helper.exs`.
```elixir
# ExUnit.configure(exclude: :pending, trace: true)
```
## Useful `mix test` options
* `test/<FILE>.exs:LINENUM` - runs only a single test, the test from `<FILE>.exs` whose definition is on line `LINENUM`
* `--failed` - runs only tests that failed the last time they ran
* `--max-failures` - the suite stops evaluating tests when this number of test failures
is reached
* `--seed 0` - disables randomization so the tests in a single file will always be ran
in the same order they were defined in
## Submitting your solution
You can submit your solution using the `exercism submit lib/say.ex` command.
This command will upload your solution to the Exercism website and print the solution page's URL.
It's possible to submit an incomplete solution which allows you to:
- See how others have completed the exercise
- Request help from a mentor
## Need to get help?
If you'd like help solving the exercise, check the following pages:
- The [Elixir track's documentation](https://exercism.org/docs/tracks/elixir)
- The [Elixir track's programming category on the forum](https://forum.exercism.org/c/programming/elixir)
- [Exercism's programming category on the forum](https://forum.exercism.org/c/programming/5)
- The [Frequently Asked Questions](https://exercism.org/docs/using/faqs)
Should those resources not suffice, you could submit your (incomplete) solution to request mentoring.
If you're stuck on something, it may help to look at some of the [available resources](https://exercism.org/docs/tracks/elixir/resources) out there where answers might be found.

74
elixir/say/README.md Normal file
View File

@ -0,0 +1,74 @@
# Say
Welcome to Say on Exercism's Elixir Track.
If you need help running the tests or submitting your code, check out `HELP.md`.
## Instructions
Given a number from 0 to 999,999,999,999, spell out that number in English.
## Step 1
Handle the basic case of 0 through 99.
If the input to the program is `22`, then the output should be `'twenty-two'`.
Your program should complain loudly if given a number outside the blessed range.
Some good test cases for this program are:
- 0
- 14
- 50
- 98
- -1
- 100
### Extension
If you're on a Mac, shell out to Mac OS X's `say` program to talk out loud.
If you're on Linux or Windows, eSpeakNG may be available with the command `espeak`.
## Step 2
Implement breaking a number up into chunks of thousands.
So `1234567890` should yield a list like 1, 234, 567, and 890, while the far simpler `1000` should yield just 1 and 0.
## Step 3
Now handle inserting the appropriate scale word between those chunks.
So `1234567890` should yield `'1 billion 234 million 567 thousand 890'`
The program must also report any values that are out of range.
It's fine to stop at "trillion".
## Step 4
Put it all together to get nothing but plain English.
`12345` should give `twelve thousand three hundred forty-five`.
The program must also report any values that are out of range.
## Source
### Created by
- @zporter
### Contributed to by
- @aifrak
- @amencarini
- @angelikatyborska
- @Cohen-Carlisle
- @devonestes
- @neenjaw
- @parkerl
- @sotojuan
### Based on
A variation on the JavaRanch CattleDrive, Assignment 4 - https://coderanch.com/wiki/718804

74
elixir/say/lib/say.ex Normal file
View File

@ -0,0 +1,74 @@
defmodule Say do
@in_english_19 %{
1 => "one",
2 => "two",
3 => "three",
4 => "four",
5 => "five",
6 => "six",
7 => "seven",
8 => "eight",
9 => "nine",
10 => "ten",
11 => "eleven",
12 => "twelve",
13 => "thirteen",
14 => "fourteen",
15 => "fifteen",
16 => "sixteen",
17 => "seventeen",
18 => "eighteen",
19 => "nineteen"
}
@in_english_100 %{
2 => "twenty",
3 => "thirty",
4 => "forty",
5 => "fifty",
6 => "sixty",
7 => "seventy",
8 => "eighty",
9 => "ninety"
}
@doc """
Translate a positive integer into English.
"""
@spec in_english(integer) :: {atom, String.t()}
def in_english(number) when number < 0 or number > 999_999_999_999,
do: {:error, "number is out of range"}
def in_english(0), do: {:ok, "zero"}
def in_english(number) do
{:ok,
number
|> Integer.digits()
|> Enum.reverse()
|> Enum.chunk_every(3)
|> Enum.with_index(fn element, index -> in_english_part(element, index) end)
|> Enum.reverse()
|> List.flatten()
|> Enum.reject(&is_nil/1)
|> Enum.join(" ")
}
end
@spec in_english_part([integer], integer) :: String.t()
defp in_english_part([0, 0, 0], _index), do: []
defp in_english_part(element, 3), do: [do_in_english_part(element) | ["billion"]]
defp in_english_part(element, 2), do: [do_in_english_part(element) | ["million"]]
defp in_english_part(element, 1), do: [do_in_english_part(element) | ["thousand"]]
defp in_english_part(element, 0), do: [do_in_english_part(element)]
defp do_in_english_part([d1, d2, d3]) when d3 != 0, do: [@in_english_19[d3], "hundred" | [do_in_english_part([d1, d2])]]
defp do_in_english_part([d1, d2, 0]), do: do_in_english_part([d1, d2])
defp do_in_english_part([d1, d2]) when d2 < 2, do: @in_english_19[Integer.undigits([d2, d1])]
defp do_in_english_part([0, d2]) when d2 > 1, do: @in_english_100[d2]
defp do_in_english_part([d1, d2]) when d2 > 1,
do: @in_english_100[d2] <> "-" <> @in_english_19[d1]
defp do_in_english_part([d1]), do: @in_english_19[d1]
end

28
elixir/say/mix.exs Normal file
View File

@ -0,0 +1,28 @@
defmodule Say.MixProject do
use Mix.Project
def project do
[
app: :say,
version: "0.1.0",
# elixir: "~> 1.8",
start_permanent: Mix.env() == :prod,
deps: deps()
]
end
# Run "mix help compile.app" to learn about applications.
def application do
[
extra_applications: [:logger]
]
end
# Run "mix help deps" to learn about dependencies.
defp deps do
[
# {:dep_from_hexpm, "~> 0.3.0"},
# {:dep_from_git, git: "https://github.com/elixir-lang/my_dep.git", tag: "0.1.0"}
]
end
end

View File

@ -0,0 +1,81 @@
defmodule SayTest do
use ExUnit.Case
test "zero" do
assert Say.in_english(0) == {:ok, "zero"}
end
test "one" do
assert Say.in_english(1) == {:ok, "one"}
end
test "fourteen" do
assert Say.in_english(14) == {:ok, "fourteen"}
end
test "twenty" do
assert Say.in_english(20) == {:ok, "twenty"}
end
test "twenty-two" do
assert Say.in_english(22) == {:ok, "twenty-two"}
end
test "thirty" do
assert Say.in_english(30) == {:ok, "thirty"}
end
test "ninety-nine" do
assert Say.in_english(99) == {:ok, "ninety-nine"}
end
test "one hundred" do
assert Say.in_english(100) == {:ok, "one hundred"}
end
test "one hundred twenty-three" do
assert Say.in_english(123) == {:ok, "one hundred twenty-three"}
end
test "two hundred" do
assert Say.in_english(200) == {:ok, "two hundred"}
end
test "nine hundred ninety-nine" do
assert Say.in_english(999) == {:ok, "nine hundred ninety-nine"}
end
test "one thousand" do
assert Say.in_english(1_000) == {:ok, "one thousand"}
end
test "one thousand two hundred thirty-four" do
assert Say.in_english(1_234) == {:ok, "one thousand two hundred thirty-four"}
end
test "one million" do
assert Say.in_english(1_000_000) == {:ok, "one million"}
end
test "one million two thousand three hundred forty-five" do
assert Say.in_english(1_002_345) == {:ok, "one million two thousand three hundred forty-five"}
end
test "one billion" do
assert Say.in_english(1_000_000_000) == {:ok, "one billion"}
end
test "a big number" do
assert Say.in_english(987_654_321_123) ==
{:ok,
"nine hundred eighty-seven billion six hundred fifty-four million three hundred twenty-one thousand one hundred twenty-three"}
end
test "numbers below zero are out of range" do
assert Say.in_english(-1) == {:error, "number is out of range"}
end
test "numbers above 999,999,999,999 are out of range" do
assert Say.in_english(1_000_000_000_000) == {:error, "number is out of range"}
end
end

View File

@ -0,0 +1,2 @@
ExUnit.start()
ExUnit.configure(exclude: :pending, trace: true)