From 9f984372801ed7e93c5e6e6182d190554f7c856b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andr=C3=A1s=20B=20Nagy?= <20251272+BNAndras@users.noreply.github.com> Date: Wed, 24 Apr 2024 21:27:44 -0700 Subject: [PATCH] Add eliud's eggs --- config.json | 8 ++++ .../eliuds-eggs/.docs/instructions.md | 8 ++++ .../eliuds-eggs/.docs/introduction.md | 47 +++++++++++++++++++ .../practice/eliuds-eggs/.meta/config.json | 19 ++++++++ .../practice/eliuds-eggs/.meta/example.el | 18 +++++++ .../practice/eliuds-eggs/.meta/tests.toml | 22 +++++++++ .../practice/eliuds-eggs/eliuds-eggs-test.el | 29 ++++++++++++ exercises/practice/eliuds-eggs/eliuds-eggs.el | 14 ++++++ 8 files changed, 165 insertions(+) create mode 100644 exercises/practice/eliuds-eggs/.docs/instructions.md create mode 100644 exercises/practice/eliuds-eggs/.docs/introduction.md create mode 100644 exercises/practice/eliuds-eggs/.meta/config.json create mode 100644 exercises/practice/eliuds-eggs/.meta/example.el create mode 100644 exercises/practice/eliuds-eggs/.meta/tests.toml create mode 100644 exercises/practice/eliuds-eggs/eliuds-eggs-test.el create mode 100644 exercises/practice/eliuds-eggs/eliuds-eggs.el diff --git a/config.json b/config.json index b651c5dc..766628f4 100644 --- a/config.json +++ b/config.json @@ -123,6 +123,14 @@ "math" ] }, + { + "slug": "eliuds-eggs", + "name": "Eliud's Eggs", + "uuid": "9e10bc23-bd92-4b67-9921-6ff7555d3774", + "practices": [], + "prerequisites": [], + "difficulty": 2 + }, { "slug": "gigasecond", "name": "Gigasecond", diff --git a/exercises/practice/eliuds-eggs/.docs/instructions.md b/exercises/practice/eliuds-eggs/.docs/instructions.md new file mode 100644 index 00000000..b0c2df59 --- /dev/null +++ b/exercises/practice/eliuds-eggs/.docs/instructions.md @@ -0,0 +1,8 @@ +# Instructions + +Your task is to count the number of 1 bits in the binary representation of a number. + +## Restrictions + +Keep your hands off that bit-count functionality provided by your standard library! +Solve this one yourself using other basic tools instead. diff --git a/exercises/practice/eliuds-eggs/.docs/introduction.md b/exercises/practice/eliuds-eggs/.docs/introduction.md new file mode 100644 index 00000000..49eaffd8 --- /dev/null +++ b/exercises/practice/eliuds-eggs/.docs/introduction.md @@ -0,0 +1,47 @@ +# Introduction + +Your friend Eliud inherited a farm from her grandma Tigist. +Her granny was an inventor and had a tendency to build things in an overly complicated manner. +The chicken coop has a digital display showing an encoded number representing the positions of all eggs that could be picked up. + +Eliud is asking you to write a program that shows the actual number of eggs in the coop. + +The position information encoding is calculated as follows: + +1. Scan the potential egg-laying spots and mark down a `1` for an existing egg or a `0` for an empty spot. +2. Convert the number from binary to decimal. +3. Show the result on the display. + +Example 1: + +```text +Chicken Coop: + _ _ _ _ _ _ _ +|E| |E|E| | |E| + +Resulting Binary: + 1 0 1 1 0 0 1 + +Decimal number on the display: +89 + +Actual eggs in the coop: +4 +``` + +Example 2: + +```text +Chicken Coop: + _ _ _ _ _ _ _ _ +| | | |E| | | | | + +Resulting Binary: + 0 0 0 1 0 0 0 0 + +Decimal number on the display: +16 + +Actual eggs in the coop: +1 +``` diff --git a/exercises/practice/eliuds-eggs/.meta/config.json b/exercises/practice/eliuds-eggs/.meta/config.json new file mode 100644 index 00000000..a718d4de --- /dev/null +++ b/exercises/practice/eliuds-eggs/.meta/config.json @@ -0,0 +1,19 @@ +{ + "authors": [ + "BNAndras" + ], + "files": { + "solution": [ + "eliuds-eggs.el" + ], + "test": [ + "eliuds-eggs-test.el" + ], + "example": [ + ".meta/example.el" + ] + }, + "blurb": "Help Eliud count the number of eggs in her chicken coop by counting the number of 1 bits in a binary representation.", + "source": "Christian Willner, Eric Willigers", + "source_url": "https://forum.exercism.org/t/new-exercise-suggestion-pop-count/7632/5" +} diff --git a/exercises/practice/eliuds-eggs/.meta/example.el b/exercises/practice/eliuds-eggs/.meta/example.el new file mode 100644 index 00000000..b2c34603 --- /dev/null +++ b/exercises/practice/eliuds-eggs/.meta/example.el @@ -0,0 +1,18 @@ +;;; eliuds-eggs.el --- Eliud's Eggs (exercism) -*- lexical-binding: t; -*- + +;;; Commentary: + +;;; Code: + + +(defun egg-count (number) + (let ((eggs 0)) + (while (> number 0) + (setq eggs (+ eggs (% number 2)) + number (truncate number 2))) + eggs)) + + +(provide 'eliuds-eggs) +;;; eliuds-eggs.el ends here + diff --git a/exercises/practice/eliuds-eggs/.meta/tests.toml b/exercises/practice/eliuds-eggs/.meta/tests.toml new file mode 100644 index 00000000..e11683c2 --- /dev/null +++ b/exercises/practice/eliuds-eggs/.meta/tests.toml @@ -0,0 +1,22 @@ +# 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. + +[559e789d-07d1-4422-9004-3b699f83bca3] +description = "0 eggs" + +[97223282-f71e-490c-92f0-b3ec9e275aba] +description = "1 egg" + +[1f8fd18f-26e9-4144-9a0e-57cdfc4f4ff5] +description = "4 eggs" + +[0c18be92-a498-4ef2-bcbb-28ac4b06cb81] +description = "13 eggs" diff --git a/exercises/practice/eliuds-eggs/eliuds-eggs-test.el b/exercises/practice/eliuds-eggs/eliuds-eggs-test.el new file mode 100644 index 00000000..1d36041c --- /dev/null +++ b/exercises/practice/eliuds-eggs/eliuds-eggs-test.el @@ -0,0 +1,29 @@ +;;; eliuds-eggs-test.el --- Eliud's Eggs (exercism) -*- lexical-binding: t; -*- + +;;; Commentary: + +;;; Code: + + +(load-file "eliuds-eggs.el") +(declare-function egg-count "eliuds-eggs.el" (number)) + + +(ert-deftest 0-eggs () + (should (= 0 (egg-count 0)))) + +(ert-deftest 1-egg () + (should (= 1 (egg-count 16)))) + + +(ert-deftest 4-eggs () + (should (= 4 (egg-count 89)))) + + +(ert-deftest 13-eggs () + (should (= 13 (egg-count 2000000000)))) + + +(provide 'eliuds-eggs-test) +;;; eliuds-eggs-test.el ends here + diff --git a/exercises/practice/eliuds-eggs/eliuds-eggs.el b/exercises/practice/eliuds-eggs/eliuds-eggs.el new file mode 100644 index 00000000..73e76022 --- /dev/null +++ b/exercises/practice/eliuds-eggs/eliuds-eggs.el @@ -0,0 +1,14 @@ +;;; eliuds-eggs.el --- Eliud's Eggs (exercism) -*- lexical-binding: t; -*- + +;;; Commentary: + +;;; Code: + + +(defun egg-count (number) + (error "Delete this S-Expression and write your own implementation")) + + +(provide 'eliuds-eggs) +;;; eliuds-eggs.el ends here +