From 9570363aec35e187e2395b1760a4b94e71580ac9 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Wed, 29 Jul 2015 15:55:05 -0700 Subject: 1885 --- html/factorial.mu.html | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) (limited to 'html/factorial.mu.html') diff --git a/html/factorial.mu.html b/html/factorial.mu.html index 54a70688..8cdc3ef6 100644 --- a/html/factorial.mu.html +++ b/html/factorial.mu.html @@ -13,13 +13,13 @@ pre { white-space: pre-wrap; font-family: monospace; color: #eeeeee; background-color: #080808; } body { font-family: monospace; color: #eeeeee; background-color: #080808; } * { font-size: 1.05em; } -.muScenario { color: #00af00; } +.muRecipe { color: #ff8700; } .Delimiter { color: #a04060; } +.muScenario { color: #00af00; } .Comment { color: #9090ff; } .Constant { color: #00a0a0; } .Special { color: #ff6060; } .muControl { color: #c0a020; } -.muRecipe { color: #ff8700; } --> @@ -35,8 +35,8 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } recipe main [ local-scope - x:number <- factorial 5:literal - $print [result: ], x:number, [ + x:number <- factorial 5 + $print [result: ], x, [ ] ] @@ -45,24 +45,24 @@ body { font-family: monospace; color: #eeeeee; background-color: #080808; } n:number <- next-ingredient { # if n=0 return 1 - zero?:boolean <- equal n:number, 0:literal - break-unless zero?:boolean - reply 1:literal + zero?:boolean <- equal n, 0 + break-unless zero? + reply 1 } # return n * factorial(n-1) - x:number <- subtract n:number, 1:literal - subresult:number <- factorial x:number - result:number <- multiply subresult:number, n:number - reply result:number + x:number <- subtract n, 1 + subresult:number <- factorial x + result:number <- multiply subresult, n + reply result ] # unit test scenario factorial-test [ run [ - 1:number <- factorial 5:literal + 1:number <- factorial 5 ] memory-should-contain [ - 1 <- 120 + 1 <- 120 ] ] -- cgit 1.4.1-2-gfad0