diff --git a/config.json b/config.json index f7423bf..c7ba4e4 100644 --- a/config.json +++ b/config.json @@ -602,6 +602,14 @@ "prerequisites": [], "difficulty": 4 }, + { + "slug": "sublist", + "name": "Sublist", + "uuid": "e8c87596-3db8-422b-8fda-7e49957aac30", + "practices": [], + "prerequisites": [], + "difficulty": 4 + }, { "slug": "transpose", "name": "Transpose", diff --git a/exercises/practice/sublist/.busted b/exercises/practice/sublist/.busted new file mode 100644 index 0000000..86b84e7 --- /dev/null +++ b/exercises/practice/sublist/.busted @@ -0,0 +1,5 @@ +return { + default = { + ROOT = { '.' } + } +} diff --git a/exercises/practice/sublist/.docs/instructions.md b/exercises/practice/sublist/.docs/instructions.md new file mode 100644 index 0000000..8228edc --- /dev/null +++ b/exercises/practice/sublist/.docs/instructions.md @@ -0,0 +1,25 @@ +# Instructions + +Given any two lists `A` and `B`, determine if: + +- List `A` is equal to list `B`; or +- List `A` contains list `B` (`A` is a superlist of `B`); or +- List `A` is contained by list `B` (`A` is a sublist of `B`); or +- None of the above is true, thus lists `A` and `B` are unequal + +Specifically, list `A` is equal to list `B` if both lists have the same values in the same order. +List `A` is a superlist of `B` if `A` contains a contiguous sub-sequence of values equal to `B`. +List `A` is a sublist of `B` if `B` contains a contiguous sub-sequence of values equal to `A`. + +Examples: + +- If `A = []` and `B = []` (both lists are empty), then `A` and `B` are equal +- If `A = [1, 2, 3]` and `B = []`, then `A` is a superlist of `B` +- If `A = []` and `B = [1, 2, 3]`, then `A` is a sublist of `B` +- If `A = [1, 2, 3]` and `B = [1, 2, 3, 4, 5]`, then `A` is a sublist of `B` +- If `A = [3, 4, 5]` and `B = [1, 2, 3, 4, 5]`, then `A` is a sublist of `B` +- If `A = [3, 4]` and `B = [1, 2, 3, 4, 5]`, then `A` is a sublist of `B` +- If `A = [1, 2, 3]` and `B = [1, 2, 3]`, then `A` and `B` are equal +- If `A = [1, 2, 3, 4, 5]` and `B = [2, 3, 4]`, then `A` is a superlist of `B` +- If `A = [1, 2, 4]` and `B = [1, 2, 3, 4, 5]`, then `A` and `B` are unequal +- If `A = [1, 2, 3]` and `B = [1, 3, 2]`, then `A` and `B` are unequal diff --git a/exercises/practice/sublist/.meta/config.json b/exercises/practice/sublist/.meta/config.json new file mode 100644 index 0000000..7719fd8 --- /dev/null +++ b/exercises/practice/sublist/.meta/config.json @@ -0,0 +1,17 @@ +{ + "authors": [ + "glennj" + ], + "files": { + "solution": [ + "sublist.moon" + ], + "test": [ + "sublist_spec.moon" + ], + "example": [ + ".meta/example.moon" + ] + }, + "blurb": "Write a function to determine if a list is a sublist of another list." +} diff --git a/exercises/practice/sublist/.meta/example.moon b/exercises/practice/sublist/.meta/example.moon new file mode 100644 index 0000000..8bb0a52 --- /dev/null +++ b/exercises/practice/sublist/.meta/example.moon @@ -0,0 +1,23 @@ +-- is b contained within a +contains = (a, b) -> + for i = 1, #a - #b + 1 + if a[i] == b[1] + found = true + for j = 2, #b + if a[i + j - 1] != b[j] + found = false + break + return true if found + false + +{ + sublist: (list1, list2) -> + if #list1 < #list2 and contains list2, list1 + 'sublist' + elseif #list1 > #list2 and contains list1, list2 + 'superlist' + elseif contains list1, list2 + 'equal' + else + 'unequal' +} diff --git a/exercises/practice/sublist/.meta/spec_generator.moon b/exercises/practice/sublist/.meta/spec_generator.moon new file mode 100644 index 0000000..38b81cf --- /dev/null +++ b/exercises/practice/sublist/.meta/spec_generator.moon @@ -0,0 +1,13 @@ +import int_list from require 'test_helpers' + +{ + module_imports: {'sublist'}, + + generate_test: (case, level) -> + lines = { + "listOne = #{int_list case.input.listOne}" + "listTwo = #{int_list case.input.listTwo}" + "assert.are.equal #{quote case.expected}, sublist listOne, listTwo" + } + table.concat [indent line, level for line in *lines], '\n' +} diff --git a/exercises/practice/sublist/.meta/tests.toml b/exercises/practice/sublist/.meta/tests.toml new file mode 100644 index 0000000..de5020a --- /dev/null +++ b/exercises/practice/sublist/.meta/tests.toml @@ -0,0 +1,64 @@ +# 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. + +[97319c93-ebc5-47ab-a022-02a1980e1d29] +description = "empty lists" + +[de27dbd4-df52-46fe-a336-30be58457382] +description = "empty list within non empty list" + +[5487cfd1-bc7d-429f-ac6f-1177b857d4fb] +description = "non empty list contains empty list" + +[1f390b47-f6b2-4a93-bc23-858ba5dda9a6] +description = "list equals itself" + +[7ed2bfb2-922b-4363-ae75-f3a05e8274f5] +description = "different lists" + +[3b8a2568-6144-4f06-b0a1-9d266b365341] +description = "false start" + +[dc39ed58-6311-4814-be30-05a64bc8d9b1] +description = "consecutive" + +[d1270dab-a1ce-41aa-b29d-b3257241ac26] +description = "sublist at start" + +[81f3d3f7-4f25-4ada-bcdc-897c403de1b6] +description = "sublist in middle" + +[43bcae1e-a9cf-470e-923e-0946e04d8fdd] +description = "sublist at end" + +[76cf99ed-0ff0-4b00-94af-4dfb43fe5caa] +description = "at start of superlist" + +[b83989ec-8bdf-4655-95aa-9f38f3e357fd] +description = "in middle of superlist" + +[26f9f7c3-6cf6-4610-984a-662f71f8689b] +description = "at end of superlist" + +[0a6db763-3588-416a-8f47-76b1cedde31e] +description = "first list missing element from second list" + +[83ffe6d8-a445-4a3c-8795-1e51a95e65c3] +description = "second list missing element from first list" + +[7bc76cb8-5003-49ca-bc47-cdfbe6c2bb89] +description = "first list missing additional digits from second list" + +[0d7ee7c1-0347-45c8-9ef5-b88db152b30b] +description = "order matters to a list" + +[5f47ce86-944e-40f9-9f31-6368aad70aa6] +description = "same digits but different numbers" diff --git a/exercises/practice/sublist/sublist.moon b/exercises/practice/sublist/sublist.moon new file mode 100644 index 0000000..0378415 --- /dev/null +++ b/exercises/practice/sublist/sublist.moon @@ -0,0 +1,4 @@ +{ + sublist: (list1, list2) -> + error 'Implement me' +} diff --git a/exercises/practice/sublist/sublist_spec.moon b/exercises/practice/sublist/sublist_spec.moon new file mode 100644 index 0000000..310b285 --- /dev/null +++ b/exercises/practice/sublist/sublist_spec.moon @@ -0,0 +1,92 @@ +import sublist from require 'sublist' + +describe 'sublist:', -> + it 'empty lists', -> + listOne = {} + listTwo = {} + assert.are.equal 'equal', sublist listOne, listTwo + + pending 'empty list within non empty list', -> + listOne = {} + listTwo = {1, 2, 3} + assert.are.equal 'sublist', sublist listOne, listTwo + + pending 'non empty list contains empty list', -> + listOne = {1, 2, 3} + listTwo = {} + assert.are.equal 'superlist', sublist listOne, listTwo + + pending 'list equals itself', -> + listOne = {1, 2, 3} + listTwo = {1, 2, 3} + assert.are.equal 'equal', sublist listOne, listTwo + + pending 'different lists', -> + listOne = {1, 2, 3} + listTwo = {2, 3, 4} + assert.are.equal 'unequal', sublist listOne, listTwo + + pending 'false start', -> + listOne = {1, 2, 5} + listTwo = {0, 1, 2, 3, 1, 2, 5, 6} + assert.are.equal 'sublist', sublist listOne, listTwo + + pending 'consecutive', -> + listOne = {1, 1, 2} + listTwo = {0, 1, 1, 1, 2, 1, 2} + assert.are.equal 'sublist', sublist listOne, listTwo + + pending 'sublist at start', -> + listOne = {0, 1, 2} + listTwo = {0, 1, 2, 3, 4, 5} + assert.are.equal 'sublist', sublist listOne, listTwo + + pending 'sublist in middle', -> + listOne = {2, 3, 4} + listTwo = {0, 1, 2, 3, 4, 5} + assert.are.equal 'sublist', sublist listOne, listTwo + + pending 'sublist at end', -> + listOne = {3, 4, 5} + listTwo = {0, 1, 2, 3, 4, 5} + assert.are.equal 'sublist', sublist listOne, listTwo + + pending 'at start of superlist', -> + listOne = {0, 1, 2, 3, 4, 5} + listTwo = {0, 1, 2} + assert.are.equal 'superlist', sublist listOne, listTwo + + pending 'in middle of superlist', -> + listOne = {0, 1, 2, 3, 4, 5} + listTwo = {2, 3} + assert.are.equal 'superlist', sublist listOne, listTwo + + pending 'at end of superlist', -> + listOne = {0, 1, 2, 3, 4, 5} + listTwo = {3, 4, 5} + assert.are.equal 'superlist', sublist listOne, listTwo + + pending 'first list missing element from second list', -> + listOne = {1, 3} + listTwo = {1, 2, 3} + assert.are.equal 'unequal', sublist listOne, listTwo + + pending 'second list missing element from first list', -> + listOne = {1, 2, 3} + listTwo = {1, 3} + assert.are.equal 'unequal', sublist listOne, listTwo + + pending 'first list missing additional digits from second list', -> + listOne = {1, 2} + listTwo = {1, 22} + assert.are.equal 'unequal', sublist listOne, listTwo + + pending 'order matters to a list', -> + listOne = {1, 2, 3} + listTwo = {3, 2, 1} + assert.are.equal 'unequal', sublist listOne, listTwo + + pending 'same digits but different numbers', -> + listOne = {1, 0, 1} + listTwo = {10, 1} + assert.are.equal 'unequal', sublist listOne, listTwo