%% In teaching my kids Erlang, I needed a good example for them of
%% Recursion. Luckily, my kids know several (a thousand?) songs that
%% just repeat over and over. And over. And over.
%%
%% I decided to put the "Frog Song" into code, to give them an example
%% of recursion with a base case.
%%
%% Nothing fancy, but I think they get the idea.
-module(frogs_song).
-export([sing/1]).
sing(0) ->
io:format("Ribbit. Ribbit.~n");
sing(Count) ->
io:format(
"~w Green and speckled frogs sat on a speckled log.~n" ++
"Eating the most delicious bugs. One jumped into the~n" ++
"pool, where it was nice and cool, then there were ~w~n" ++
"green speckled frogs.~n~n",
[Count, Count - 1]),
sing(Count - 1).