trackler 2.0.8.28 → 2.0.8.29

data/tracks/purescript/config.json

@@ -86,6 +86,13 @@
       "topics": [
         "dates"
       ]
+    },
+    {
+      "slug": "atbash-cipher",
+      "difficulty": 1,
+      "topics": [
+        "strings"
+      ]
     }
   ],
   "deprecated": [

data/tracks/purescript/exercises/atbash-cipher/bower.json

@@ -0,0 +1,18 @@
+{
+  "name": "atbash-cipher",
+  "ignore": [
+    "**/.*",
+    "node_modules",
+    "bower_components",
+    "output"
+  ],
+  "dependencies": {
+    "purescript-prelude": "^2.5.0",
+    "purescript-maps": "^2.1.2",
+    "purescript-unicode": "^2.0.2"
+  },
+  "devDependencies": {
+    "purescript-psci-support": "^2.0.0",
+    "purescript-test-unit": "^10.1.0"
+  }
+}

data/tracks/purescript/exercises/atbash-cipher/examples/src/AtbashCipher.purs

@@ -0,0 +1,41 @@
+module AtbashCipher
+  ( decode
+  , encode
+  ) where
+
+import Prelude
+import Data.Array (drop, filter, take, zip, (:))
+import Data.Char.Unicode (isPunctuation, isSpace)
+import Data.Map (Map, fromFoldable, lookup)
+import Data.Maybe (Maybe)
+import Data.String (fromCharArray, joinWith, toCharArray, toLower)
+import Data.Traversable (traverse)
+
+plain :: Array Char
+plain = toCharArray "abcdefghijklmnopqrstuvwxyz0123456789"
+
+cipher :: Array Char
+cipher = toCharArray "zyxwvutsrqponmlkjihgfedcba0123456789"
+
+decMap :: Map Char Char
+decMap = fromFoldable (zip cipher plain)
+
+encMap :: Map Char Char
+encMap = fromFoldable (zip plain cipher)
+
+decode :: String -> Maybe String
+decode s = fromCharArray <$> dec (toCharArray s)
+  where dec = filter ((/=) ' ')
+              >>> traverse (_ `lookup` decMap)
+
+chunks :: forall a. Int -> Array a -> Array (Array a)
+chunks n [] = []
+chunks n a = take n a : chunks n (drop n a)
+
+encode :: String -> Maybe String
+encode s = group <$> enc (toLower s # toCharArray)
+  where enc = filter (not (isPunctuation || isSpace))
+              >>> traverse (_ `lookup` encMap)
+        group = chunks 5
+                >>> map fromCharArray
+                >>> joinWith " "

data/tracks/purescript/exercises/atbash-cipher/src/AtbashCipher.purs

@@ -0,0 +1,4 @@
+module AtbashCipher
+  ( decode
+  , encode
+  ) where

data/tracks/purescript/exercises/atbash-cipher/test/Main.purs

@@ -0,0 +1,64 @@
+module Test.Main where
+
+import Prelude
+import Control.Monad.Eff (Eff)
+import Data.Maybe (Maybe(..))
+import Test.Unit.Assert as Assert
+import Test.Unit (suite, test)
+import Test.Unit.Main (runTest)
+import AtbashCipher (decode, encode)
+
+main :: Eff _ Unit
+main = runTest do
+
+  suite "AtbashCipher.encode" do
+
+    test "encode yes" $
+      Assert.equal (Just "bvh")
+                   (encode "yes")
+
+    test "encode no" $
+      Assert.equal (Just "ml")
+                   (encode "no")
+
+    test "encode OMG" $
+      Assert.equal (Just "lnt")
+                   (encode "OMG")
+
+    test "encode spaces" $
+      Assert.equal (Just "lnt")
+                   (encode "O M G")
+
+    test "encode mindblowingly" $
+      Assert.equal (Just "nrmwy oldrm tob")
+                   (encode "mindblowingly")
+
+    test "encode numbers" $
+      Assert.equal (Just "gvhgr mt123 gvhgr mt")
+                   (encode "Testing,1 2 3, testing.")
+
+    test "encode deep thought" $
+      Assert.equal (Just "gifgs rhurx grlm")
+                   (encode "Truth is fiction.")
+
+    test "encode all the letters" $
+      Assert.equal (Just "gsvjf rxpyi ldmul cqfnk hlevi gsvoz abwlt")
+                   (encode "The quick brown fox jumps over the lazy dog.")
+
+  suite "AtbashCipher.decode" do
+
+    test "decode exercism" $
+      Assert.equal (Just "exercism")
+                   (decode "vcvix rhn")
+
+    test "decode a sentence" $
+      Assert.equal (Just "anobstacleisoftenasteppingstone")
+                   (decode "zmlyh gzxov rhlug vmzhg vkkrm thglm v")
+
+    test "decode numbers" $
+      Assert.equal (Just "testing123testing")
+                   (decode "gvhgr mt123 gvhgr mt")
+
+    test "decode all the letters" $
+      Assert.equal (Just "thequickbrownfoxjumpsoverthelazydog")
+                   (decode "gsvjf rxpyi ldmul cqfnk hlevi gsvoz abwlt")

data/tracks/python/exercises/run-length-encoding/run_length_encoding_test.py

@@ -3,6 +3,8 @@ import unittest
 from run_length_encoding import encode, decode
 
 
+# test cases adapted from `x-common//canonical-data.json` @ version: 1.0.0
+
 class WordCountTests(unittest.TestCase):
     def test_encode_empty_string(self):
         self.assertMultiLineEqual(encode(''), '')

data/tracks/swift/exercises/grade-school/Tests/GradeSchoolTests/GradeSchoolTests.swift

@@ -15,7 +15,7 @@ class GradeSchoolTests: XCTestCase {
         return result.count.toIntMax() == IntMax(expected.count)
     }
 
-    func XCTAssertEqualCollection (_ collectionS: Set<String>?, _ collectionA: [String]? ) {
+    func XCTAssertEqualCollection<C:Collection> (_ collectionS: C?, _ collectionA: [String]? ) where C.Iterator.Element == String {
         XCTAssert(sameCollection(collectionS, collectionA))
     }
 

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: trackler
 version: !ruby/object:Gem::Version
-  version: 2.0.8.28
+  version: 2.0.8.29
 platform: ruby
 authors:
 - Katrina Owen
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2017-03-23 00:00:00.000000000 Z
+date: 2017-03-24 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rubyzip
@@ -2195,6 +2195,10 @@ files:
 - tracks/ecmascript/exercises/pascals-triangle/gulpfile.js
 - tracks/ecmascript/exercises/pascals-triangle/package.json
 - tracks/ecmascript/exercises/pascals-triangle/pascals-triangle.spec.js
+- tracks/ecmascript/exercises/perfect-numbers/example.js
+- tracks/ecmascript/exercises/perfect-numbers/gulpfile.js
+- tracks/ecmascript/exercises/perfect-numbers/package.json
+- tracks/ecmascript/exercises/perfect-numbers/perfect-numbers.spec.js
 - tracks/ecmascript/exercises/phone-number/example.js
 - tracks/ecmascript/exercises/phone-number/gulpfile.js
 - tracks/ecmascript/exercises/phone-number/package.json
@@ -6141,10 +6145,13 @@ files:
 - tracks/perl6/exercises/all-your-base/AllYourBase.pm6
 - tracks/perl6/exercises/all-your-base/Example.pm
 - tracks/perl6/exercises/all-your-base/all-your-base.t
+- tracks/perl6/exercises/allergies/Allergies.pm6
 - tracks/perl6/exercises/allergies/Example.pm
 - tracks/perl6/exercises/allergies/allergies.t
+- tracks/perl6/exercises/anagram/Anagram.pm6
 - tracks/perl6/exercises/anagram/Example.pm
 - tracks/perl6/exercises/anagram/anagram.t
+- tracks/perl6/exercises/atbash-cipher/AtbashCipher.pm6
 - tracks/perl6/exercises/atbash-cipher/Example.pm
 - tracks/perl6/exercises/atbash-cipher/atbash-cipher.t
 - tracks/perl6/exercises/binary/Example.pm
@@ -6156,33 +6163,42 @@ files:
 - tracks/perl6/exercises/grade-school/GradeSchool.pm6
 - tracks/perl6/exercises/grade-school/grade-school.t
 - tracks/perl6/exercises/grains/Example.pm
+- tracks/perl6/exercises/grains/Grains.pm6
 - tracks/perl6/exercises/grains/grains.t
 - tracks/perl6/exercises/hello-world/Example.pm
 - tracks/perl6/exercises/hello-world/HelloWorld.pm6
 - tracks/perl6/exercises/hello-world/hello-world.t
 - tracks/perl6/exercises/leap/Example.pm
+- tracks/perl6/exercises/leap/Leap.pm6
 - tracks/perl6/exercises/leap/leap.t
 - tracks/perl6/exercises/linked-list/Example.pm6
 - tracks/perl6/exercises/linked-list/LinkedList.pm6
 - tracks/perl6/exercises/linked-list/linked-list.t
 - tracks/perl6/exercises/phone-number/Example.pm
+- tracks/perl6/exercises/phone-number/PhoneNumber.pm6
 - tracks/perl6/exercises/phone-number/phone-number.t
 - tracks/perl6/exercises/raindrops/Example.pm
+- tracks/perl6/exercises/raindrops/Raindrops.pm6
 - tracks/perl6/exercises/raindrops/raindrops.t
 - tracks/perl6/exercises/rna-transcription/Example.pm
+- tracks/perl6/exercises/rna-transcription/RNA.pm6
 - tracks/perl6/exercises/rna-transcription/rna-transcription.t
 - tracks/perl6/exercises/robot-name/Example.pm
 - tracks/perl6/exercises/robot-name/Robot.pm6
 - tracks/perl6/exercises/robot-name/robot-name.t
 - tracks/perl6/exercises/scrabble-score/Example.pm
+- tracks/perl6/exercises/scrabble-score/Scrabble.pm6
 - tracks/perl6/exercises/scrabble-score/scrabble-score.t
 - tracks/perl6/exercises/space-age/Example.pm
+- tracks/perl6/exercises/space-age/SpaceAge.pm6
 - tracks/perl6/exercises/space-age/space-age.t
 - tracks/perl6/exercises/trinary/Example.pm
 - tracks/perl6/exercises/trinary/trinary.t
 - tracks/perl6/exercises/word-count/Example.pm
+- tracks/perl6/exercises/word-count/WordCount.pm6
 - tracks/perl6/exercises/word-count/word-count.t
 - tracks/perl6/exercises/wordy/Example.pm
+- tracks/perl6/exercises/wordy/Wordy.pm6
 - tracks/perl6/exercises/wordy/wordy.t
 - tracks/perl6/img/icon.png
 - tracks/php/.editorconfig
@@ -6462,6 +6478,10 @@ files:
 - tracks/purescript/exercises/acronym/examples/src/Acronym.purs
 - tracks/purescript/exercises/acronym/src/Acronym.purs
 - tracks/purescript/exercises/acronym/test/Main.purs
+- tracks/purescript/exercises/atbash-cipher/bower.json
+- tracks/purescript/exercises/atbash-cipher/examples/src/AtbashCipher.purs
+- tracks/purescript/exercises/atbash-cipher/src/AtbashCipher.purs
+- tracks/purescript/exercises/atbash-cipher/test/Main.purs
 - tracks/purescript/exercises/bob/bower.json
 - tracks/purescript/exercises/bob/examples/src/Bob.purs
 - tracks/purescript/exercises/bob/src/Bob.purs