#N canvas 13 112 632 642 10;
#X floatatom 17 76 5 0 0 0 - - -;
#X floatatom 62 76 5 0 0 0 - - -;
#X floatatom 109 76 5 0 0 0 - - -;
#X floatatom 17 245 5 0 0 0 - - -;
#X floatatom 56 245 5 0 0 0 - - -;
#X floatatom 96 245 5 0 0 0 - - -;
#X obj 17 116 #pack 3;
#X obj 17 147 #scan +;
#X obj 17 206 #unpack 3;
#X obj 103 630 #fold +;
#X obj 0 0 doc_h;
#X obj 3 630 doc_also;
#X obj 3 274 doc_c 1;
#X obj 3 362 doc_i 1;
#X obj 3 568 doc_o 1;
#X obj 14 598 doc_oo 0;
#X obj 14 304 doc_cc 0;
#X text 69 35 computes subtotals and stuff;
#X text 165 74 replaces every Dim(last) subgrid by all the results
of cascading the operator on that subgrid \, producing a Dim(dims \,
last) grid.;
#X text 165 127 For example \, with base value 0 and operation + on
grid "2 3 5 7" will compute 0+2=2 \, 2+3=5 \, 5+5=10 \, 10+7=17 \,
and give the subtotals "2 5 10 17".;
#X obj 14 392 doc_ii 0;
#X obj 97 392 doc_m i0 grid;
#X obj 97 453 doc_m i0 op;
#X obj 97 475 doc_m i0 seed;
#X text 165 191 [#scan +] computes subtotals \; this can be used \,
for example \, to convert a regular probability distribution into a
cumulative one. (or in general \, discrete integration);
#X obj 0 650 doc_f;
#X obj 97 598 doc_m o0 grid;
#X obj 97 304 doc_m c0 symbol;
#X obj 232 453 doc_same 0;
#X text 232 475 the initial value for the scanning. (default: none)
;
#X text 232 497 this can be a grid of any size \, and this decides
the size of the subgrids we are working on: a seed that has N dimensions
will cause the scanning to happen on the dimension that is just before
the last N dimensions.;
#X text 232 392 replaces every subgrid the result (of one or more dimensions)
by the partial results of a cascade on that subgrid. [#scan +] on grid
"2 3 5 7" does 0+2=2 \, 2+3=5 \, 5+5=10 \, 10+7=17 \, thus will produce
grid "2 5 10 17".;
#X text 232 598 Outputs a grid of the same size as the input.;
#X text 232 304 numop2: the operator to scan with.;
#X obj 232 326 doc_link numop2;
#X connect 0 0 6 0;
#X connect 1 0 6 1;
#X connect 2 0 6 2;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 8 1 4 0;
#X connect 8 2 5 0;
#X connect 11 1 9 0;
#X connect 21 1 31 0;
#X connect 22 1 28 0;
#X connect 23 1 29 0;
#X connect 23 1 30 0;
#X connect 26 1 32 0;
#X connect 27 1 33 0;
#X connect 27 1 34 0;