trackler 2.2.1.113 → 2.2.1.114

data/tracks/elm/exercises/list-ops/ListOps.example.elm

@@ -1,4 +1,14 @@
-module ListOps exposing (..)
+module ListOps
+    exposing
+        ( append
+        , concat
+        , filter
+        , foldl
+        , foldr
+        , length
+        , map
+        , reverse
+        )
 
 
 length : List a -> Int

data/tracks/elm/exercises/list-ops/tests/Tests.elm

@@ -1,7 +1,7 @@
 module Tests exposing (..)
 
 import Expect
-import ListOps exposing (..)
+import ListOps exposing (append, concat, filter, foldl, foldr, length, map, reverse)
 import Test exposing (..)
 
 

data/tracks/elm/exercises/luhn/Luhn.elm

@@ -1 +1,6 @@
-module Luhn exposing (..)
+module Luhn exposing (valid)
+
+
+valid : String -> Bool
+valid input =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/nucleotide-count/NucleotideCount.elm

@@ -1,6 +1,19 @@
-module NucleotideCount exposing (..)
+module NucleotideCount exposing (nucleotideCounts, version)
 
 
 version : Int
 version =
     2
+
+
+type alias NucleotideCounts =
+    { a : Int
+    , t : Int
+    , c : Int
+    , g : Int
+    }
+
+
+nucleotideCounts : String -> NucleotideCounts
+nucleotideCounts sequence =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/nucleotide-count/NucleotideCount.example.elm

@@ -1,4 +1,4 @@
-module NucleotideCount exposing (..)
+module NucleotideCount exposing (nucleotideCounts, version)
 
 import String
 

data/tracks/elm/exercises/pangram/Pangram.elm

@@ -1 +1,6 @@
-module Pangram exposing (..)
+module Pangram exposing (isPangram)
+
+
+isPangram : String -> Bool
+isPangram sentence =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/pangram/Pangram.example.elm

@@ -1,4 +1,4 @@
-module Pangram exposing (..)
+module Pangram exposing (isPangram)
 
 import String exposing (contains, fromChar, toLower)
 

data/tracks/elm/exercises/pascals-triangle/Triangle.elm

@@ -1 +1,6 @@
-module Triangle exposing (..)
+module Triangle exposing (rows)
+
+
+rows : Int -> List (List Int)
+rows n =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/phone-number/PhoneNumber.elm

@@ -1 +1,11 @@
-module PhoneNumber exposing (..)
+module PhoneNumber exposing (getNumber, prettyPrint)
+
+
+getNumber : String -> Maybe String
+getNumber phoneNumber =
+    Debug.crash "Please implement this function"
+
+
+prettyPrint : String -> Maybe String
+prettyPrint input =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/phone-number/PhoneNumber.example.elm

@@ -1,4 +1,4 @@
-module PhoneNumber exposing (..)
+module PhoneNumber exposing (getNumber, prettyPrint)
 
 import List exposing (head, map)
 import Maybe exposing (andThen)

data/tracks/elm/exercises/raindrops/Raindrops.elm

@@ -1 +1,6 @@
-module Raindrops exposing (..)
+module Raindrops exposing (raindrops)
+
+
+raindrops : Int -> String
+raindrops number =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/raindrops/Raindrops.example.elm

@@ -1,4 +1,4 @@
-module Raindrops exposing (..)
+module Raindrops exposing (raindrops)
 
 import String
 

data/tracks/elm/exercises/rna-transcription/RNATranscription.elm

@@ -1 +1,6 @@
-module RNATranscription exposing (..)
+module RNATranscription exposing (toRNA)
+
+
+toRNA : String -> Result Char String
+toRNA dna =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/robot-simulator/RobotSimulator.elm

@@ -1 +1,48 @@
-module RobotSimulator exposing (..)
+module RobotSimulator
+    exposing
+        ( Bearing(..)
+        , Robot
+        , advance
+        , defaultRobot
+        , simulate
+        , turnLeft
+        , turnRight
+        )
+
+
+type Bearing
+    = North
+    | East
+    | South
+    | West
+
+
+type alias Robot =
+    { bearing : Bearing
+    , coordinates : { x : Int, y : Int }
+    }
+
+
+defaultRobot : Robot
+defaultRobot =
+    Debug.crash "Please implement this function"
+
+
+turnRight : Robot -> Robot
+turnRight robot =
+    Debug.crash "Please implement this function"
+
+
+turnLeft : Robot -> Robot
+turnLeft robot =
+    Debug.crash "Please implement this function"
+
+
+advance : Robot -> Robot
+advance robot =
+    Debug.crash "Please implement this function"
+
+
+simulate : String -> Robot -> Robot
+simulate directions robot =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/robot-simulator/RobotSimulator.example.elm

@@ -1,4 +1,13 @@
-module RobotSimulator exposing (..)
+module RobotSimulator
+    exposing
+        ( Bearing(East, North, South, West)
+        , Robot
+        , advance
+        , defaultRobot
+        , simulate
+        , turnLeft
+        , turnRight
+        )
 
 import String
 

data/tracks/elm/exercises/roman-numerals/RomanNumerals.elm

@@ -1 +1,6 @@
 module RomanNumerals exposing (toRoman)
+
+
+toRoman : Int -> String
+toRoman number =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/run-length-encoding/RunLengthEncoding.elm

@@ -1,6 +1,15 @@
-module RunLengthEncoding exposing (..)
+module RunLengthEncoding exposing (decode, encode, version)
 
 
-version : Int
 version =
     2
+
+
+encode : String -> String
+encode string =
+    Debug.crash "Please implement this function"
+
+
+decode : String -> String
+decode string =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/say/Say.elm

@@ -1 +1,11 @@
-module Say exposing (say, SayError(..))
+module Say exposing (SayError(..), say)
+
+
+type SayError
+    = Negative
+    | TooLarge
+
+
+say : Int -> Result SayError String
+say number =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/scrabble-score/ScrabbleScore.elm

@@ -1 +1,6 @@
-module ScrabbleScore exposing (..)
+module ScrabbleScore exposing (scoreWord)
+
+
+scoreWord : String -> Int
+scoreWord x =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/scrabble-score/ScrabbleScore.example.elm

@@ -1,4 +1,4 @@
-module ScrabbleScore exposing (..)
+module ScrabbleScore exposing (scoreWord)
 
 import String exposing (contains, foldl, fromChar, toUpper)
 

data/tracks/elm/exercises/series/Series.elm

@@ -1 +1,6 @@
-module Series exposing (..)
+module Series exposing (slices)
+
+
+slices : Int -> String -> Result String (List (List Int))
+slices size input =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/series/Series.example.elm

@@ -1,4 +1,4 @@
-module Series exposing (..)
+module Series exposing (slices)
 
 import List
 import Result

data/tracks/elm/exercises/space-age/SpaceAge.elm

@@ -1,4 +1,4 @@
-module SpaceAge exposing (..)
+module SpaceAge exposing (Planet(..), ageOn)
 
 
 type Planet
@@ -10,3 +10,8 @@ type Planet
     | Saturn
     | Uranus
     | Neptune
+
+
+ageOn : Planet -> Float -> Float
+ageOn planet seconds =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/space-age/SpaceAge.example.elm

@@ -1,4 +1,4 @@
-module SpaceAge exposing (..)
+module SpaceAge exposing (Planet(..), ageOn)
 
 
 type Planet

data/tracks/elm/exercises/strain/Strain.elm

@@ -1 +1,11 @@
-module Strain exposing (..)
+module Strain exposing (discard, keep)
+
+
+keep : (a -> Bool) -> List a -> List a
+keep predicate list =
+    Debug.crash "Please implement this function"
+
+
+discard : (a -> Bool) -> List a -> List a
+discard predicate list =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/strain/Strain.example.elm

@@ -1,4 +1,4 @@
-module Strain exposing (..)
+module Strain exposing (discard, keep)
 
 import List
 

data/tracks/elm/exercises/sublist/Sublist.elm

@@ -1,6 +1,18 @@
-module Sublist exposing (..)
+module Sublist exposing (ListComparison(..), sublist, version)
 
 
 version : Int
 version =
     2
+
+
+type ListComparison
+    = Equal
+    | Superlist
+    | Sublist
+    | Unequal
+
+
+sublist : List a -> List a -> ListComparison
+sublist alist blist =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/sublist/Sublist.example.elm

@@ -1,4 +1,4 @@
-module Sublist exposing (..)
+module Sublist exposing (ListComparison(..), sublist, version)
 
 
 version : Int

data/tracks/elm/exercises/sum-of-multiples/SumOfMultiples.elm

@@ -1 +1,6 @@
-module SumOfMultiples exposing (..)
+module SumOfMultiples exposing (sumOfMultiples)
+
+
+sumOfMultiples : List Int -> Int -> Int
+sumOfMultiples multiples limit =
+    Debug.crash "Please implement this function"

data/tracks/elm/exercises/sum-of-multiples/SumOfMultiples.example.elm

@@ -1,4 +1,4 @@
-module SumOfMultiples exposing (..)
+module SumOfMultiples exposing (sumOfMultiples)
 
 
 sumOfMultiples : List Int -> Int -> Int

data/tracks/elm/exercises/transpose/README.md

@@ -0,0 +1,95 @@
+# Transpose
+
+Given an input text output it transposed.
+
+Roughly explained, the transpose of a matrix:
+
+```text
+ABC
+DEF
+```
+
+is given by:
+
+```text
+AD
+BE
+CF
+```
+
+Rows become columns and columns become rows. See <https://en.wikipedia.org/wiki/Transpose>.
+
+If the input has rows of different lengths, this is to be solved as follows:
+
+- Pad to the left with spaces.
+- Don't pad to the right.
+
+Therefore, transposing this matrix:
+
+```text
+ABC
+DE
+```
+
+results in:
+
+```text
+AD
+BE
+C
+```
+
+And transposing:
+
+```text
+AB
+DEF
+```
+
+results in:
+
+```text
+AD
+BE
+ F
+```
+
+In general, all characters from the input should also be present in the transposed output.
+That means that if a column in the input text contains only spaces on its bottom-most row(s),
+the corresponding output row should contain the spaces in its right-most column(s).
+
+## Elm Installation
+
+Refer to the [Exercism help page](http://exercism.io/languages/elm) for Elm
+installation and learning resources.
+
+## Writing the Code
+
+The first time you start an exercise, you'll need to ensure you have the
+appropriate dependencies installed.
+
+```bash
+$ elm-package install --yes
+```
+
+Execute the tests with:
+
+```bash
+$ elm-test
+```
+
+Automatically run tests again when you save changes:
+
+```bash
+$ elm-test --watch
+```
+
+As you work your way through the test suite, be sure to remove the `skip <|`
+calls from each test until you get them all passing!
+
+## Source
+
+Reddit r/dailyprogrammer challenge #270 [Easy]. [https://www.reddit.com/r/dailyprogrammer/comments/4msu2x/challenge_270_easy_transpose_the_input_text](https://www.reddit.com/r/dailyprogrammer/comments/4msu2x/challenge_270_easy_transpose_the_input_text)
+
+## Submitting Incomplete Solutions
+It's possible to submit an incomplete solution so you can see how others have completed the exercise.