aboutsummaryrefslogtreecommitdiff
path: root/core/math.nom
diff options
context:
space:
mode:
Diffstat (limited to 'core/math.nom')
-rw-r--r--core/math.nom12
1 files changed, 8 insertions, 4 deletions
diff --git a/core/math.nom b/core/math.nom
index e79c8c3..c507b87 100644
--- a/core/math.nom
+++ b/core/math.nom
@@ -42,27 +42,31 @@ compile [all of %items, all %items] to
unless: (%items' "type") is "List"
return: Lua value "utils.all(\(%items as lua expr))"
%clauses <- []
- for all (%items' "value"): lua> "table.insert(\%clauses, \(% as lua expr));"
+ for % in (%items' "value")
+ lua> "table.insert(\%clauses, \(% as lua expr));"
return: Lua value "(\(%clauses joined with " and "))"
parse [not all of %items, not all %items] as: not (all of %items)
compile [any of %items, any %items] to
unless: (%items' "type") is "List"
return: Lua value "utils.any(\(%items as lua expr))"
%clauses <- []
- for all (%items' "value"): lua> "table.insert(\%clauses, \(% as lua expr));"
+ for % in (%items' "value")
+ lua> "table.insert(\%clauses, \(% as lua expr));"
return: Lua value "(\(%clauses joined with " or "))"
parse [none of %items, none %items] as: not (any of %items)
compile [sum of %items, sum %items] to
unless: (%items' "type") is "List"
return: Lua value "utils.sum(\(%items as lua expr))"
%clauses <- []
- for all (%items' "value"): lua> "table.insert(\%clauses, \(% as lua expr));"
+ for % in (%items' "value")
+ lua> "table.insert(\%clauses, \(% as lua expr));"
return: Lua value "(\(%clauses joined with " + "))"
compile [product of %items, product %items] to
unless: (%items' "type") is "List"
return: Lua value "utils.product(\(%items as lua expr))"
%clauses <- []
- for all (%items' "value"): lua> "table.insert(\%clauses, \(% as lua expr));"
+ for % in (%items' "value")
+ lua> "table.insert(\%clauses, \(% as lua expr));"
return: Lua value "(\(%clauses joined with " * "))"
action [avg of %items, average of %items]
=lua "(utils.sum(\%items)/#\%items)"