September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/Higher-order-functions/PostScript/higher-order-functions.ps
+++ b/Task/Higher-order-functions/PostScript/higher-order-functions.ps
@ -1,2 +1,10 @@
-/x_times_3_sub_1 {3 * 1 sub}.
-[0 1 2 3 4] {x_times_3_sub_1} map
+% operator example
+% 'ifelse' is passed a boolean and two procedures
+/a 5 def
+a 0 gt { (Hello!) } { (World?) } ifelse ==
+
+% procedure example
+% 'bar' is loaded onto the stack and passed to 'foo'
+/foo { exec } def
+/bar { (Hello, world!) } def
+/bar load foo ==