trackler 2.2.1.62 → 2.2.1.63

data/tracks/erlang/testgen/src/tgen_complex-numbers.erl

@@ -27,8 +27,8 @@ generate_test(#{description := Desc, expected := Exp, property := Prop, input :=
             erl_syntax:infix_expr(
                 tgs:value(Exp),
                 erl_syntax:operator("=="),
-                tgs:call_macro("TESTED_MODULE:" ++ Property, [
-                    tgs:call_macro("TESTED_MODULE:new", lists:map(fun tgs:value/1, Cplx))]))])]),
+                tgs:call_fun("complex_numbers:" ++ Property, [
+                    tgs:call_fun("complex_numbers:new", lists:map(fun tgs:value/1, Cplx))]))])]),
 
     {ok, Fn, [{Property, ["Z"]}]};
 generate_test(#{description := Desc, expected := Exp, property := Prop, input := Z}) ->
@@ -40,10 +40,10 @@ generate_test(#{description := Desc, expected := Exp, property := Prop, input :=
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assert", [
-            tgs:call_macro("TESTED_MODULE:equal", [
-                tgs:call_macro("TESTED_MODULE:new", lists:map(fun tgs:value/1, Expected)),
-                tgs:call_macro("TESTED_MODULE:" ++ Property, [
-                    tgs:call_macro("TESTED_MODULE:new", lists:map(fun tgs:value/1, Cplx))])])])]),
+            tgs:call_fun("complex_numbers:equal", [
+                tgs:call_fun("complex_numbers:new", lists:map(fun tgs:value/1, Expected)),
+                tgs:call_fun("complex_numbers:" ++ Property, [
+                    tgs:call_fun("complex_numbers:new", lists:map(fun tgs:value/1, Cplx))])])])]),
 
     {ok, Fn, [{Property, ["Z"]}]};
 generate_test(#{description := Desc, expected := Exp, property := <<"div">>, z1 := Z1, z2 := Z2}) ->
@@ -58,11 +58,11 @@ generate_test(#{description := Desc, expected := Exp, property := Prop, z1 := Z1
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assert", [
-            tgs:call_macro("TESTED_MODULE:equal", [
-                tgs:call_macro("TESTED_MODULE:new", lists:map(fun tgs:value/1, Expected)),
-                tgs:call_macro("TESTED_MODULE:" ++ Property, [
-                    tgs:call_macro("TESTED_MODULE:new", lists:map(fun tgs:value/1, Cplx1)),
-                    tgs:call_macro("TESTED_MODULE:new", lists:map(fun tgs:value/1, Cplx2))])])])]),
+            tgs:call_fun("complex_numbers:equal", [
+                tgs:call_fun("complex_numbers:new", lists:map(fun tgs:value/1, Expected)),
+                tgs:call_fun("complex_numbers:" ++ Property, [
+                    tgs:call_fun("complex_numbers:new", lists:map(fun tgs:value/1, Cplx1)),
+                    tgs:call_fun("complex_numbers:new", lists:map(fun tgs:value/1, Cplx2))])])])]),
 
     {ok, Fn, [{Property, ["Z1", "Z2"]}, {"equal", ["Z1", "Z2"]}, {"new", ["R", "I"]}]}.
 

data/tracks/erlang/testgen/src/tgen_custom-set.erl

@@ -22,11 +22,11 @@ generate_test(F=#{description := Desc, expected := Exp, property := Prop, set1 :
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assertEqual", [
-            tgs:call_macro("TESTED_MODULE:from_list", [
+            tgs:call_fun("custom_set:from_list", [
                 tgs:value(Exp)]),
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
-                tgs:call_macro("TESTED_MODULE:from_list", [tgs:value(Set1)]),
-                tgs:call_macro("TESTED_MODULE:from_list", [tgs:value(Set2)])])])]),
+            tgs:call_fun("custom_set:" ++ Property, [
+                tgs:call_fun("custom_set:from_list", [tgs:value(Set1)]),
+                tgs:call_fun("custom_set:from_list", [tgs:value(Set2)])])])]),
 
     {ok, Fn, [{Property, ["Set1", "Set2"]}]};
 generate_test(F=#{description := Desc, expected := Exp, property := Prop, set1 := Set1, set2 := Set2}) when Exp =:= true; Exp =:= false ->
@@ -40,9 +40,9 @@ generate_test(F=#{description := Desc, expected := Exp, property := Prop, set1 :
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro(Assert, [
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
-                tgs:call_macro("TESTED_MODULE:from_list", [tgs:value(Set1)]),
-                tgs:call_macro("TESTED_MODULE:from_list", [tgs:value(Set2)])])])]),
+            tgs:call_fun("custom_set:" ++ Property, [
+                tgs:call_fun("custom_set:from_list", [tgs:value(Set1)]),
+                tgs:call_fun("custom_set:from_list", [tgs:value(Set2)])])])]),
 
     {ok, Fn, [{Property, ["Set1", "Set2"]}, {"from_list", ["List"]}]};
 generate_test(#{description := Desc, expected := Exp, property := Prop, set := Set, element := Elem}) when is_list(Exp) ->
@@ -51,11 +51,11 @@ generate_test(#{description := Desc, expected := Exp, property := Prop, set := S
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assertEqual", [
-            tgs:call_macro("TESTED_MODULE:from_list", [
+            tgs:call_fun("custom_set:from_list", [
                 tgs:value(Exp)]),
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("custom_set:" ++ Property, [
                 tgs:value(Elem),
-                tgs:call_macro("TESTED_MODULE:from_list", [
+                tgs:call_fun("custom_set:from_list", [
                     erl_syntax:abstract(Set)])])])]),
 
     {ok, Fn, [{Property, ["Elem", "Set"]}, {"from_list", ["List"]}]};
@@ -70,9 +70,9 @@ generate_test(#{description := Desc, expected := Exp, property := Prop, set := S
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro(Assert, [
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("custom_set:" ++ Property, [
                 tgs:value(Elem),
-                tgs:call_macro("TESTED_MODULE:from_list", [
+                tgs:call_fun("custom_set:from_list", [
                     erl_syntax:abstract(Set)])])])]),
 
     {ok, Fn, [{Property, ["Elem", "Set"]}, {"from_list", ["List"]}]};
@@ -87,8 +87,8 @@ generate_test(#{description := Desc, expected := Exp, property := <<"empty">>, s
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro(Assert, [
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
-                tgs:call_macro("TESTED_MODULE:from_list", [
+            tgs:call_fun("custom_set:" ++ Property, [
+                tgs:call_fun("custom_set:from_list", [
                     tgs:value(Set)])])])]),
 
     {ok, Fn, [{Property, ["Set"]}, {"from_list", ["List"]}]}.

data/tracks/erlang/testgen/src/tgen_hamming.erl

@@ -22,7 +22,7 @@ generate_test(#{description := Desc, expected := #{error := Message}, property :
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assertMatch", [
             tgs:value({error, Reason}),
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("hamming:" ++ Property, [
                 tgs:value(binary_to_list(S1)),
                 tgs:value(binary_to_list(S2))])])]),
 
@@ -34,7 +34,7 @@ generate_test(#{description := Desc, expected := Exp, property := Prop, 'strand1
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assertMatch", [
             tgs:value(Exp),
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("hamming:" ++ Property, [
                 tgs:value(binary_to_list(S1)),
                 tgs:value(binary_to_list(S2))])])]),
 

data/tracks/erlang/testgen/src/tgen_hello-world.erl

@@ -22,6 +22,6 @@ generate_test(#{description := Desc, expected := Exp, property := Prop}) ->
     Fn = tgs:simple_fun(TestName, [
             tgs:call_macro("assertEqual", [
                 tgs:value(Expected),
-                tgs:call_macro("TESTED_MODULE:" ++ Property, [])])]),
+                tgs:call_fun("hello_world:" ++ Property, [])])]),
 
     {ok, Fn, [{Prop, []}]}.

data/tracks/erlang/testgen/src/tgen_leap.erl

@@ -25,7 +25,7 @@ generate_test(#{description := Desc, expected := Exp, property := <<"leapYear">>
 
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro(Assert, [
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("leap:" ++ Property, [
                 tgs:value(In)])])]),
 
     {ok, Fn, [{Property, ["Year"]}]}.

data/tracks/erlang/testgen/src/tgen_rna-transcription.erl

@@ -21,7 +21,7 @@ generate_test(#{description := Desc, expected := null, property := <<"toRna">>,
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assertMatch", [
             tgs:value(error),
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("rna_transcription:" ++ Property, [
                 tgs:value(binary_to_list(DNA))])])]),
 
     {ok, Fn, [{Property, ["Strand"]}]};
@@ -32,7 +32,7 @@ generate_test(#{description := Desc, expected := Exp, property := <<"toRna">>, d
     Fn = tgs:simple_fun(TestName, [
         tgs:call_macro("assertMatch", [
             tgs:value(binary_to_list(Exp)),
-            tgs:call_macro("TESTED_MODULE:" ++ Property, [
+            tgs:call_fun("rna_transcription:" ++ Property, [
                 tgs:value(binary_to_list(DNA))])])]),
 
     {ok, Fn, [{Property, ["Strand"]}]}.

data/tracks/erlang/testgen/src/tgs.erl

@@ -7,6 +7,7 @@
     define/2,
     export/1,
     include/1,
+    include_lib/1,
     module/1,
     parens/1,
     raw/1,
@@ -41,6 +42,11 @@ include(File) when is_list(File) ->
         erl_syntax:text("include"), [
             erl_syntax:abstract(File)]).
 
+include_lib(File) when is_list(File) ->
+    erl_syntax:attribute(
+        erl_syntax:text("include_lib"), [
+            erl_syntax:abstract(File)]).
+
 define(Name, Substitution) when is_list(Name) ->
     erl_syntax:attribute(
         erl_syntax:text("define"), [

data/tracks/fsharp/exercises/beer-song/BeerSong.fs

@@ -1,7 +1,3 @@
 module BeerSong
 
-let verse (n: int) = failwith "You need to implement this function."
-
-let verses (stop: int) (start: int) = failwith "You need to implement this function."
-
-let sing: string = failwith "You need to implement this function."
+let recite (startBottles: int) (takeDown: int) = failwith "You need to implement this function."

data/tracks/fsharp/exercises/beer-song/BeerSongTest.fs

@@ -1,4 +1,4 @@
-// This file was auto-generated based on version 1.0.0 of the canonical data.
+// This file was auto-generated based on version 2.0.0 of the canonical data.
 
 module BeerSongTest
 
@@ -9,41 +9,363 @@ open BeerSong
 
 [<Fact>]
 let ``First generic verse`` () =
-    let expected = "99 bottles of beer on the wall, 99 bottles of beer.\nTake one down and pass it around, 98 bottles of beer on the wall.\n"
-    verse 99 |> should equal expected
+    let expected = 
+        [ "99 bottles of beer on the wall, 99 bottles of beer.";
+          "Take one down and pass it around, 98 bottles of beer on the wall." ]
+    recite 99 1 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
 let ``Last generic verse`` () =
-    let expected = "3 bottles of beer on the wall, 3 bottles of beer.\nTake one down and pass it around, 2 bottles of beer on the wall.\n"
-    verse 3 |> should equal expected
+    let expected = 
+        [ "3 bottles of beer on the wall, 3 bottles of beer.";
+          "Take one down and pass it around, 2 bottles of beer on the wall." ]
+    recite 3 1 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
-let ``Verse 2`` () =
-    let expected = "2 bottles of beer on the wall, 2 bottles of beer.\nTake one down and pass it around, 1 bottle of beer on the wall.\n"
-    verse 2 |> should equal expected
+let ``Verse with 2 bottles`` () =
+    let expected = 
+        [ "2 bottles of beer on the wall, 2 bottles of beer.";
+          "Take one down and pass it around, 1 bottle of beer on the wall." ]
+    recite 2 1 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
-let ``Verse 1`` () =
-    let expected = "1 bottle of beer on the wall, 1 bottle of beer.\nTake it down and pass it around, no more bottles of beer on the wall.\n"
-    verse 1 |> should equal expected
+let ``Verse with 1 bottle`` () =
+    let expected = 
+        [ "1 bottle of beer on the wall, 1 bottle of beer.";
+          "Take it down and pass it around, no more bottles of beer on the wall." ]
+    recite 1 1 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
-let ``Verse 0`` () =
-    let expected = "No more bottles of beer on the wall, no more bottles of beer.\nGo to the store and buy some more, 99 bottles of beer on the wall.\n"
-    verse 0 |> should equal expected
+let ``Verse with 0 bottles`` () =
+    let expected = 
+        [ "No more bottles of beer on the wall, no more bottles of beer.";
+          "Go to the store and buy some more, 99 bottles of beer on the wall." ]
+    recite 0 1 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
 let ``First two verses`` () =
-    let expected = "99 bottles of beer on the wall, 99 bottles of beer.\nTake one down and pass it around, 98 bottles of beer on the wall.\n\n98 bottles of beer on the wall, 98 bottles of beer.\nTake one down and pass it around, 97 bottles of beer on the wall.\n"
-    verses 99 98 |> should equal expected
+    let expected = 
+        [ "99 bottles of beer on the wall, 99 bottles of beer.";
+          "Take one down and pass it around, 98 bottles of beer on the wall.";
+          "";
+          "98 bottles of beer on the wall, 98 bottles of beer.";
+          "Take one down and pass it around, 97 bottles of beer on the wall." ]
+    recite 99 2 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
 let ``Last three verses`` () =
-    let expected = "2 bottles of beer on the wall, 2 bottles of beer.\nTake one down and pass it around, 1 bottle of beer on the wall.\n\n1 bottle of beer on the wall, 1 bottle of beer.\nTake it down and pass it around, no more bottles of beer on the wall.\n\nNo more bottles of beer on the wall, no more bottles of beer.\nGo to the store and buy some more, 99 bottles of beer on the wall.\n"
-    verses 2 0 |> should equal expected
+    let expected = 
+        [ "2 bottles of beer on the wall, 2 bottles of beer.";
+          "Take one down and pass it around, 1 bottle of beer on the wall.";
+          "";
+          "1 bottle of beer on the wall, 1 bottle of beer.";
+          "Take it down and pass it around, no more bottles of beer on the wall.";
+          "";
+          "No more bottles of beer on the wall, no more bottles of beer.";
+          "Go to the store and buy some more, 99 bottles of beer on the wall." ]
+    recite 2 3 |> should equal expected
 
 [<Fact(Skip = "Remove to run test")>]
 let ``All verses`` () =
-    let expected = "99 bottles of beer on the wall, 99 bottles of beer.\nTake one down and pass it around, 98 bottles of beer on the wall.\n\n98 bottles of beer on the wall, 98 bottles of beer.\nTake one down and pass it around, 97 bottles of beer on the wall.\n\n97 bottles of beer on the wall, 97 bottles of beer.\nTake one down and pass it around, 96 bottles of beer on the wall.\n\n96 bottles of beer on the wall, 96 bottles of beer.\nTake one down and pass it around, 95 bottles of beer on the wall.\n\n95 bottles of beer on the wall, 95 bottles of beer.\nTake one down and pass it around, 94 bottles of beer on the wall.\n\n94 bottles of beer on the wall, 94 bottles of beer.\nTake one down and pass it around, 93 bottles of beer on the wall.\n\n93 bottles of beer on the wall, 93 bottles of beer.\nTake one down and pass it around, 92 bottles of beer on the wall.\n\n92 bottles of beer on the wall, 92 bottles of beer.\nTake one down and pass it around, 91 bottles of beer on the wall.\n\n91 bottles of beer on the wall, 91 bottles of beer.\nTake one down and pass it around, 90 bottles of beer on the wall.\n\n90 bottles of beer on the wall, 90 bottles of beer.\nTake one down and pass it around, 89 bottles of beer on the wall.\n\n89 bottles of beer on the wall, 89 bottles of beer.\nTake one down and pass it around, 88 bottles of beer on the wall.\n\n88 bottles of beer on the wall, 88 bottles of beer.\nTake one down and pass it around, 87 bottles of beer on the wall.\n\n87 bottles of beer on the wall, 87 bottles of beer.\nTake one down and pass it around, 86 bottles of beer on the wall.\n\n86 bottles of beer on the wall, 86 bottles of beer.\nTake one down and pass it around, 85 bottles of beer on the wall.\n\n85 bottles of beer on the wall, 85 bottles of beer.\nTake one down and pass it around, 84 bottles of beer on the wall.\n\n84 bottles of beer on the wall, 84 bottles of beer.\nTake one down and pass it around, 83 bottles of beer on the wall.\n\n83 bottles of beer on the wall, 83 bottles of beer.\nTake one down and pass it around, 82 bottles of beer on the wall.\n\n82 bottles of beer on the wall, 82 bottles of beer.\nTake one down and pass it around, 81 bottles of beer on the wall.\n\n81 bottles of beer on the wall, 81 bottles of beer.\nTake one down and pass it around, 80 bottles of beer on the wall.\n\n80 bottles of beer on the wall, 80 bottles of beer.\nTake one down and pass it around, 79 bottles of beer on the wall.\n\n79 bottles of beer on the wall, 79 bottles of beer.\nTake one down and pass it around, 78 bottles of beer on the wall.\n\n78 bottles of beer on the wall, 78 bottles of beer.\nTake one down and pass it around, 77 bottles of beer on the wall.\n\n77 bottles of beer on the wall, 77 bottles of beer.\nTake one down and pass it around, 76 bottles of beer on the wall.\n\n76 bottles of beer on the wall, 76 bottles of beer.\nTake one down and pass it around, 75 bottles of beer on the wall.\n\n75 bottles of beer on the wall, 75 bottles of beer.\nTake one down and pass it around, 74 bottles of beer on the wall.\n\n74 bottles of beer on the wall, 74 bottles of beer.\nTake one down and pass it around, 73 bottles of beer on the wall.\n\n73 bottles of beer on the wall, 73 bottles of beer.\nTake one down and pass it around, 72 bottles of beer on the wall.\n\n72 bottles of beer on the wall, 72 bottles of beer.\nTake one down and pass it around, 71 bottles of beer on the wall.\n\n71 bottles of beer on the wall, 71 bottles of beer.\nTake one down and pass it around, 70 bottles of beer on the wall.\n\n70 bottles of beer on the wall, 70 bottles of beer.\nTake one down and pass it around, 69 bottles of beer on the wall.\n\n69 bottles of beer on the wall, 69 bottles of beer.\nTake one down and pass it around, 68 bottles of beer on the wall.\n\n68 bottles of beer on the wall, 68 bottles of beer.\nTake one down and pass it around, 67 bottles of beer on the wall.\n\n67 bottles of beer on the wall, 67 bottles of beer.\nTake one down and pass it around, 66 bottles of beer on the wall.\n\n66 bottles of beer on the wall, 66 bottles of beer.\nTake one down and pass it around, 65 bottles of beer on the wall.\n\n65 bottles of beer on the wall, 65 bottles of beer.\nTake one down and pass it around, 64 bottles of beer on the wall.\n\n64 bottles of beer on the wall, 64 bottles of beer.\nTake one down and pass it around, 63 bottles of beer on the wall.\n\n63 bottles of beer on the wall, 63 bottles of beer.\nTake one down and pass it around, 62 bottles of beer on the wall.\n\n62 bottles of beer on the wall, 62 bottles of beer.\nTake one down and pass it around, 61 bottles of beer on the wall.\n\n61 bottles of beer on the wall, 61 bottles of beer.\nTake one down and pass it around, 60 bottles of beer on the wall.\n\n60 bottles of beer on the wall, 60 bottles of beer.\nTake one down and pass it around, 59 bottles of beer on the wall.\n\n59 bottles of beer on the wall, 59 bottles of beer.\nTake one down and pass it around, 58 bottles of beer on the wall.\n\n58 bottles of beer on the wall, 58 bottles of beer.\nTake one down and pass it around, 57 bottles of beer on the wall.\n\n57 bottles of beer on the wall, 57 bottles of beer.\nTake one down and pass it around, 56 bottles of beer on the wall.\n\n56 bottles of beer on the wall, 56 bottles of beer.\nTake one down and pass it around, 55 bottles of beer on the wall.\n\n55 bottles of beer on the wall, 55 bottles of beer.\nTake one down and pass it around, 54 bottles of beer on the wall.\n\n54 bottles of beer on the wall, 54 bottles of beer.\nTake one down and pass it around, 53 bottles of beer on the wall.\n\n53 bottles of beer on the wall, 53 bottles of beer.\nTake one down and pass it around, 52 bottles of beer on the wall.\n\n52 bottles of beer on the wall, 52 bottles of beer.\nTake one down and pass it around, 51 bottles of beer on the wall.\n\n51 bottles of beer on the wall, 51 bottles of beer.\nTake one down and pass it around, 50 bottles of beer on the wall.\n\n50 bottles of beer on the wall, 50 bottles of beer.\nTake one down and pass it around, 49 bottles of beer on the wall.\n\n49 bottles of beer on the wall, 49 bottles of beer.\nTake one down and pass it around, 48 bottles of beer on the wall.\n\n48 bottles of beer on the wall, 48 bottles of beer.\nTake one down and pass it around, 47 bottles of beer on the wall.\n\n47 bottles of beer on the wall, 47 bottles of beer.\nTake one down and pass it around, 46 bottles of beer on the wall.\n\n46 bottles of beer on the wall, 46 bottles of beer.\nTake one down and pass it around, 45 bottles of beer on the wall.\n\n45 bottles of beer on the wall, 45 bottles of beer.\nTake one down and pass it around, 44 bottles of beer on the wall.\n\n44 bottles of beer on the wall, 44 bottles of beer.\nTake one down and pass it around, 43 bottles of beer on the wall.\n\n43 bottles of beer on the wall, 43 bottles of beer.\nTake one down and pass it around, 42 bottles of beer on the wall.\n\n42 bottles of beer on the wall, 42 bottles of beer.\nTake one down and pass it around, 41 bottles of beer on the wall.\n\n41 bottles of beer on the wall, 41 bottles of beer.\nTake one down and pass it around, 40 bottles of beer on the wall.\n\n40 bottles of beer on the wall, 40 bottles of beer.\nTake one down and pass it around, 39 bottles of beer on the wall.\n\n39 bottles of beer on the wall, 39 bottles of beer.\nTake one down and pass it around, 38 bottles of beer on the wall.\n\n38 bottles of beer on the wall, 38 bottles of beer.\nTake one down and pass it around, 37 bottles of beer on the wall.\n\n37 bottles of beer on the wall, 37 bottles of beer.\nTake one down and pass it around, 36 bottles of beer on the wall.\n\n36 bottles of beer on the wall, 36 bottles of beer.\nTake one down and pass it around, 35 bottles of beer on the wall.\n\n35 bottles of beer on the wall, 35 bottles of beer.\nTake one down and pass it around, 34 bottles of beer on the wall.\n\n34 bottles of beer on the wall, 34 bottles of beer.\nTake one down and pass it around, 33 bottles of beer on the wall.\n\n33 bottles of beer on the wall, 33 bottles of beer.\nTake one down and pass it around, 32 bottles of beer on the wall.\n\n32 bottles of beer on the wall, 32 bottles of beer.\nTake one down and pass it around, 31 bottles of beer on the wall.\n\n31 bottles of beer on the wall, 31 bottles of beer.\nTake one down and pass it around, 30 bottles of beer on the wall.\n\n30 bottles of beer on the wall, 30 bottles of beer.\nTake one down and pass it around, 29 bottles of beer on the wall.\n\n29 bottles of beer on the wall, 29 bottles of beer.\nTake one down and pass it around, 28 bottles of beer on the wall.\n\n28 bottles of beer on the wall, 28 bottles of beer.\nTake one down and pass it around, 27 bottles of beer on the wall.\n\n27 bottles of beer on the wall, 27 bottles of beer.\nTake one down and pass it around, 26 bottles of beer on the wall.\n\n26 bottles of beer on the wall, 26 bottles of beer.\nTake one down and pass it around, 25 bottles of beer on the wall.\n\n25 bottles of beer on the wall, 25 bottles of beer.\nTake one down and pass it around, 24 bottles of beer on the wall.\n\n24 bottles of beer on the wall, 24 bottles of beer.\nTake one down and pass it around, 23 bottles of beer on the wall.\n\n23 bottles of beer on the wall, 23 bottles of beer.\nTake one down and pass it around, 22 bottles of beer on the wall.\n\n22 bottles of beer on the wall, 22 bottles of beer.\nTake one down and pass it around, 21 bottles of beer on the wall.\n\n21 bottles of beer on the wall, 21 bottles of beer.\nTake one down and pass it around, 20 bottles of beer on the wall.\n\n20 bottles of beer on the wall, 20 bottles of beer.\nTake one down and pass it around, 19 bottles of beer on the wall.\n\n19 bottles of beer on the wall, 19 bottles of beer.\nTake one down and pass it around, 18 bottles of beer on the wall.\n\n18 bottles of beer on the wall, 18 bottles of beer.\nTake one down and pass it around, 17 bottles of beer on the wall.\n\n17 bottles of beer on the wall, 17 bottles of beer.\nTake one down and pass it around, 16 bottles of beer on the wall.\n\n16 bottles of beer on the wall, 16 bottles of beer.\nTake one down and pass it around, 15 bottles of beer on the wall.\n\n15 bottles of beer on the wall, 15 bottles of beer.\nTake one down and pass it around, 14 bottles of beer on the wall.\n\n14 bottles of beer on the wall, 14 bottles of beer.\nTake one down and pass it around, 13 bottles of beer on the wall.\n\n13 bottles of beer on the wall, 13 bottles of beer.\nTake one down and pass it around, 12 bottles of beer on the wall.\n\n12 bottles of beer on the wall, 12 bottles of beer.\nTake one down and pass it around, 11 bottles of beer on the wall.\n\n11 bottles of beer on the wall, 11 bottles of beer.\nTake one down and pass it around, 10 bottles of beer on the wall.\n\n10 bottles of beer on the wall, 10 bottles of beer.\nTake one down and pass it around, 9 bottles of beer on the wall.\n\n9 bottles of beer on the wall, 9 bottles of beer.\nTake one down and pass it around, 8 bottles of beer on the wall.\n\n8 bottles of beer on the wall, 8 bottles of beer.\nTake one down and pass it around, 7 bottles of beer on the wall.\n\n7 bottles of beer on the wall, 7 bottles of beer.\nTake one down and pass it around, 6 bottles of beer on the wall.\n\n6 bottles of beer on the wall, 6 bottles of beer.\nTake one down and pass it around, 5 bottles of beer on the wall.\n\n5 bottles of beer on the wall, 5 bottles of beer.\nTake one down and pass it around, 4 bottles of beer on the wall.\n\n4 bottles of beer on the wall, 4 bottles of beer.\nTake one down and pass it around, 3 bottles of beer on the wall.\n\n3 bottles of beer on the wall, 3 bottles of beer.\nTake one down and pass it around, 2 bottles of beer on the wall.\n\n2 bottles of beer on the wall, 2 bottles of beer.\nTake one down and pass it around, 1 bottle of beer on the wall.\n\n1 bottle of beer on the wall, 1 bottle of beer.\nTake it down and pass it around, no more bottles of beer on the wall.\n\nNo more bottles of beer on the wall, no more bottles of beer.\nGo to the store and buy some more, 99 bottles of beer on the wall.\n"
-    verses 99 0 |> should equal expected
+    let expected = 
+        [ "99 bottles of beer on the wall, 99 bottles of beer.";
+          "Take one down and pass it around, 98 bottles of beer on the wall.";
+          "";
+          "98 bottles of beer on the wall, 98 bottles of beer.";
+          "Take one down and pass it around, 97 bottles of beer on the wall.";
+          "";
+          "97 bottles of beer on the wall, 97 bottles of beer.";
+          "Take one down and pass it around, 96 bottles of beer on the wall.";
+          "";
+          "96 bottles of beer on the wall, 96 bottles of beer.";
+          "Take one down and pass it around, 95 bottles of beer on the wall.";
+          "";
+          "95 bottles of beer on the wall, 95 bottles of beer.";
+          "Take one down and pass it around, 94 bottles of beer on the wall.";
+          "";
+          "94 bottles of beer on the wall, 94 bottles of beer.";
+          "Take one down and pass it around, 93 bottles of beer on the wall.";
+          "";
+          "93 bottles of beer on the wall, 93 bottles of beer.";
+          "Take one down and pass it around, 92 bottles of beer on the wall.";
+          "";
+          "92 bottles of beer on the wall, 92 bottles of beer.";
+          "Take one down and pass it around, 91 bottles of beer on the wall.";
+          "";
+          "91 bottles of beer on the wall, 91 bottles of beer.";
+          "Take one down and pass it around, 90 bottles of beer on the wall.";
+          "";
+          "90 bottles of beer on the wall, 90 bottles of beer.";
+          "Take one down and pass it around, 89 bottles of beer on the wall.";
+          "";
+          "89 bottles of beer on the wall, 89 bottles of beer.";
+          "Take one down and pass it around, 88 bottles of beer on the wall.";
+          "";
+          "88 bottles of beer on the wall, 88 bottles of beer.";
+          "Take one down and pass it around, 87 bottles of beer on the wall.";
+          "";
+          "87 bottles of beer on the wall, 87 bottles of beer.";
+          "Take one down and pass it around, 86 bottles of beer on the wall.";
+          "";
+          "86 bottles of beer on the wall, 86 bottles of beer.";
+          "Take one down and pass it around, 85 bottles of beer on the wall.";
+          "";
+          "85 bottles of beer on the wall, 85 bottles of beer.";
+          "Take one down and pass it around, 84 bottles of beer on the wall.";
+          "";
+          "84 bottles of beer on the wall, 84 bottles of beer.";
+          "Take one down and pass it around, 83 bottles of beer on the wall.";
+          "";
+          "83 bottles of beer on the wall, 83 bottles of beer.";
+          "Take one down and pass it around, 82 bottles of beer on the wall.";
+          "";
+          "82 bottles of beer on the wall, 82 bottles of beer.";
+          "Take one down and pass it around, 81 bottles of beer on the wall.";
+          "";
+          "81 bottles of beer on the wall, 81 bottles of beer.";
+          "Take one down and pass it around, 80 bottles of beer on the wall.";
+          "";
+          "80 bottles of beer on the wall, 80 bottles of beer.";
+          "Take one down and pass it around, 79 bottles of beer on the wall.";
+          "";
+          "79 bottles of beer on the wall, 79 bottles of beer.";
+          "Take one down and pass it around, 78 bottles of beer on the wall.";
+          "";
+          "78 bottles of beer on the wall, 78 bottles of beer.";
+          "Take one down and pass it around, 77 bottles of beer on the wall.";
+          "";
+          "77 bottles of beer on the wall, 77 bottles of beer.";
+          "Take one down and pass it around, 76 bottles of beer on the wall.";
+          "";
+          "76 bottles of beer on the wall, 76 bottles of beer.";
+          "Take one down and pass it around, 75 bottles of beer on the wall.";
+          "";
+          "75 bottles of beer on the wall, 75 bottles of beer.";
+          "Take one down and pass it around, 74 bottles of beer on the wall.";
+          "";
+          "74 bottles of beer on the wall, 74 bottles of beer.";
+          "Take one down and pass it around, 73 bottles of beer on the wall.";
+          "";
+          "73 bottles of beer on the wall, 73 bottles of beer.";
+          "Take one down and pass it around, 72 bottles of beer on the wall.";
+          "";
+          "72 bottles of beer on the wall, 72 bottles of beer.";
+          "Take one down and pass it around, 71 bottles of beer on the wall.";
+          "";
+          "71 bottles of beer on the wall, 71 bottles of beer.";
+          "Take one down and pass it around, 70 bottles of beer on the wall.";
+          "";
+          "70 bottles of beer on the wall, 70 bottles of beer.";
+          "Take one down and pass it around, 69 bottles of beer on the wall.";
+          "";
+          "69 bottles of beer on the wall, 69 bottles of beer.";
+          "Take one down and pass it around, 68 bottles of beer on the wall.";
+          "";
+          "68 bottles of beer on the wall, 68 bottles of beer.";
+          "Take one down and pass it around, 67 bottles of beer on the wall.";
+          "";
+          "67 bottles of beer on the wall, 67 bottles of beer.";
+          "Take one down and pass it around, 66 bottles of beer on the wall.";
+          "";
+          "66 bottles of beer on the wall, 66 bottles of beer.";
+          "Take one down and pass it around, 65 bottles of beer on the wall.";
+          "";
+          "65 bottles of beer on the wall, 65 bottles of beer.";
+          "Take one down and pass it around, 64 bottles of beer on the wall.";
+          "";
+          "64 bottles of beer on the wall, 64 bottles of beer.";
+          "Take one down and pass it around, 63 bottles of beer on the wall.";
+          "";
+          "63 bottles of beer on the wall, 63 bottles of beer.";
+          "Take one down and pass it around, 62 bottles of beer on the wall.";
+          "";
+          "62 bottles of beer on the wall, 62 bottles of beer.";
+          "Take one down and pass it around, 61 bottles of beer on the wall.";
+          "";
+          "61 bottles of beer on the wall, 61 bottles of beer.";
+          "Take one down and pass it around, 60 bottles of beer on the wall.";
+          "";
+          "60 bottles of beer on the wall, 60 bottles of beer.";
+          "Take one down and pass it around, 59 bottles of beer on the wall.";
+          "";
+          "59 bottles of beer on the wall, 59 bottles of beer.";
+          "Take one down and pass it around, 58 bottles of beer on the wall.";
+          "";
+          "58 bottles of beer on the wall, 58 bottles of beer.";
+          "Take one down and pass it around, 57 bottles of beer on the wall.";
+          "";
+          "57 bottles of beer on the wall, 57 bottles of beer.";
+          "Take one down and pass it around, 56 bottles of beer on the wall.";
+          "";
+          "56 bottles of beer on the wall, 56 bottles of beer.";
+          "Take one down and pass it around, 55 bottles of beer on the wall.";
+          "";
+          "55 bottles of beer on the wall, 55 bottles of beer.";
+          "Take one down and pass it around, 54 bottles of beer on the wall.";
+          "";
+          "54 bottles of beer on the wall, 54 bottles of beer.";
+          "Take one down and pass it around, 53 bottles of beer on the wall.";
+          "";
+          "53 bottles of beer on the wall, 53 bottles of beer.";
+          "Take one down and pass it around, 52 bottles of beer on the wall.";
+          "";
+          "52 bottles of beer on the wall, 52 bottles of beer.";
+          "Take one down and pass it around, 51 bottles of beer on the wall.";
+          "";
+          "51 bottles of beer on the wall, 51 bottles of beer.";
+          "Take one down and pass it around, 50 bottles of beer on the wall.";
+          "";
+          "50 bottles of beer on the wall, 50 bottles of beer.";
+          "Take one down and pass it around, 49 bottles of beer on the wall.";
+          "";
+          "49 bottles of beer on the wall, 49 bottles of beer.";
+          "Take one down and pass it around, 48 bottles of beer on the wall.";
+          "";
+          "48 bottles of beer on the wall, 48 bottles of beer.";
+          "Take one down and pass it around, 47 bottles of beer on the wall.";
+          "";
+          "47 bottles of beer on the wall, 47 bottles of beer.";
+          "Take one down and pass it around, 46 bottles of beer on the wall.";
+          "";
+          "46 bottles of beer on the wall, 46 bottles of beer.";
+          "Take one down and pass it around, 45 bottles of beer on the wall.";
+          "";
+          "45 bottles of beer on the wall, 45 bottles of beer.";
+          "Take one down and pass it around, 44 bottles of beer on the wall.";
+          "";
+          "44 bottles of beer on the wall, 44 bottles of beer.";
+          "Take one down and pass it around, 43 bottles of beer on the wall.";
+          "";
+          "43 bottles of beer on the wall, 43 bottles of beer.";
+          "Take one down and pass it around, 42 bottles of beer on the wall.";
+          "";
+          "42 bottles of beer on the wall, 42 bottles of beer.";
+          "Take one down and pass it around, 41 bottles of beer on the wall.";
+          "";
+          "41 bottles of beer on the wall, 41 bottles of beer.";
+          "Take one down and pass it around, 40 bottles of beer on the wall.";
+          "";
+          "40 bottles of beer on the wall, 40 bottles of beer.";
+          "Take one down and pass it around, 39 bottles of beer on the wall.";
+          "";
+          "39 bottles of beer on the wall, 39 bottles of beer.";
+          "Take one down and pass it around, 38 bottles of beer on the wall.";
+          "";
+          "38 bottles of beer on the wall, 38 bottles of beer.";
+          "Take one down and pass it around, 37 bottles of beer on the wall.";
+          "";
+          "37 bottles of beer on the wall, 37 bottles of beer.";
+          "Take one down and pass it around, 36 bottles of beer on the wall.";
+          "";
+          "36 bottles of beer on the wall, 36 bottles of beer.";
+          "Take one down and pass it around, 35 bottles of beer on the wall.";
+          "";
+          "35 bottles of beer on the wall, 35 bottles of beer.";
+          "Take one down and pass it around, 34 bottles of beer on the wall.";
+          "";
+          "34 bottles of beer on the wall, 34 bottles of beer.";
+          "Take one down and pass it around, 33 bottles of beer on the wall.";
+          "";
+          "33 bottles of beer on the wall, 33 bottles of beer.";
+          "Take one down and pass it around, 32 bottles of beer on the wall.";
+          "";
+          "32 bottles of beer on the wall, 32 bottles of beer.";
+          "Take one down and pass it around, 31 bottles of beer on the wall.";
+          "";
+          "31 bottles of beer on the wall, 31 bottles of beer.";
+          "Take one down and pass it around, 30 bottles of beer on the wall.";
+          "";
+          "30 bottles of beer on the wall, 30 bottles of beer.";
+          "Take one down and pass it around, 29 bottles of beer on the wall.";
+          "";
+          "29 bottles of beer on the wall, 29 bottles of beer.";
+          "Take one down and pass it around, 28 bottles of beer on the wall.";
+          "";
+          "28 bottles of beer on the wall, 28 bottles of beer.";
+          "Take one down and pass it around, 27 bottles of beer on the wall.";
+          "";
+          "27 bottles of beer on the wall, 27 bottles of beer.";
+          "Take one down and pass it around, 26 bottles of beer on the wall.";
+          "";
+          "26 bottles of beer on the wall, 26 bottles of beer.";
+          "Take one down and pass it around, 25 bottles of beer on the wall.";
+          "";
+          "25 bottles of beer on the wall, 25 bottles of beer.";
+          "Take one down and pass it around, 24 bottles of beer on the wall.";
+          "";
+          "24 bottles of beer on the wall, 24 bottles of beer.";
+          "Take one down and pass it around, 23 bottles of beer on the wall.";
+          "";
+          "23 bottles of beer on the wall, 23 bottles of beer.";
+          "Take one down and pass it around, 22 bottles of beer on the wall.";
+          "";
+          "22 bottles of beer on the wall, 22 bottles of beer.";
+          "Take one down and pass it around, 21 bottles of beer on the wall.";
+          "";
+          "21 bottles of beer on the wall, 21 bottles of beer.";
+          "Take one down and pass it around, 20 bottles of beer on the wall.";
+          "";
+          "20 bottles of beer on the wall, 20 bottles of beer.";
+          "Take one down and pass it around, 19 bottles of beer on the wall.";
+          "";
+          "19 bottles of beer on the wall, 19 bottles of beer.";
+          "Take one down and pass it around, 18 bottles of beer on the wall.";
+          "";
+          "18 bottles of beer on the wall, 18 bottles of beer.";
+          "Take one down and pass it around, 17 bottles of beer on the wall.";
+          "";
+          "17 bottles of beer on the wall, 17 bottles of beer.";
+          "Take one down and pass it around, 16 bottles of beer on the wall.";
+          "";
+          "16 bottles of beer on the wall, 16 bottles of beer.";
+          "Take one down and pass it around, 15 bottles of beer on the wall.";
+          "";
+          "15 bottles of beer on the wall, 15 bottles of beer.";
+          "Take one down and pass it around, 14 bottles of beer on the wall.";
+          "";
+          "14 bottles of beer on the wall, 14 bottles of beer.";
+          "Take one down and pass it around, 13 bottles of beer on the wall.";
+          "";
+          "13 bottles of beer on the wall, 13 bottles of beer.";
+          "Take one down and pass it around, 12 bottles of beer on the wall.";
+          "";
+          "12 bottles of beer on the wall, 12 bottles of beer.";
+          "Take one down and pass it around, 11 bottles of beer on the wall.";
+          "";
+          "11 bottles of beer on the wall, 11 bottles of beer.";
+          "Take one down and pass it around, 10 bottles of beer on the wall.";
+          "";
+          "10 bottles of beer on the wall, 10 bottles of beer.";
+          "Take one down and pass it around, 9 bottles of beer on the wall.";
+          "";
+          "9 bottles of beer on the wall, 9 bottles of beer.";
+          "Take one down and pass it around, 8 bottles of beer on the wall.";
+          "";
+          "8 bottles of beer on the wall, 8 bottles of beer.";
+          "Take one down and pass it around, 7 bottles of beer on the wall.";
+          "";
+          "7 bottles of beer on the wall, 7 bottles of beer.";
+          "Take one down and pass it around, 6 bottles of beer on the wall.";
+          "";
+          "6 bottles of beer on the wall, 6 bottles of beer.";
+          "Take one down and pass it around, 5 bottles of beer on the wall.";
+          "";
+          "5 bottles of beer on the wall, 5 bottles of beer.";
+          "Take one down and pass it around, 4 bottles of beer on the wall.";
+          "";
+          "4 bottles of beer on the wall, 4 bottles of beer.";
+          "Take one down and pass it around, 3 bottles of beer on the wall.";
+          "";
+          "3 bottles of beer on the wall, 3 bottles of beer.";
+          "Take one down and pass it around, 2 bottles of beer on the wall.";
+          "";
+          "2 bottles of beer on the wall, 2 bottles of beer.";
+          "Take one down and pass it around, 1 bottle of beer on the wall.";
+          "";
+          "1 bottle of beer on the wall, 1 bottle of beer.";
+          "Take it down and pass it around, no more bottles of beer on the wall.";
+          "";
+          "No more bottles of beer on the wall, no more bottles of beer.";
+          "Go to the store and buy some more, 99 bottles of beer on the wall." ]
+    recite 99 100 |> should equal expected