Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

yacht: Split into one deftest per test #695

Merged
merged 4 commits into from
Jan 11, 2025
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
97 changes: 97 additions & 0 deletions exercises/practice/yacht/.meta/tests.toml
Original file line number Diff line number Diff line change
@@ -0,0 +1,97 @@
# This is an auto-generated file.
#
# Regenerating this file via `configlet sync` will:
# - Recreate every `description` key/value pair
# - Recreate every `reimplements` key/value pair, where they exist in problem-specifications
# - Remove any `include = true` key/value pair (an omitted `include` key implies inclusion)
# - Preserve any other key/value pair
#
# As user-added comments (using the # character) will be removed when this file
# is regenerated, comments can be added via a `comment` key.

[3060e4a5-4063-4deb-a380-a630b43a84b6]
description = "Yacht"

[15026df2-f567-482f-b4d5-5297d57769d9]
description = "Not Yacht"

[36b6af0c-ca06-4666-97de-5d31213957a4]
description = "Ones"

[023a07c8-6c6e-44d0-bc17-efc5e1b8205a]
description = "Ones, out of order"

[7189afac-cccd-4a74-8182-1cb1f374e496]
description = "No ones"

[793c4292-dd14-49c4-9707-6d9c56cee725]
description = "Twos"

[dc41bceb-d0c5-4634-a734-c01b4233a0c6]
description = "Fours"

[f6125417-5c8a-4bca-bc5b-b4b76d0d28c8]
description = "Yacht counted as threes"

[464fc809-96ed-46e4-acb8-d44e302e9726]
description = "Yacht of 3s counted as fives"

[d054227f-3a71-4565-a684-5c7e621ec1e9]
description = "Fives"

[e8a036e0-9d21-443a-8b5f-e15a9e19a761]
description = "Sixes"

[51cb26db-6b24-49af-a9ff-12f53b252eea]
description = "Full house two small, three big"

[1822ca9d-f235-4447-b430-2e8cfc448f0c]
description = "Full house three small, two big"

[b208a3fc-db2e-4363-a936-9e9a71e69c07]
description = "Two pair is not a full house"

[b90209c3-5956-445b-8a0b-0ac8b906b1c2]
description = "Four of a kind is not a full house"

[32a3f4ee-9142-4edf-ba70-6c0f96eb4b0c]
description = "Yacht is not a full house"

[b286084d-0568-4460-844a-ba79d71d79c6]
description = "Four of a Kind"

[f25c0c90-5397-4732-9779-b1e9b5f612ca]
description = "Yacht can be scored as Four of a Kind"

[9f8ef4f0-72bb-401a-a871-cbad39c9cb08]
description = "Full house is not Four of a Kind"

[b4743c82-1eb8-4a65-98f7-33ad126905cd]
description = "Little Straight"

[7ac08422-41bf-459c-8187-a38a12d080bc]
description = "Little Straight as Big Straight"

[97bde8f7-9058-43ea-9de7-0bc3ed6d3002]
description = "Four in order but not a little straight"

[cef35ff9-9c5e-4fd2-ae95-6e4af5e95a99]
description = "No pairs but not a little straight"

[fd785ad2-c060-4e45-81c6-ea2bbb781b9d]
description = "Minimum is 1, maximum is 5, but not a little straight"

[35bd74a6-5cf6-431a-97a3-4f713663f467]
description = "Big Straight"

[87c67e1e-3e87-4f3a-a9b1-62927822b250]
description = "Big Straight as little straight"

[c1fa0a3a-40ba-4153-a42d-32bc34d2521e]
description = "No pairs but not a big straight"

[207e7300-5d10-43e5-afdd-213e3ac8827d]
description = "Choice"

[b524c0cf-32d2-4b40-8fb3-be3500f3f135]
description = "Yacht as choice"
5 changes: 4 additions & 1 deletion exercises/practice/yacht/src/yacht.clj
Original file line number Diff line number Diff line change
@@ -1,4 +1,7 @@
(ns yacht)

(defn score []
(defn score
"Given five dice and a category, it calculates the score of the dice for that category"
[dice category]
;; function body
)
122 changes: 87 additions & 35 deletions exercises/practice/yacht/test/yacht_test.clj
Original file line number Diff line number Diff line change
@@ -1,67 +1,119 @@
(ns yacht-test
(:require [clojure.test :refer [deftest testing is run-tests]]
(:require [clojure.test :refer [deftest testing is]]
yacht))

(deftest score-test
(deftest score_test_1
(testing "Yacht"
(is (= 50 (yacht/score [5 5 5 5 5] "yacht"))))
(is (= 50 (yacht/score [5 5 5 5 5] "yacht")))))

(deftest score_test_2
(testing "Not Yacht"
(is (= 0 (yacht/score [1 3 3 2 5] "yacht"))))
(is (= 0 (yacht/score [1 3 3 2 5] "yacht")))))

(deftest score_test_3
(testing "Ones"
(is (= 3 (yacht/score [1 1 1 3 5] "ones"))))
(is (= 3 (yacht/score [1 1 1 3 5] "ones")))))

(deftest score_test_4
(testing "Ones, out of order"
(is (= 3 (yacht/score [3 1 1 5 1] "ones"))))
(is (= 3 (yacht/score [3 1 1 5 1] "ones")))))

(deftest score_test_5
(testing "No ones"
(is (= 0 (yacht/score [4 3 6 5 5] "ones"))))
(is (= 0 (yacht/score [4 3 6 5 5] "ones")))))

(deftest score_test_6
(testing "Twos"
(is (= 2 (yacht/score [2 3 4 5 6] "twos"))))
(is (= 2 (yacht/score [2 3 4 5 6] "twos")))))

(deftest score_test_7
(testing "Fours"
(is (= 8 (yacht/score [1 4 1 4 1] "fours"))))
(is (= 8 (yacht/score [1 4 1 4 1] "fours")))))

(deftest score_test_8
(testing "Yacht counted as threes"
(is (= 15 (yacht/score [3 3 3 3 3] "threes"))))
(is (= 15 (yacht/score [3 3 3 3 3] "threes")))))

(deftest score_test_9
(testing "Yacht of 3s counted as fives"
(is (= 0 (yacht/score [3 3 3 3 3] "fives"))))
(is (= 0 (yacht/score [3 3 3 3 3] "fives")))))

(deftest score_test_10
(testing "Fives"
(is (= 10 (yacht/score [1 5 3 5 3] "fives"))))
(is (= 10 (yacht/score [1 5 3 5 3] "fives")))))

(deftest score_test_11
(testing "Sixes"
(is (= 6 (yacht/score [2 3 4 5 6] "sixes"))))
(is (= 6 (yacht/score [2 3 4 5 6] "sixes")))))

(deftest score_test_12
(testing "Full house two small, three big"
(is (= 16 (yacht/score [2 2 4 4 4] "full house"))))
(is (= 16 (yacht/score [2 2 4 4 4] "full house")))))

(deftest score_test_13
(testing "Full house three small, two big"
(is (= 19 (yacht/score [5 3 3 5 3] "full house"))))
(is (= 19 (yacht/score [5 3 3 5 3] "full house")))))

(deftest score_test_14
(testing "Two pair is not a full house"
(is (= 0 (yacht/score [2 2 4 4 5] "full house"))))
(is (= 0 (yacht/score [2 2 4 4 5] "full house")))))

(deftest score_test_15
(testing "Four of a kind is not a full house"
(is (= 0 (yacht/score [1 4 4 4 4] "full house"))))
(is (= 0 (yacht/score [1 4 4 4 4] "full house")))))

(deftest score_test_16
(testing "Yacht is not a full house"
(is (= 0 (yacht/score [2 2 2 2 2] "full house"))))
(is (= 0 (yacht/score [2 2 2 2 2] "full house")))))

(deftest score_test_17
(testing "Four of a Kind"
(is (= 24 (yacht/score [6 6 4 6 6] "four of a kind"))))
(is (= 24 (yacht/score [6 6 4 6 6] "four of a kind")))))

(deftest score_test_18
(testing "Yacht can be scored as Four of a Kind"
(is (= 12 (yacht/score [3 3 3 3 3] "four of a kind"))))
(is (= 12 (yacht/score [3 3 3 3 3] "four of a kind")))))

(deftest score_test_19
(testing "Full house is not Four of a Kind"
(is (= 0 (yacht/score [3 3 3 5 5] "four of a kind"))))
(is (= 0 (yacht/score [3 3 3 5 5] "four of a kind")))))

(deftest score_test_20
(testing "Little Straight"
(is (= 30 (yacht/score [3 5 4 1 2] "little straight"))))
(is (= 30 (yacht/score [3 5 4 1 2] "little straight")))))

(deftest score_test_21
(testing "Little Straight as Big Straight"
(is (= 0 (yacht/score [1 2 3 4 5] "big straight"))))
(is (= 0 (yacht/score [1 2 3 4 5] "big straight")))))

(deftest score_test_22
(testing "Four in order but not a little straight"
(is (= 0 (yacht/score [1 1 2 3 4] "little straight"))))
(is (= 0 (yacht/score [1 1 2 3 4] "little straight")))))

(deftest score_test_23
(testing "No pairs but not a little straight"
(is (= 0 (yacht/score [1 2 3 4 6] "little straight"))))
(is (= 0 (yacht/score [1 2 3 4 6] "little straight")))))

(deftest score_test_24
(testing "Minimum is 1, maximum is 5, but not a little straight"
(is (= 0 (yacht/score [1 1 3 4 5] "little straight"))))
(is (= 0 (yacht/score [1 1 3 4 5] "little straight")))))

(deftest score_test_25
(testing "Big Straight"
(is (= 30 (yacht/score [4 6 2 5 3] "big straight"))))
(is (= 30 (yacht/score [4 6 2 5 3] "big straight")))))

(deftest score_test_26
(testing "Big Straight as little straight"
(is (= 0 (yacht/score [6 5 4 3 2] "little straight"))))
(is (= 0 (yacht/score [6 5 4 3 2] "little straight")))))

(deftest score_test_27
(testing "No pairs but not a big straight"
(is (= 0 (yacht/score [6 5 4 3 1] "big straight"))))
(is (= 0 (yacht/score [6 5 4 3 1] "big straight")))))

(deftest score_test_28
(testing "Choice"
(is (= 23 (yacht/score [3 3 5 6 6] "choice"))))
(testing "Yacht as choice"
(is (= 10 (yacht/score [2 2 2 2 2] "choice")))))
(is (= 23 (yacht/score [3 3 5 6 6] "choice")))))

(comment
(run-tests)
)
(deftest score_test_29
(testing "Yacht as choice"
(is (= 10 (yacht/score [2 2 2 2 2] "choice")))))