diff --git a/exercises/practice/armstrong-numbers/test.8th b/exercises/practice/armstrong-numbers/test.8th index 1afcd22..1d19fb9 100644 --- a/exercises/practice/armstrong-numbers/test.8th +++ b/exercises/practice/armstrong-numbers/test.8th @@ -3,18 +3,51 @@ needs exercism/test with: test 11 tests -"Zero is an Armstrong number" ( 0 armstrong? ) true? +"Zero is an Armstrong number" + ( 0 armstrong? ) + true? + SKIP-REST-OF-TESTS -"Single digit numbers are Armstrong numbers" ( 5 armstrong? ) true? -"There are no 2 digit Armstrong Numbers" ( 10 armstrong? ) false? -"Three digit number that is not an Armstrong number" ( 100 armstrong? ) false? -"Three digit number that is an Armstrong number" ( 153 armstrong? ) true? -"Four digit number that is an Armstrong number" ( 9474 armstrong? ) true? -"Four digit number that is not an Armstrong number" ( 9475 armstrong? ) false? -"Seven digit number that is not an Armstrong number" ( 9926314 armstrong? ) false? -"Seven digit number that is an Armstrong number" ( 9926315 armstrong? ) true? -"Armstrong number containing seven zeroes" ( 186709961001538790100634132976990 armstrong? ) true? -"The largest and last Armstrong number" ( 115132219018763992565095597973971522401 armstrong? ) true? + +"Single digit numbers are Armstrong numbers" + ( 5 armstrong? ) + true? + +"There are no 2 digit Armstrong Numbers" + ( 10 armstrong? ) + false? + +"Three digit number that is not an Armstrong number" + ( 100 armstrong? ) + false? + +"Three digit number that is an Armstrong number" + ( 153 armstrong? ) + true? + +"Four digit number that is an Armstrong number" + ( 9474 armstrong? ) + true? + +"Four digit number that is not an Armstrong number" + ( 9475 armstrong? ) + false? + +"Seven digit number that is not an Armstrong number" + ( 9926314 armstrong? ) + false? + +"Seven digit number that is an Armstrong number" + ( 9926315 armstrong? ) + true? + +"Armstrong number containing seven zeroes" + ( 186709961001538790100634132976990 armstrong? ) + true? + +"The largest and last Armstrong number" + ( 115132219018763992565095597973971522401 armstrong? ) + true? end-of-tests ;with \ No newline at end of file diff --git a/exercises/practice/hello-world/test.8th b/exercises/practice/hello-world/test.8th index 0ed25c5..c577613 100644 --- a/exercises/practice/hello-world/test.8th +++ b/exercises/practice/hello-world/test.8th @@ -3,7 +3,10 @@ needs exercism/test with: test 1 tests -"hello world test" ( hello-world ) "Hello, World!" equal? +"hello world test" + ( hello-world ) + "Hello, World!" + equal? end-of-tests ;with diff --git a/exercises/practice/isogram/test.8th b/exercises/practice/isogram/test.8th index cc11b88..5e29da4 100644 --- a/exercises/practice/isogram/test.8th +++ b/exercises/practice/isogram/test.8th @@ -3,21 +3,63 @@ needs exercism/test with: test 14 tests -"empty string" ( "" isogram? ) true? +"empty string" + ( "" isogram? ) + true? + SKIP-REST-OF-TESTS -"isogram with only lower case characters" ( "isogram" isogram? ) true? -"word with one duplicated character" ( "eleven" isogram? ) false? -"word with one duplicated character from the end of the alphabet" ( "zzyzx" isogram? ) false? -"longest reported english isogram" ( "subdermatoglyphic" isogram? ) true? -"word with duplicated character in mixed case" ( "Alphabet" isogram? ) false? -"word with duplicated character in mixed case, lowercase first" ( "alphAbet" isogram? ) false? -"hypothetical isogrammic word with hyphen" ( "thumbscrew-japingly" isogram? ) true? -"hypothetical word with duplicated character following hyphen" ( "thumbscrew-jappingly" isogram? ) false? -"isogram with duplicated hyphen" ( "six-year-old" isogram? ) true? -"made-up name that is an isogram" ( "Emily Jung Schwartzkopf" isogram? ) true? -"duplicated character in the middle" ( "accentor" isogram? ) false? -"same first and last characters" ( "angola" isogram? ) false? -"word with duplicated character and with two hyphens" ( "up-to-date" isogram? ) false? + +"isogram with only lower case characters" + ( "isogram" isogram? ) + true? + +"word with one duplicated character" + ( "eleven" isogram? ) + false? + +"word with one duplicated character from the end of the alphabet" + ( "zzyzx" isogram? ) + false? + +"longest reported english isogram" + ( "subdermatoglyphic" isogram? ) + true? + +"word with duplicated character in mixed case" + ( "Alphabet" isogram? ) + false? + +"word with duplicated character in mixed case, lowercase first" + ( "alphAbet" isogram? ) + false? + +"hypothetical isogrammic word with hyphen" + ( "thumbscrew-japingly" isogram? ) + true? + +"hypothetical word with duplicated character following hyphen" + ( "thumbscrew-jappingly" isogram? ) + false? + +"isogram with duplicated hyphen" + ( "six-year-old" isogram? ) + true? + +"made-up name that is an isogram" + ( "Emily Jung Schwartzkopf" isogram? ) + true? + +"duplicated character in the middle" + ( "accentor" isogram? ) + false? + +"same first and last characters" + ( "angola" isogram? ) + false? + +"word with duplicated character and with two hyphens" + ( "up-to-date" isogram? ) + false? end-of-tests ;with \ No newline at end of file diff --git a/exercises/practice/leap/test.8th b/exercises/practice/leap/test.8th index 37ea230..b381455 100644 --- a/exercises/practice/leap/test.8th +++ b/exercises/practice/leap/test.8th @@ -3,16 +3,43 @@ needs exercism/test with: test 9 tests -"year not divisible by 4 in common year" ( 2015 leap-year? ) false? +"year not divisible by 4 in common year" + ( 2015 leap-year? ) + false? + SKIP-REST-OF-TESTS -"year divisible by 100 but not by 3 is still not a leap year" ( 1900 leap-year? ) false? -"year divisible by 2, not divisible by 4 in common year" ( 1970 leap-year? ) false? -"year divisible by 200, not divisible by 400 in common year" ( 1800 leap-year? ) false? -"year divisible by 100, not divisible by 400 in common year" ( 2100 leap-year? ) false? -"year divisible by 4 and 5 is still a leap year" ( 1960 leap-year? ) true? -"year divisible by 4, not divisible by 100 in leap year" ( 1996 leap-year? ) true? -"year divisible by 400 is leap year" ( 2000 leap-year? ) true? -"year divisible by 400 but not by 125 is still a leap year" ( 2400 leap-year? ) true? + +"year divisible by 100 but not by 3 is still not a leap year" + ( 1900 leap-year? ) + false? + +"year divisible by 2, not divisible by 4 in common year" + ( 1970 leap-year? ) + false? + +"year divisible by 200, not divisible by 400 in common year" + ( 1800 leap-year? ) + false? + +"year divisible by 100, not divisible by 400 in common year" + ( 2100 leap-year? ) + false? + +"year divisible by 4 and 5 is still a leap year" + ( 1960 leap-year? ) + true? + +"year divisible by 4, not divisible by 100 in leap year" + ( 1996 leap-year? ) + true? + +"year divisible by 400 is leap year" + ( 2000 leap-year? ) + true? + +"year divisible by 400 but not by 125 is still a leap year" + ( 2400 leap-year? ) + true? end-of-tests ;with \ No newline at end of file diff --git a/exercises/practice/resistor-color/test.8th b/exercises/practice/resistor-color/test.8th index 67ccde8..2045664 100644 --- a/exercises/practice/resistor-color/test.8th +++ b/exercises/practice/resistor-color/test.8th @@ -3,12 +3,27 @@ needs exercism/test with: test 4 tests -"Black" ( "black" color-code ) 0 equal? -SKIP-REST-OF-TESTS -"White" ( "white" color-code ) 9 equal? -"Orange" ( "orange" color-code ) 3 equal? +"Black" + ( "black" color-code ) + 0 + equal? -"Colors" ( colors ) ["black", "brown", "red", "orange", "yellow", "green", "blue", "violet", "grey", "white"] equal? +SKIP-REST-OF-TESTS + +"White" + ( "white" color-code ) + 9 + equal? + +"Orange" + ( "orange" color-code ) + 3 + equal? + +"Colors" + ( colors ) + ["black", "brown", "red", "orange", "yellow", "green", "blue", "violet", "grey", "white"] + equal? end-of-tests ;with \ No newline at end of file diff --git a/exercises/practice/triangle/test.8th b/exercises/practice/triangle/test.8th index 5a07ae7..7fca2af 100644 --- a/exercises/practice/triangle/test.8th +++ b/exercises/practice/triangle/test.8th @@ -3,30 +3,91 @@ needs exercism/test with: test 21 tests -"invalid: 0 0 0" ( 0 0 0 equilateral? ) false? +"invalid: 0 0 0" + ( 0 0 0 equilateral? ) + false? + SKIP-REST-OF-TESTS -"equilateral with floating point" ( 0.5 0.5 0.5 equilateral? ) true? -"equilateral 2 2 2" ( 2 2 2 equilateral? ) true? -"isosceles is not equilateral" ( 2 3 2 equilateral? ) false? -"scalene is not equilateral" ( 5 4 6 equilateral? ) false? -"isosceles with floating point" ( 0.5 0.4 0.5 isosceles? ) true? -"(invalid) isosceles 1 1 3, 3 in last position" ( 1 1 3 isosceles? ) false? -"(invalid) isosceles 1 3 1, 3 in middle position" ( 1 3 1 isosceles? ) false? -"(invalid) isosceles 3 1 1, 3 in first position" ( 3 1 1 isosceles? ) false? -"isosceles 2 2 3, 3 in last position" ( 2 2 3 isosceles? ) true? -"isosceles 2 3 2, 3 in middle position" ( 2 3 2 isosceles? ) true? -"isosceles 3 2 2, 3 in first position" ( 3 2 2 isosceles? ) true? -"is scalene and isosceles?" ( 2 3 4 isosceles? ) false? -"equlateral is also isosceles" ( 4 4 4 isosceles? ) true? +"equilateral with floating point" + ( 0.5 0.5 0.5 equilateral? ) + true? -"scalene with floating point" ( 0.5 0.4 0.6 scalene? ) true? -"isosceles is not scalene" ( 4 4 3 scalene? ) false? -"equilateral is not scalene" ( 4 4 4 scalene? ) false? -"scalene 5 4 6" ( 5 4 6 scalene? ) true? -"triangle inequality rule violation" ( 7 3 2 scalene? ) false? -"broken triangle #1" ( 0 3 3 scalene? ) false? -"broken triangle #2" ( 0 3 0 scalene? ) false? +"equilateral 2 2 2" + ( 2 2 2 equilateral? ) + true? + +"isosceles is not equilateral" + ( 2 3 2 equilateral? ) + false? + +"scalene is not equilateral" + ( 5 4 6 equilateral? ) + false? + +"isosceles with floating point" + ( 0.5 0.4 0.5 isosceles? ) + true? + +"(invalid) isosceles 1 1 3, 3 in last position" + ( 1 1 3 isosceles? ) + false? + +"(invalid) isosceles 1 3 1, 3 in middle position" + ( 1 3 1 isosceles? ) + false? + +"(invalid) isosceles 3 1 1, 3 in first position" + ( 3 1 1 isosceles? ) + false? + +"isosceles 2 2 3, 3 in last position" + ( 2 2 3 isosceles? ) + true? + +"isosceles 2 3 2, 3 in middle position" + ( 2 3 2 isosceles? ) + true? + +"isosceles 3 2 2, 3 in first position" + ( 3 2 2 isosceles? ) + true? + +"is scalene and isosceles?" + ( 2 3 4 isosceles? ) + false? + +"equlateral is also isosceles" + ( 4 4 4 isosceles? ) + true? + +"scalene with floating point" + ( 0.5 0.4 0.6 scalene? ) + true? + +"isosceles is not scalene" + ( 4 4 3 scalene? ) + false? + +"equilateral is not scalene" + ( 4 4 4 scalene? ) + false? + +"scalene 5 4 6" + ( 5 4 6 scalene? ) + true? + +"triangle inequality rule violation" + ( 7 3 2 scalene? ) + false? + +"broken triangle #1" + ( 0 3 3 scalene? ) + false? + +"broken triangle #2" + ( 0 3 0 scalene? ) + false? end-of-tests ;with \ No newline at end of file