All pastes #257862 Raw Edit

Someone

public text v1 · immutable
#257862 ·published 2006-11-25 21:24 UTC
rendered paste body
fun	deckCreatorClubs 1 = [];
|	deckCreatorClubs n = makeCard("spader",n)::deckCreatorClubs(n-1);

fun	deckCreatorDiamonds 1 = deckCreatorClubs(15)
| 	deckCreatorDiamonds n = makeCard("spader",n)::deckCreatorDiamonds(n-1);

fun	deckCreatorHearts 1 = deckCreatorDiamonds(15)
| 	deckCreatorHearts n = makeCard("spader",n)::deckCreatorHearts(n-1);

fun	deckCreatorSpades 1 = deckCreatorHearts(15)
|	deckCreatorSpades n = makeCard("spader",n)::deckCreatorSpades(n-1);

fun makeDeck() = deckCreatorSpades(15);


Varför får detta ett Match fel?