0.8.1

svn path=/trunk/; revision=4710

139 files changed, 9174 insertions, 3281 deletions

diff --git a/externals/gridflow/ChangeLog b/externals/gridflow/ChangeLog
index 32329982..dcaf9bbc 100644
--- a/externals/gridflow/ChangeLog
+++ b/externals/gridflow/ChangeLog
@@ -1,4 +1,18 @@
-/* $Id: ChangeLog,v 1.1 2005-10-04 02:12:43 matju Exp $ */
+/* $Id: ChangeLog,v 1.2 2006-03-15 04:48:08 matju Exp $ */
+
+version 0.8.1 (2006.02.20):
+
+ * [ls] now supports wildcards: ? [] * **
+ * [#color] has new method: delegate
+ * added [regsub], [memstat], [listfind], [sendgui]
+ * x11: removed methods: draw,autodraw; added: use_shm,title
+ * examples : added markov.pd, bounce.pd, doodle.pd, mechanics.pd
+ * [#pack],[#unpack] now default to 2 values
+ * new numops: clip+,clip-
+ * fix for shared memory bug in [#out x11]
+ * added [#out tk]
+ * added [#out opengl] (using GLUT, hackishly)
+ * [unix_time] behaviour changed. (see manual)
 
 version 0.8.0 (2005.06.06):
 
@@ -12,7 +26,7 @@ version 0.8.0 (2005.06.06):
  * 13 object-classes rewritten from Ruby to Pd abstractions
  * merged [@],[@!] -> [#] and added message "op"
  * removed all one-input ops (see next...)
- * new two-input ops: abs- sq- avg hypot sqrt rand (soon erf* clip+ clip-)
+ * new two-input ops: abs- sq- avg hypot sqrt rand
  * [#fold],[#scan]: removed seed arg and right outlet; added msgs "op" and "seed"
  * [#inner],[#convolve] : added msgs "op" and "seed"
  * [#inner],[#convolve] : removed three first args (usually * + 0)
@@ -34,6 +48,7 @@ version 0.8.0 (2005.06.06):
    [exec], [plotter_control], [#text_to_image], [#hueshift], [rubyarray]
  * in pd_examples added Alx's epicycloid.pd, scratch_video.pd, threshold.pd
       and Matju's goop.pd
+ * some new/updated help files by Stéphanie Brodeur & Darsha Hewitt
 
 version 0.7.7 (2004.08.24):
 
diff --git a/externals/gridflow/Makefile.gf b/externals/gridflow/Makefile.gf
index a7c55274..3be2e3fa 100644
--- a/externals/gridflow/Makefile.gf
+++ b/externals/gridflow/Makefile.gf
@@ -1,4 +1,4 @@
-# $Id: Makefile.gf,v 1.1 2005-10-04 02:12:43 matju Exp $
+# $Id: Makefile.gf,v 1.2 2006-03-15 04:48:08 matju Exp $
 # This is an annex that covers what is not covered by the generated Makefile
 
 SYSTEM = $(shell uname -s | sed -e 's/^MINGW.*/NT/')
@@ -92,9 +92,6 @@ vvtest::
 	($(VALG) --leak-check=yes $(RUBY_INSTALL_NAME) -w $(TEST) &> gf-valgrind) || $(BACKTRACE)
 	less gf-valgrind
 
-test16:: test
-	(ruby-1.6.7 -w $(TEST)) || $(BACKTRACE)
-
 testpd::
 	rm -f gridflow.pd_linux && make && \
 	rm -f /opt/lib/ruby/site_ruby/1.7/i586-linux/gridflow.so && \
@@ -145,12 +142,12 @@ puredata-install::
 	cp doc/flow_classes/*.p* $(DOK)/flow_classes
 	cp -r images/ $(PUREDATA_PATH)/extra/gridflow
 	cp $(PD_LIB) pd_abstractions/*.pd $(PUREDATA_PATH)/extra
-	for z in camera_control motion_detection color mouse centroid centre_of_gravity fade \
+	for z in camera_control motion_detection color mouse centre_of_gravity fade \
 	apply_colormap_channelwise checkers contrast posterize ravel remap_image solarize spread \
 	rgb_to_greyscale greyscale_to_rgb rgb_to_yuv yuv_to_rgb; do \
 		cp pd_abstractions/\#$$z.pd $(PUREDATA_PATH)/extra/\@$$z.pd; done
 	mkdir -p $(PUREDATA_PATH)/extra/gridflow/icons
-	$(INSTALL_DATA) java/peephole.gif $(PUREDATA_PATH)/extra/gridflow/icons/peephole.gif
+	$(INSTALL_DATA) icons/peephole.gif $(PUREDATA_PATH)/extra/gridflow/icons/peephole.gif
 
 else
 
diff --git a/externals/gridflow/README b/externals/gridflow/README
index c334cecf..25de6ca9 100644
--- a/externals/gridflow/README
+++ b/externals/gridflow/README
@@ -43,4 +43,4 @@ Legalese
 
 CVS
 
-	$Id: README,v 1.1 2005-10-04 02:12:43 matju Exp $
+	$Id: README,v 1.2 2006-03-15 04:48:05 matju Exp $
diff --git a/externals/gridflow/TODO b/externals/gridflow/TODO
index 0a4c01d6..820511ae 100644
--- a/externals/gridflow/TODO
+++ b/externals/gridflow/TODO
@@ -1,46 +1,37 @@
-/* $Id: TODO,v 1.1 2005-10-04 02:12:43 matju Exp $ */
-
-matju cvs update -dP :
-P format/quicktimeapple.c
-cvs update: warning: pd_examples/binary_operations.pd was lost
-C pd_examples/color_correction.pd
-C pd_examples/convolve.pd
-C pd_examples/drag_rectangle.pd
-C pd_examples/eclipse.pd
-C pd_examples/linear_transform.pd
-C pd_examples/waves.pd
-
-Checking in README;
-/home/cvs/gridflow/README,v  <--  README
-new revision: 1.22; previous revision: 1.21
-done
-$helo_domain: web.artengine.ca
-$from_address: matju@web.artengine.ca (matju)
-loginfo.rb is writing changelog...done
-loginfo.rb is parsing log message...done
-loginfo.rb is testing modules...log info for `/home/cvs/gridflow/README' is not ready
-done
-loginfo.rb is composing a mail...done
-loginfo.rb is posting email to gridflow ...ERROR: cannot send email using MTA on ns
-450 <gridflow>: Recipient address rejected: User unknown in local recipient table
-
-done
-loginfo.rb is deleting tmp files...done
-
-AMD64 :
- char 1 1
- short 2 2
- int 4 4
- long 4 8
- long long 8 8
- float 4 4
- double 8 8
- void * 4 8
+/* $Id: TODO,v 1.2 2006-03-15 04:48:05 matju Exp $ */
 
-<ClaudiusMaximus> hmm, sending a [reassign( message to the right inlet of a [#store] segfaults Pd
+[ ] SWIG: try -fcompact -fvirtual
 
-<ClaudiusMaximus> hmmm, i get a segfault with a simple patch sending "reassign, put_at ( 0 0 ), reassign" to the right inlet of [#store ( 3 3 # 0 )]
+ClaudiusMaximus matju: [#draw_image] inlet 0 method "op <opname>" is undocumented, but very useful :)
+ClaudiusMaximus matju: [unix_time] is maldocumented, outlet 0 is a grid Dim[28](uint8), not a symbol
+
+
+[ ] pd_examples -> examples
+[ ] update doc
+[ ] 0.8.1
+[ ] make good use of the R type (automatic Ruby/C++ convs)
+[ ] ditch xml, switch to docstrings or whatever
+[ ] ...
+claude wants http://en.wikipedia.org/wiki/Graham_scan
+
+X Error of failed request:  BadValue (integer parameter out of range for operation)
+error=0x2
+request=0x91 (MIT-SHM)
+minor=0x3 (X_ShmPutImage)
+value in failed request: 0x04b008 == 240*320*4+8 (matju)
+
+invalid read of size 1 (main.c.fcs:438)
+malloc alignment = 4 mod 8 (en utilisant valgrind)
 
+ClaudiusMaximus matju: feature request:  [#store4], behaves like store but accepts grids 
+of floats as coordinates and interpolate using 4-point interpolation, eg, right inlet -> 
+(3 3 f # 0 0 0 1 1 1 2 4 8), left inlet -> (1 # 0.5) outputs (0.5 0.5 0.5) 
+(or whatever the interpolation would really be), left inlet (2 # 1.5 1.5) outputs (3)
+
+AMD64 diffs: long 4->8, void * 4->8
+
+<ClaudiusMaximus> hmm, sending a [reassign( message to the right inlet of a [#store] segfaults Pd
+<ClaudiusMaximus> hmmm, i get a segfault with a simple patch sending "reassign, put_at ( 0 0 ), reassign" to the right inlet of [#store ( 3 3 # 0 )]
 <alx1> matju: for the ./configure, I often get an error from aalib since common installs do not put the headers
 <alx1> matju: would it be possible to make it a user defined choice like --with-aalib and turn it off by default?
 <alx1> matju: not noticing that configure returns an error leads to an error when compiling
@@ -48,6 +39,7 @@ AMD64 :
 <alx1> and returns a 'pd_activate' error after I move it
 <alx1> matju: once I delete it, unlike the other gui objects, it takes about one second before it dissapears, maybe a difference in tcl versions?
 
+http://oprofile.sourceforge.net/about/
 for 0.8.0:
 
 drag_rectangle.pd is fucked (x11 error)
@@ -55,17 +47,7 @@ FObject#send_out2 : bself is NULL, rself=4097cbe8
 [gf] ruby: ObjectSpace._id2ref(0x4097cbe8/2)
 [gf] returns: #<GridFlow::FormatX11 [FormatX11 out]>
 
-test with waves.pd, 24 by 32.
-==1673== 809108 bytes in 187 blocks are still reachable in loss record 64 of 64
-==1673==    at 0x40026DAA: __builtin_vec_new (vg_replace_malloc.c:203)
-==1673==    by 0x40026E01: operator new[](unsigned) (vg_replace_malloc.c:216)
-==1673==    by 0x41FE269F: Grid::init(P<Dim>, NumberTypeE) (base/grid.h.fcs:910)
-==1673==    by 0x41FCBE27: Grid::init_from_ruby_list(int, unsigned long*, NumberTypeE) (base/grid.c.fcs:100)
-==1673==    by 0x41FCC679: Grid::init_from_ruby(unsigned long) (base/grid.c.fcs:117)
-==1673==    by 0x41FE223F: Grid::Grid(unsigned long) (base/grid.h.fcs:888)
-==1673==    by 0x42093152: convert(unsigned long, Grid**) (base/grid.h.fcs:921)
-==1673==    by 0x4208F72B: GridOuter::initialize_wrap(int, unsigned long*, unsigned long) (base/flow_objects.c.fcs:862)
-
+[ ] FIX LIBQUICKTIME CODE: #include <lqt/*> instead of <quicktime/*>
 [ ] try removing or modifying -falign on PPC/OSX
 [ ] c++ typecasting is nuts (see class Pt<T>)
 [ ] make c++ refcount and ruby gc to cooperate.
@@ -96,8 +78,6 @@ test with waves.pd, 24 by 32.
 [ ] #: option swap
 [ ] consider including [mysql] [renamefile] [ls] [shell]
 [ ] re-enable int64,float64
-[ ] <alx_> #define RUBY_STACK_END "0xbfffd5c0" (!?!?!?)
-[ ] remember who i am supposed to credit for making pd_help back in march 2003... alx knows
 [ ] added #matrix_solve, #slice
 [ ] Copy-on-Write (COW)
 [ ] < 10 bugs in buglist
@@ -108,6 +88,7 @@ test with waves.pd, 24 by 32.
 [ ] unbork make test and plain ruby mode.
 [ ] add support for "anything" methods (def _0_(sel,*a))
 [ ] look into -ftree-vectorize
+[ ] should STACK_ARRAY remain at all?
 
 for 0.8.1:
 
@@ -116,7 +97,7 @@ for 0.8.1:
 
 Bugs (High Priority) (!!! Fix all of these before 0.8.0 !!!)
 
-pick a number: [147]
+pick a number: [149]
 
 [147] [#store] blows up in nervous_video (reassign)
 [146] [#peephole] resize problem
@@ -138,7 +119,6 @@ pick a number: [147]
 [133] numop ** can freeze GF
 [129] jmax2pd: [display] should not be translated
 [128] jmax2pd(?): loadbang-messages (comma) don't get translated to .pd ??
-[119] osx: SDL doesn't work here
 [118] error messages can be unclear (eg. file not open... is it #in's, or #out's?)
 [117] osx: [#store] crash instead of raising
 [112] Pt<T>: some casts aren't done properly
@@ -177,7 +157,6 @@ Bugs (Low Priority)
 [046] write unit tests about error checking
 [047] make system to ensure everything is working before a release.
 [048] potential issues between fork() and X11 ?
-[050] BitPacking has trouble with masks that extend beyond int25be
 [051] remove the crap given by -w of ruby
 [054] it's possible to crash by sending data in two inlets of a same object at once
 [059] mess with options in format grid
diff --git a/externals/gridflow/base/bitpacking.c b/externals/gridflow/base/bitpacking.c
index 143f6edb..cb09a812 100644
--- a/externals/gridflow/base/bitpacking.c
+++ b/externals/gridflow/base/bitpacking.c
@@ -1,5 +1,5 @@
 /*
-	$Id: bitpacking.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: bitpacking.c,v 1.2 2006-03-15 04:37:06 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
@@ -26,18 +26,18 @@
 #include <stdlib.h>
 #include <stdio.h>
 
+//#define CONVERT0(z) (((in[z] << hb[z]) >> 7) & mask[z])
+#define CONVERT0(z) ((in[z] >> chop[z]) << slide[z])
+
 #define CONVERT1 t = \
-	(((in[0] << hb[0]) >> 7) & mask[0]) | \
-	(((in[1] << hb[1]) >> 7) & mask[1]) | \
-	(((in[2] << hb[2]) >> 7) & mask[2])
+	CONVERT0(0) | CONVERT0(1) | CONVERT0(2)
 
 #define CONVERT2 \
-	for (t=0,i=0; i<self->size; i++) t |= (((in[i] << hb[i]) >> 7) & mask[i]);
+	for (t=0,i=0; i<self->size; i++) t |= CONVERT0(i);
 
 #define CONVERT3 \
-	for (t=0,i=0; i<self->size; i++) { \
-		t |= ((in[i]>>(7-hb[i]))|(in[i]<<(hb[i]-7))) & mask[i]; \
-	}
+	for (t=0,i=0; i<self->size; i++) \
+		t |= (((unsigned)in[i]>>(7-hb[i]))|(in[i]<<(hb[i]-7))) & mask[i];
 
 #define WRITE_LE \
 	for (int bytes = self->bytes; bytes; bytes--, t>>=8) *out++ = t;
@@ -74,29 +74,29 @@ template <class T>
 static void default_pack(BitPacking *self, int n, Pt<T> in, Pt<uint8> out) {
 	uint32 t;
 	int i;
-	int hb[4];
-	uint32 mask[4];
 	int sameorder = self->endian==2 || self->endian==::is_le();
 	int size = self->size;
-
-	for (i=0; i<self->size; i++) hb[i] = highest_bit(self->mask[i]);
-	memcpy(mask,self->mask,size*sizeof(uint32));
-
+	uint32  mask[4]; memcpy(mask,self->mask,size*sizeof(uint32));
+	uint32    hb[4]; for (i=0; i<size; i++) hb[i] = highest_bit(mask[i]);
+	uint32  span[4]; for (i=0; i<size; i++) span[i] = hb[i] - lowest_bit(mask[i]);
+	uint32  chop[4]; for (i=0; i<size; i++) chop[i] = 7-span[i];
+	uint32 slide[4]; for (i=0; i<size; i++) slide[i] = hb[i]-span[i];
+	
 	if (sameorder && size==3) {
 		switch(self->bytes) {
-		case 2:	NTIMES(t=CONVERT1; *((int16 *)out)=t; out+=2; in+=3;) return;
-		case 4:	NTIMES(t=CONVERT1; *((int32 *)out)=t; out+=4; in+=3;) return;
+		case 2:	NTIMES(CONVERT1; *((int16 *)out)=t; out+=2; in+=3;) return;
+		case 4:	NTIMES(CONVERT1; *((int32 *)out)=t; out+=4; in+=3;) return;
 		}
 	}
 	if (self->is_le()) {
 		switch (size) {
 		case 3: for (; n--; in+=3) {CONVERT1; WRITE_LE;} break;
-		case 4:	for (; n--; in+=4) {CONVERT3; WRITE_LE;} break;
+		case 4:	for (; n--; in+=4) {CONVERT1; WRITE_LE;} break;
 		default:for (; n--; in+=size) {CONVERT2; WRITE_LE;}}
 	} else {
 		switch (size) {
 		case 3: for (; n--; in+=3) {CONVERT1; WRITE_BE;} break;
-		case 4: for (; n--; in+=4) {CONVERT3; WRITE_BE;} break;
+		case 4: for (; n--; in+=4) {CONVERT1; WRITE_BE;} break;
 		default:for (; n--; in+=size) {CONVERT2; WRITE_BE;}}
 	}
 }
@@ -132,8 +132,11 @@ template <class T>
 static void pack2_565(BitPacking *self, int n, Pt<T> in, Pt<uint8> out) {
 	const int hb[3] = {15,10,4};
 	const uint32 mask[3] = {0x0000f800,0x000007e0,0x0000001f};
+	uint32 span[3] = {4,5,4};
+	uint32 chop[3] = {3,2,3};
+	uint32 slide[3] = {11,5,0};
 	uint32 t;
-	NTIMES( t=CONVERT1; *((short *)out)=t; out+=2; in+=3; )
+	NTIMES(CONVERT1; *((short *)out)=t; out+=2; in+=3;)
 }
 
 template <class T>
@@ -187,7 +190,8 @@ static void pack3_888b(BitPacking *self, int n, Pt<T> in, Pt<uint8> out) {
 	NTIMES( o32[0] = (in[0]<<16) | (in[1]<<8) | in[2]; o32++; in+=3; )
 }
 
-/* (R,G,B,?) -> B:8,G:8,R:8,0:8 */
+// (R,G,B,?) -> B:8,G:8,R:8,0:8
+// fishy
 template <class T>
 static void pack3_bgrn8888(BitPacking *self, int n, Pt<T> in, Pt<uint8> out) {
 /* NTIMES( out[2]=in[0]; out[1]=in[1]; out[0]=in[2]; out+=4; in+=4; ) */
diff --git a/externals/gridflow/base/flow_objects.c b/externals/gridflow/base/flow_objects.c
index ac3305d6..f971553d 100644
--- a/externals/gridflow/base/flow_objects.c
+++ b/externals/gridflow/base/flow_objects.c
@@ -1,8 +1,8 @@
 /*
-	$Id: flow_objects.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: flow_objects.c,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -158,6 +158,7 @@ static Ruby INTORFLOAT2NUM(T       value) {return      INT2NUM(value);}
 static Ruby INTORFLOAT2NUM(int64   value) {return    gf_ll2num(value);}
 static Ruby INTORFLOAT2NUM(float32 value) {return rb_float_new(value);}
 static Ruby INTORFLOAT2NUM(float64 value) {return rb_float_new(value);}
+static Ruby INTORFLOAT2NUM(ruby    value) {return value.r;}
 
 GRID_INLET(GridExport,0) {
 } GRID_FLOW {
@@ -213,9 +214,9 @@ struct GridStore : GridObject {
 	PtrGrid r; // can't be \attr
 	PtrGrid put_at; // can't be //\attr
 	\attr Numop *op;
-	int32 wdex [Dim::MAX_DIMENSIONS]; // temporary buffer, copy of put_at
-	int32 fromb[Dim::MAX_DIMENSIONS];
-	int32 to2  [Dim::MAX_DIMENSIONS];
+	int32 wdex [Dim::MAX_DIM]; // temporary buffer, copy of put_at
+	int32 fromb[Dim::MAX_DIM];
+	int32 to2  [Dim::MAX_DIM];
 	int lsd; // lsd = Last Same Dimension (for put_at)
 	int d; // goes with wdex
 	\decl void initialize (Grid *r=0);
@@ -258,7 +259,7 @@ GRID_INLET(GridStore,0) {
 	int na = in->dim->n;
 	int nb = r->dim->n;
 	int nc = in->dim->get(na-1);
-	STACK_ARRAY(int32,v,Dim::MAX_DIMENSIONS);
+	STACK_ARRAY(int32,v,Dim::MAX_DIM);
 	if (na<1) RAISE("must have at least 1 dimension.",na,1,1+nb);
 	int lastindexable = r->dim->prod()/r->dim->prod(nc) - 1;
 	int ngreatest = nt_greatest((T *)0);
@@ -413,6 +414,8 @@ GRID_INLET(GridOp,0) {
 	SAME_TYPE(in,r);
 	out=new GridOutlet(this,0,in->dim,in->nt);
 	in->set_mode(6);
+} GRID_ALLOC {
+	//out->ask(in->allocn,(Pt<T> &)in->alloc,in->allocfactor,in->allocmin,in->allocmax);
 } GRID_FLOW {
 	Pt<T> rdata = (Pt<T>)*r;
 	int loop = r->dim->prod();
@@ -787,7 +790,7 @@ void GridFor::trigger (T bogus) {
 	if (!from->dim->equal(to->dim) || !to->dim->equal(step->dim))
 		RAISE("dimension mismatch");
 #define FOO(T) trigger((T)0);
-	TYPESWITCH_NOFLOAT(from->nt,FOO,);
+	TYPESWITCH_JUSTINT(from->nt,FOO,);
 #undef FOO
 }
 
@@ -1048,7 +1051,8 @@ GRID_INLET(GridTranspose,0) {
 } GRID_FLOW {
 	STACK_ARRAY(T,res,na*nb*nc*nd);
 	if (dim1==dim2) { out->send(n,data); return; }
-	for (; n; n-=na*nb*nc*nd, data+=na*nb*nc*nd) {
+	int prod = na*nb*nc*nd;
+	for (; n; n-=prod, data+=prod) {
 		for (int a=0; a<na; a++)
 			for (int b=0; b<nb; b++)
 				for (int c=0; c<nc; c++)
@@ -1107,14 +1111,14 @@ GRID_INLET(GridReverse,0) {
 \end class GridReverse
 
 //****************************************************************
-\class GridCentroid2 < GridObject
-struct GridCentroid2 : GridObject {
+\class GridCentroid < GridObject
+struct GridCentroid : GridObject {
 	\decl void initialize ();
 	\grin 0 int
 	int sumx,sumy,sum,y; // temporaries
 };
 
-GRID_INLET(GridCentroid2,0) {
+GRID_INLET(GridCentroid,0) {
 	if (in->dim->n != 3) RAISE("expecting 3 dims");
 	if (in->dim->v[2] != 1) RAISE("expecting 1 channel");
 	in->set_factor(in->dim->prod(1));
@@ -1137,14 +1141,16 @@ GRID_INLET(GridCentroid2,0) {
 	blah[0] = sum ? sumy/sum : 0;
 	blah[1] = sum ? sumx/sum : 0;
 	out->send(2,blah);
+	rb_funcall(rself,SI(send_out),2,INT2NUM(1),INT2NUM(blah[0]));
+	rb_funcall(rself,SI(send_out),2,INT2NUM(2),INT2NUM(blah[1]));
 } GRID_END
 
 \def void initialize () {
 	rb_call_super(argc,argv);
 }
 
-\classinfo { IEVAL(rself,"install '#centroid2',1,1"); }
-\end class GridCentroid2
+\classinfo { IEVAL(rself,"install '#centroid',1,3"); }
+\end class GridCentroid
 
 //****************************************************************
 \class GridPerspective < GridObject
diff --git a/externals/gridflow/base/flow_objects.rb b/externals/gridflow/base/flow_objects.rb
index 6ea06c56..8782ae21 100644
--- a/externals/gridflow/base/flow_objects.rb
+++ b/externals/gridflow/base/flow_objects.rb
@@ -1,8 +1,8 @@
 =begin
-	$Id: flow_objects.rb,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: flow_objects.rb,v 1.2 2006-03-15 04:37:28 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -70,7 +70,7 @@ FObject.subclass("gridflow",1,1) {
 	def _0_formats
 		post "-"*32
 		GridFlow.fclasses.each {|k,v|
-			next if not /#in:/ =~ k
+			next if not /#io:/ =~ k
 			modes = case v.flags
 			when 2; "#out"
 			when 4; "#in"
@@ -265,7 +265,7 @@ GridPack =
 GridObject.subclass("#pack",1,1) {
 	install_rgrid 0
 	class<<self;attr_reader :ninlets;end
-	def initialize(n=nil,cast=:int32)
+	def initialize(n=2,cast=:int32)
 		n||=self.class.ninlets
 		n>=16 and raise "too many inlets"
 		super
@@ -298,13 +298,13 @@ GridObject.subclass("#pack",1,1) {
 # the install_rgrids in the following are hacks so that
 # outlets can work. (install_rgrid is supposed to be for receiving)
 # maybe GF-0.8 doesn't need that.
-GridPack.subclass("@two",  2,1) { install_rgrid 0 }
-GridPack.subclass("@three",3,1) { install_rgrid 0 }
-GridPack.subclass("@four", 4,1) { install_rgrid 0 }
-GridPack.subclass("@eight",8,1) { install_rgrid 0 }
+GridPack.subclass("@two",  2,1) { install_rgrid 0; def initialize() super 2 end }
+GridPack.subclass("@three",3,1) { install_rgrid 0; def initialize() super 2 end  }
+GridPack.subclass("@four", 4,1) { install_rgrid 0; def initialize() super 2 end  }
+GridPack.subclass("@eight",8,1) { install_rgrid 0; def initialize() super 2 end  }
 GridObject.subclass("#unpack",1,0) {
   install_rgrid 0, true
-  def initialize(n)
+  def initialize(n=2)
     @n=n
     n>=10 and raise "too many outlets"
     super
@@ -338,8 +338,9 @@ GridObject.subclass("unix_time",1,3) {
     tt = t.to_s
     send_out_grid_begin 0, [tt.length], :uint8
     send_out_grid_flow 0, tt, :uint8
-    send_out 1, t.to_i
-    send_out 2, t.to_f-t.to_f.floor
+    send_out 1, t.to_i/86400, t.to_i%86400,
+	((t.to_f-t.to_f.floor)*1000000).to_i
+    send_out 2, t.year, t.month, t.day, t.hour, t.min, t.day
   end
 }
 ### test with "shell xlogo &" -> [exec]
@@ -352,6 +353,7 @@ FObject.subclass("renamefile",1,0) {
 }
 FObject.subclass("ls",1,1) {
         def _0_symbol(s) send_out 0, :list, *Dir.new(s.to_s).map {|x| x.intern } end
+        def _0_glob  (s) send_out 0, :list, *Dir[    s.to_s].map {|x| x.intern } end
 }
 
 #-------- fClasses for: math
@@ -420,36 +422,32 @@ FPatcher.subclass("@scale_to",2,1) {
 }
 
 #<vektor> told me to:
-# RGBtoYUV : @fobjects = ["#inner ( 3 3 # 66 -38 112 128 -74 -94 25 112 -18 )",
+# RGBtoYUV : @fobjects = ["#inner (3 3 # 66 -38 112 128 -74 -94 25 112 -18)",
 #	"@ >> 8","@ + {16 128 128}"]
-# YUVtoRGB : @fobjects = ["@ - ( 16 128 128 )",
-#	"#inner ( 3 3 # 298 298 298 0 -100 516 409 -208 0 )","@ >> 8"]
+# YUVtoRGB : @fobjects = ["@ - (16 128 128)",
+#	"#inner (3 3 # 298 298 298 0 -100 516 409 -208 0)","@ >> 8"]
 
 FPatcher.subclass("#rotate",2,1) {
-	@fobjects = ["@inner * + 0","@ >> 8"]
+	@fobjects = ["#inner","# >> 8"]
 	@wires = [-1,0,0,0, 0,0,1,0, 1,0,-1,0]
 	def update_rotator
-		rotator = (0...@axis[2]).map {|i|
-			(0...@axis[2]).map {|j|
-				if i==j then 256 else 0 end
-			}
-		}
+		n = @axis[2]
+		rotator = (0...n).map {|i| (0...n).map {|j| if i==j then 256 else 0 end }}
 		th = @angle * Math::PI / 18000
 		scale = 1<<8
-		(0...2).each {|i|
-			(0...2).each {|j|
-				rotator[@axis[i]][@axis[j]] =
-					(scale*Math.cos(th+(j-i)*Math::PI/2)).to_i
-			}
-		}
-		@fobjects[0].send_in 2,
-			@axis[2], @axis[2], "#".intern, *rotator.flatten
+		(0...2).each {|i| (0...2).each {|j|
+				a = @axis[i].to_i
+				b = @axis[j].to_i
+				#GridFlow.post "(#{a},#{b}) #{rotator[a].inspect}"
+				rotator[a][b] = (scale*Math.cos(th+(j-i)*Math::PI/2)).to_i
+		}}
+		@fobjects[0].send_in 1,n,n,"#".intern,*rotator.flatten
 	end
 	def _0_axis(from,to,total)
 		total>=0 or raise "total-axis number incorrect"
 		from>=0 and from<total or raise "from-axis number incorrect"
 		to  >=0 and to  <total or raise   "to-axis number incorrect"
-		@axis = [from,to,total]
+		@axis = [from.to_i,to.to_i,total.to_i]
 		update_rotator
 	end
 	def initialize(rot=0,axis=[0,1,2])
@@ -644,7 +642,7 @@ class PDNetSocket < FObject
 				@socket.bind nil, port
 			end
 		when :tcp
-			if host=="-" then
+ 			if host=="-" then
 				@server = TCPServer.new("localhost",port)
 			else
 				@socket = TCPSocket.new(host,port)
@@ -722,7 +720,7 @@ PDNetSocket.subclass("pd_netreceive",0,2) {
 
 # bogus class for representing objects that have no recognized class.
 FObject.subclass("broken",0,0) {
-	def args; a=@args.dup; a[7,0] = " "+classname; a end
+ 	def args; a=@args.dup; a[7,0] = " "+classname; a end
 }
 
 FObject.subclass("fork",1,2) {
@@ -892,6 +890,21 @@ FObject.subclass("range",1,1) {
     post "setting a[#{m[1].to_i-1}] = #{a[0]}"
   end
 }
+FObject.subclass("listfind",2,1) {
+  def initialize(*a) _1_list(*a) end
+  def _1_list(*a) @a = a end
+  def _0_float(x)
+    i=0
+    while i<@a.length
+      (send_out 0,i; return) if @a[i]==x
+      i+=1
+    end
+    send_out 0,-1
+  end
+  doc:_1_list,"list to search into"
+  doc:_0_float,"float to find in that list"
+  doc_out:_0_float,"position of the incoming float in the stored list"
+}
 
 #-------- fClasses for: GUI
 
@@ -1257,92 +1270,6 @@ end
 
 #-------- fClasses for: Hardware
 
-if const_defined? :USB
-
-class<<USB
-	attr_reader :busses
-end
-
-class DelcomUSB < GridFlow::FObject
-	Vendor,Product=0x0FC5,0x1222
-	def self.find
-		r=[]
-		USB.busses.each {|dir,bus|
-			bus.each {|dev|
-				r<<dev if dev.idVendor==Vendor and dev.idProduct==Product
-			}
-		}
-		r
-	end
-	def initialize #(bus=nil,dev=nil)
-		r=DelcomUSB.find
-		raise "no such device" if r.length<1
-		raise "#{r.length} such devices (which one???)" if r.length>1
-		@usb=USB.new(r[0])
-		if_num=nil
-		r[0].config.each {|config|
-			config.interface.each {|interface|
-				if_num = interface.bInterfaceNumber
-			}
-		}
-		# post "Interface # %i\n", if_num
-		@usb.set_configuration 1
-		@usb.claim_interface if_num
-		@usb.set_altinterface 0 rescue ArgumentError
-	end
-	# libdelcom had this:
-        # uint8 recipient, deviceModel, major, minor, dataL, dataM;
-        # uint16 length; uint8[8] extension;
-	def _0_send_command(major,minor,dataL,dataM,extension="\0\0\0\0\0\0\0\0")
-		raise "closed" if not @usb
-		raise "extension.length!=8" if extension.length!=8
-		@usb.control_msg(
-			0x000000c8, 0x00000012,
-			minor*0x100+major,
-			dataM*0x100+dataL,
-			extension, 5000)
-	end
-	def delete; @usb.close; end
-	install "delcomusb", 1, 1
-end
-
-# Klippeltronics
-FObject.subclass("multio",1,1) {
-	Vendor,Product=0xDEAD,0xBEEF
-	def self.find
-	  r=[]
-	  USB.busses.each {|dir,bus|
-	    bus.each {|dev|
-	      post "dir=%s, vendor=%x, product=%x",
-		      dir, dev.idVendor, dev.idProduct
-	      r<<dev if dev.idVendor==Vendor and dev.idProduct==Product
-	    }
-	  }
-	  r
-	end
-	def initialize
-		r=self.class.find
-		raise "no such device" if r.length<1
-		raise "#{r.length} such devices (which one???)" if r.length>1
-		$iobox=@usb=USB.new(r[0])
-		if_num=nil
-		r[0].config.each {|config|
-			config.interface.each {|interface|
-				#post "interface=%s", interface.to_s
-				if_num = interface.bInterfaceNumber
-			}
-		}
-		# post "Interface # %i\n", if_num
-		# @usb.set_configuration 0
-		@usb.claim_interface if_num
-		@usb.set_altinterface 0 rescue ArgumentError
-	end
-	#@usb.control_msg(0b10100001,0x01,0,0,"",1000)
-	#@usb.control_msg(0b10100001,0x01,0,1," ",0)
-	def delete; @usb.close; end
-}
-end # if const_defined? :USB
-
 # requires Ruby 1.8.0 because of bug in Ruby 1.6.x
 FObject.subclass("joystick_port",0,1) {
   def initialize(port)
@@ -1388,6 +1315,21 @@ FObject.subclass("plotter_control",1,1) {
   end
 }
 
+# ASCII, useful for controlling pics
+FObject.subclass("ascii",1,1) {
+  def puts(x)
+  x.each_byte {|b| send_out 0, b }
+  end
+  def _0_float x; puts "#{x.to_i}" end
+}
+
+# System, similar to shell
+FObject.subclass("system",1,1) {
+  def _0_system(*a)
+    system(a.join(" "))
+  end
+}
+
 (begin require "linux/ParallelPort"; true; rescue LoadError; false end) and
 FObject.subclass("parallel_port",1,3) {
   def initialize(port,manually=0)
@@ -1419,7 +1361,8 @@ FObject.subclass("parallel_port",1,3) {
 }
 
 (begin require "linux/SoundMixer"; true; rescue LoadError; false end) and
-FObject.subclass("SoundMixer",1,1) {
+#FObject.subclass("SoundMixer",1,1) {
+class GFSoundMixer < FObject; install "SoundMixer",1,1
   # BUG? i may have the channels (left,right) backwards
   def initialize(filename)
     super
@@ -1449,7 +1392,7 @@ FObject.subclass("SoundMixer",1,1) {
       @@vars.each {|var| _0_get var }
     end
   end
-}
+end#}
 
 # experimental
 FObject.subclass("rubyarray",2,1) {
@@ -1473,4 +1416,42 @@ FObject.subclass("rubyarray",2,1) {
   end
 }
 
+FObject.subclass("regsub",3,1) {
+  def initialize(from,to) _1_symbol(from); _2_symbol(to) end
+  def _0_symbol(s) send_out 0, :symbol, s.to_s.gsub(@from, @to).intern end
+  def _1_symbol(from) @from = Regexp.new(from.to_s.gsub(/`/,"\\")) end
+  def _2_symbol(to)   @to = to.to_s.gsub(/`/,"\\") end
+  doc:_0_symbol,"a string to transform"
+  doc:_1_symbol,"a regexp pattern to be found inside of the string"
+  doc:_2_symbol,"a replacement for the found pattern"
+  doc_out:_0_symbol,"the transformed string"
+}
+
+FObject.subclass("memstat",1,1) {
+  def _0_bang
+    f = File.open("/proc/#{$$}/stat")
+    send_out 0, Float(f.gets.split(" ")[22]) / 1024.0
+    f.close
+  end
+  doc:_0_bang,"lookup process stats for the currently running pd+ruby "+
+  	"and figure out how much RAM it uses."
+  doc_out:_0_float,"virtual size of RAM in kilobytes (includes swapped out and shared memory)"
+}
+
+FObject.subclass("sendgui",1,0) {
+  def _0_list(*x)
+    GridFlow.gui x.join(" ").gsub(/`/,";")+"\n"
+  end
+  install "sys_vgui", 1, 0
+  doc:_0_list,"a Tcl/Tk command to send to the pd client."
+}
+
 end # module GridFlow
+
+begin
+  require "gridflow/rblti"
+  GridFlow.post "Ruby-LTI support loaded."
+rescue Exception => e
+  #GridFlow.post "%s", e.inspect
+  #GridFlow.post "(rblti not found)"
+end
diff --git a/externals/gridflow/base/flow_objects_for_image.c b/externals/gridflow/base/flow_objects_for_image.c
index 2041c3e1..f6d6398d 100644
--- a/externals/gridflow/base/flow_objects_for_image.c
+++ b/externals/gridflow/base/flow_objects_for_image.c
@@ -1,8 +1,8 @@
 /*
-	$Id: flow_objects_for_image.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: flow_objects_for_image.c,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -207,7 +207,7 @@ GRID_INLET(GridScaleBy,0) {
 		int p=0;
 		#define LOOP(z) \
 			for (int i=0; i<rowsize; i+=z) \
-			for (int k=0; k<scalex; k++, p+=3)
+			for (int k=0; k<scalex; k++, p+=z)
 		switch (chans) {
 		case 3: LOOP(3) {Z(0);Z(1);Z(2);} break;
 		case 4: LOOP(4) {Z(0);Z(1);Z(2);Z(3);} break;
@@ -477,6 +477,7 @@ GRID_INLET(DrawPolygon,0) {
 	}
 } GRID_END
 
+
 GRID_INPUT(DrawPolygon,1,color) {} GRID_END
 GRID_INPUT(DrawPolygon,2,polygon) {init_lines();} GRID_END
 
diff --git a/externals/gridflow/base/flow_objects_for_matrix.c b/externals/gridflow/base/flow_objects_for_matrix.c
index d245a10f..b88accba 100644
--- a/externals/gridflow/base/flow_objects_for_matrix.c
+++ b/externals/gridflow/base/flow_objects_for_matrix.c
@@ -1,5 +1,5 @@
 /*
-	$Id: flow_objects_for_matrix.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: flow_objects_for_matrix.c,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
diff --git a/externals/gridflow/base/grid.c b/externals/gridflow/base/grid.c
index 877a460f..c3ec5932 100644
--- a/externals/gridflow/base/grid.c
+++ b/externals/gridflow/base/grid.c
@@ -1,5 +1,5 @@
 /*
-	$Id: grid.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: grid.c,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
@@ -32,10 +32,24 @@
 #include <ctype.h>
 
 /* copied from bridge/puredata.c (sorry: linkage issue) */
-struct Pointer : CObject { void *p; Pointer(void *_p) : p(_p) {}};
-Ruby Pointer_s_noo (void *ptr) {
-	return Data_Wrap_Struct(EVAL("GridFlow::Pointer"), 0, 0, new Pointer(ptr));}
-static void *Pointer_gut (Ruby rself) {DGS(Pointer); return self->p;}
+struct Pointer : CObject {
+	void *p;
+	Pointer(void *_p) : p(_p) {}
+};
+
+#define Pointer_s_new Pointer_s_new_2
+#define Pointer_get   Pointer_get_2
+
+static Ruby Pointer_s_new (void *ptr) {
+	Pointer *self = new Pointer(ptr);
+	Ruby rself = Data_Wrap_Struct(EVAL("GridFlow::Pointer"), 0, CObject_free, self);
+	self->rself = rself;
+	return rself;
+}
+static void *Pointer_get (Ruby rself) {
+	DGS(Pointer);
+	return self->p;
+}
 
 //#define TRACE fprintf(stderr,"%s %s [%s:%d]\n",INFO(parent),__PRETTY_FUNCTION__,__FILE__,__LINE__);assert(this);
 #define TRACE assert(this);
@@ -43,8 +57,7 @@ static void *Pointer_gut (Ruby rself) {DGS(Pointer); return self->p;}
 #define CHECK_TYPE(d) \
 	if (NumberTypeE_type_of(d)!=this->nt) RAISE("%s(%s): " \
 		"type mismatch during transmission (got %s expecting %s)", \
-		INFO(parent), \
-		__PRETTY_FUNCTION__, \
+		INFO(parent), __PRETTY_FUNCTION__, \
 		number_type_table[NumberTypeE_type_of(d)].name, \
 		number_type_table[this->nt].name);
 
@@ -77,6 +90,8 @@ static inline void NUM(Ruby x, S &y) { \
 EACH_FLOAT_TYPE(FOO)
 #undef FOO
 
+static inline void NUM(Ruby x, ruby &y) { y.r=x; }
+
 void Grid::init_from_ruby_list(int n, Ruby *a, NumberTypeE nt) {
 	Ruby delim = SYM(#);
 	for (int i=0; i<n; i++) {
@@ -162,15 +177,12 @@ bool GridInlet::supports_type(NumberTypeE nt) {
 
 Ruby GridInlet::begin(int argc, Ruby *argv) {TRACE;
 	if (!argc) return PTR2FIX(this);
-	GridOutlet *back_out = (GridOutlet *) Pointer_gut(argv[0]);
+	GridOutlet *back_out = (GridOutlet *) Pointer_get(argv[0]);
 	nt = (NumberTypeE) INT(argv[1]);
 	argc-=2, argv+=2;
 	PROF(parent) {
-	if (dim) {
-		gfpost("%s: grid inlet conflict; aborting %s in favour of %s",
+	if (dim) RAISE("%s: grid inlet conflict; aborting %s in favour of %s",
 			INFO(parent), INFO(sender), INFO(back_out->parent));
-		abort();
-	}
 	sender = back_out->parent;
 	if ((int)nt<0 || (int)nt>=(int)number_type_table_end)
 		RAISE("%s: inlet: unknown number type",INFO(parent));
@@ -328,7 +340,7 @@ void GridOutlet::begin(int woutlet, P<Dim> dim, NumberTypeE nt) {TRACE;
 	Ruby a[n+4];
 	a[0] = INT2NUM(woutlet);
 	a[1] = bsym._grid;
-	a[2] = Pointer_s_noo(this);
+	a[2] = Pointer_s_new(this);
 	a[3] = INT2NUM(nt);
 	for(int i=0; i<n; i++) a[4+i] = INT2NUM(dim->get(i));
 	parent->send_out(COUNT(a),a);
diff --git a/externals/gridflow/base/grid.h b/externals/gridflow/base/grid.h
index 4aaf2aa3..9e971b99 100644
--- a/externals/gridflow/base/grid.h
+++ b/externals/gridflow/base/grid.h
@@ -1,8 +1,8 @@
 /*
-	$Id: grid.h,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: grid.h,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -25,7 +25,7 @@
 #define __GF_GRID_H
 
 // current version number as string literal
-#define GF_VERSION "0.8.0"
+#define GF_VERSION "0.8.1"
 #define GF_COMPILE_TIME __DATE__ ", " __TIME__
 
 #include <new>
@@ -36,6 +36,12 @@
 #include <stdio.h>
 #include <math.h>
 
+#ifdef __APPLE__
+static inline void *memalign (size_t a, size_t n) {return malloc(n);}
+#else
+#include <malloc.h>
+#endif
+
 extern "C" {
 #include <ruby.h>
 #include <rubyio.h>
@@ -58,11 +64,7 @@ extern "C" {
 #endif
 
 #define BUG(s,args...) {fprintf(stderr,s "\nat: %s\n",args,__PRETTY_FUNCTION__); ::raise(11);}
-
-// !@#$ what am I going to do about this? should this be changed?
-// should I wrap all of the Ruby API for C++-style convenience?
-typedef VALUE Ruby;
-// typedef struct Ruby { VALUE x };
+#define L gfpost("%s:%d in %s",__FILE__,__LINE__,__PRETTY_FUNCTION__);
 
 #ifdef IS_BRIDGE
 #define RAISE(args...) rb_raise(rb_eArgError,args)
@@ -76,6 +78,8 @@ typedef VALUE Ruby;
 	if (RUBY_RELEASE_CODE < 20030716) rb_enable_super(a,b)
 #endif
 
+typedef VALUE Ruby;
+
 /* undocumented function from Ruby that is one thing we need to fix a very elusive bug
 that manifests itself when embedding ruby inside a plugin of another app. This exists
 for all versions of Ruby up to now, and I don't know when it gets fixed. */
@@ -86,7 +90,6 @@ void rb_raise0(
 const char *file, int line, const char *func, VALUE exc, const char *fmt, ...)
 __attribute__ ((noreturn));
 };
-#define L fprintf(stderr,"%s:%d in %s\n",__FILE__,__LINE__,__PRETTY_FUNCTION__);
 #define SI(_sym_) (rb_intern(#_sym_))
 #define SYM(_sym_) (ID2SYM(SI(_sym_)))
 #define DGS(_class_) \
@@ -104,21 +107,16 @@ static inline long  rb_ary_len(Ruby s) {return  RARRAY(s)->len;}
 static inline Ruby *rb_ary_ptr(Ruby s) {return  RARRAY(s)->ptr;}
 static inline const char *rb_sym_name(Ruby sym) {return rb_id2name(SYM2ID(sym));}
 #define rb_str_pt(s,t) Pt<t>((t*)rb_str_ptr(s),rb_str_len(s))
-
-// shorthands
 #define IEVAL(_self_,s) rb_funcall(_self_,SI(instance_eval),1,rb_str_new2(s))
 #define EVAL(s) rb_eval_string(s)
 #define rassert(_p_) if (!(_p_)) RAISE(#_p_);
-
 // because of older versions of Ruby (1.6.?)
 #define rb_obj_class(o) rb_funcall((o),SI(class),0)
 
 #define WATCH(n,ar) { \
-	char foo[16*1024], *p=foo; \
-	p += sprintf(p,"%s: ",#ar); \
+	char foo[16*1024], *p=foo; p += sprintf(p,"%s: ",#ar); \
 	for (int q=0; q<n; q++) p += sprintf(p,"%lld ",(long long)ar[q]); \
-	gfpost("%s",foo); \
-}
+	gfpost("%s",foo);}
 
 // we're gonna override assert, so load it first, to avoid conflicts
 #include <assert.h>
@@ -148,7 +146,7 @@ static inline const char *rb_sym_name(Ruby sym) {return rb_id2name(SYM2ID(sym));
 
 static inline Ruby PTR2FIX (const void *ptr) {
 	long p = (long)ptr;
-	if ((p&3)!=0) BUG("unaligned pointer: %08x\n",(long)(ptr));
+	if ((p&3)!=0) BUG("unaligned pointer: %p\n",ptr);
 	return LONG2NUM(p>>2);
 }
 #define FIX2PTR(type,ruby) ((type *)(TO(long,ruby)<<2))
@@ -184,7 +182,7 @@ static inline float64 gf_abs(float64 a) { return fabs(a); }
 // integer powers in log(b) time. T is assumed Integer
 template <class T> static inline T ipow(T a, T b) {
 	for(T r=1;;) {if (b&1) r*=a; b>>=1; if (!b) return r; a*=a;}
-}	
+}
 
 // kludge
 static inline float32 ipow(float32 a, float32 b) { return pow(a,b); }
@@ -196,7 +194,6 @@ static inline float64 ipow(float64 a, float64 b) { return pow(a,b); }
 template <class T> static inline T min(T a, T b) { return a<b?a:b; }
 template <class T> static inline T max(T a, T b) { return a>b?a:b; }
 //template <class T> inline T min(T a, T b) { T c = (a-b)>>31; return (a&c)|(b&~c); }
-//template <class T> inline T max(T a, T b) { T c = (a-b)>>31; return (a&c)|(b&~c); }
 
 // greatest common divisor, by euclid's algorithm
 // this runs in log(a+b) number operations
@@ -221,12 +218,12 @@ template <class T> static T gcd2 (T a, T b) {
 template <class T> static inline T lcm (T a, T b) {return a*b/gcd(a,b);}
 
 // returns the position (0..31) of highest bit set in a word, or 0 if none.
-#define FOO(N) if ((x>>N)&(((typeof(x))1<<N)-1)) { x>>=N; i+=N; }
-static int highest_bit(uint8  x) {int i=0;                    FOO(4)FOO(2)FOO(1)return i;}
-static int highest_bit(uint16 x) {int i=0;              FOO(8)FOO(4)FOO(2)FOO(1)return i;}
-static int highest_bit(uint32 x) {int i=0;       FOO(16)FOO(8)FOO(4)FOO(2)FOO(1)return i;}
-static int highest_bit(uint64 x) {int i=0;FOO(32)FOO(16)FOO(8)FOO(4)FOO(2)FOO(1)return i;}
-#undef FOO
+#define Z(N) if ((x>>N)&(((typeof(x))1<<N)-1)) { x>>=N; i+=N; }
+static int highest_bit(uint8  x) {int i=0;              Z(4)Z(2)Z(1)return i;}
+static int highest_bit(uint16 x) {int i=0;          Z(8)Z(4)Z(2)Z(1)return i;}
+static int highest_bit(uint32 x) {int i=0;     Z(16)Z(8)Z(4)Z(2)Z(1)return i;}
+static int highest_bit(uint64 x) {int i=0;Z(32)Z(16)Z(8)Z(4)Z(2)Z(1)return i;}
+#undef Z
 // returns the position (0..31) of lowest bit set in a word, or 0 if none.
 template <class T> static int lowest_bit(T n) { return highest_bit((~n+1)&n); }
 
@@ -262,7 +259,7 @@ static inline uint64 rdtsc() {return 0;}
 #define EACH_INT_TYPE(MACRO) MACRO(uint8) MACRO(int16) MACRO(int32) MACRO(int64)
 #define EACH_FLOAT_TYPE(MACRO) MACRO(float32) MACRO(float64)
 #endif
-#define EACH_NUMBER_TYPE(MACRO) EACH_INT_TYPE(MACRO) EACH_FLOAT_TYPE(MACRO)
+#define EACH_NUMBER_TYPE(MACRO) EACH_INT_TYPE(MACRO) EACH_FLOAT_TYPE(MACRO) MACRO(ruby)
 
 // note: loop unrolling macros assume N!=0
 // btw this may cause alignment problems when 8 does not divide N
@@ -279,6 +276,132 @@ static inline uint64 rdtsc() {return 0;}
 		PTR+=4; N-=4; ARGS; if (N) goto start; }
 
 //****************************************************************
+// my own little Ruby <-> C++ layer
+
+//struct Arg { Ruby a; };
+//struct ArgList { int n; Pt<Arg> v; };
+static inline bool INTEGER_P(Ruby x) {return FIXNUM_P(x)||TYPE(x)==T_BIGNUM;}
+static inline bool FLOAT_P(Ruby x)   {return TYPE(x)==T_FLOAT;}
+#define INT(x) TO(int32,x)
+#define TO(t,x) convert(x,(t*)0)
+
+// not using NUM2INT because Ruby can convert Symbol to int
+// (by compatibility with Ruby 1.4)
+static inline int32 convert(Ruby x, int32 *foo) {
+	if (INTEGER_P(x)) return NUM2INT(x);
+	if (FLOAT_P(x)) return NUM2INT(rb_funcall(x,SI(round),0));
+	RAISE("expected Integer or Float (got %s)",
+		rb_str_ptr(rb_funcall(x,SI(inspect),0)));
+}
+static int16 convert(Ruby x, int16 *foo) {
+	int v = INT(x);
+	if (v<-0x8000 || v>=0x8000) RAISE("value %d is out of range",v);
+	return v;}
+static uint16 convert(Ruby x, uint16 *foo) {
+	int v = INT(x);
+	if (v<0 || v>=0x10000) RAISE("value %d is out of range",v);
+	return v;}
+static bool  convert(Ruby x, bool  *foo) {
+	if (x==Qtrue) return true;
+	if (x==Qfalse) return false;
+	switch (TYPE(x)) {
+		case T_FIXNUM: case T_BIGNUM: case T_FLOAT: return !!INT(x);
+		default: RAISE("can't convert to bool");
+	}
+}
+
+#ifdef HAVE_GCC64
+static uint64 convert(Ruby val, uint64 *foo) { return NUM2ULONG(val); }
+static  int64 convert(Ruby val,  int64 *foo) { return NUM2ULONG(val); }
+static Ruby gf_ull2num(uint64 val) { return ULONG2NUM(val); }
+static  Ruby gf_ll2num(uint64 val) { return  LONG2NUM(val); }
+#else
+static uint64 convert(Ruby val, uint64 *foo) {
+	if (FIXNUM_P(val)) return (uint64)FIX2LONG(val);
+	if (TYPE(val)!=T_BIGNUM) RAISE("type error");
+	uint64 v = (uint64)NUM2UINT(rb_funcall(val,SI(>>),1,INT2FIX(32))) << 32;
+	return v + NUM2UINT(rb_funcall(val,SI(&),1,UINT2NUM(0xffffffff)));}
+static int64 convert(Ruby val, int64 *foo) {
+	if (FIXNUM_P(val)) return (int64)FIX2LONG(val);
+	if (TYPE(val)!=T_BIGNUM) RAISE("type error");
+	int64 v = (int64)NUM2INT(rb_funcall(val,SI(>>),1,INT2FIX(32))) << 32;
+	return v + NUM2UINT(rb_funcall(val,SI(&),1,UINT2NUM(0xffffffff)));}
+static Ruby gf_ull2num(uint64 val) {
+    Ruby x = rb_funcall(UINT2NUM((uint32)(val>>32)),SI(<<),1,INT2FIX(32));
+    return rb_funcall(x,SI(+),1,UINT2NUM((uint32)val));}
+static Ruby gf_ll2num(int64 val) {
+    Ruby x = rb_funcall( INT2NUM(( int32)(val>>32)),SI(<<),1,INT2FIX(32));
+    return rb_funcall(x,SI(+),1,UINT2NUM((uint32)val));}
+#endif
+    
+static long convert(Ruby x, long *foo) {
+	return sizeof(long)==sizeof(int32) ?
+		convert(x,(int32 *)0) :
+		convert(x,(int64 *)0);
+}
+
+static float64 convert(Ruby x, float64 *foo) {
+	if (INTEGER_P(x)) return INT(x);
+	if (TYPE(x)!=T_FLOAT) RAISE("not a Float");
+	return ((RFloat*)x)->value;}
+static float32 convert(Ruby x, float32 *foo) {
+	return (float32) convert(x,(float64 *)0);}
+typedef Ruby Symbol, Array, String, Integer;
+static Ruby convert(Ruby x, Ruby *bogus) { return x; }
+typedef Ruby (*RMethod)(...); /* !@#$ fishy */
+
+#define BUILTIN_SYMBOLS(MACRO) \
+	MACRO(_grid,"grid") MACRO(_bang,"bang") MACRO(_float,"float") \
+	MACRO(_list,"list") MACRO(_sharp,"#") \
+	MACRO(iv_outlets,"@outlets") \
+	MACRO(iv_ninlets,"@ninlets") \
+	MACRO(iv_noutlets,"@noutlets")
+extern struct BuiltinSymbols {
+#define FOO(_sym_,_str_) Ruby _sym_;
+BUILTIN_SYMBOLS(FOO)
+#undef FOO
+} bsym;
+
+typedef struct R {
+	VALUE r;
+	R() {r=Qnil;}
+	R(int x) {r=INT2NUM(x);}
+	R(unsigned x) {r=UINT2NUM(x);}
+	R(long x) {r=LONG2NUM(x);}
+	R(unsigned long x) {r=ULONG2NUM(x);}
+	R(double x) {r=rb_float_new(x);}
+	R( int64 x) {r= gf_ll2num(x);}
+	R(uint64 x) {r=gf_ull2num(x);}
+	operator bool() {return !!INT2NUM(r);}
+	operator uint8 () {return INT2NUM(r);}
+	operator int16 () {return INT2NUM(r);}
+	operator int32 () {return INT2NUM(r);}
+	operator int64 () {return convert(r,(int64*)0);}
+	operator float32 () {return convert(r,(float32*)0);}
+	operator float64 () {return convert(r,(float64*)0);}
+#define FOO(As,Op) \
+	R &operator As (int x) {r=rb_funcall(r, SI(Op),1,INT2NUM(x)); return *this;}
+	FOO(+=,+) FOO(-=,-) FOO(*=,*) FOO(/=,/) FOO(%=,%)
+	FOO(&=,&) FOO(|=,|) FOO(^=,^) FOO(<<=,<<) FOO(>>=,>>)
+#undef FOO
+//	bool operator  == (int x) {return rb_funcall(r,SI(==),1,INT2NUM(x));}
+#define FOO(Op) \
+	R operator Op (R x)   {return rb_funcall(r,SI(Op),1,x.r);} \
+	R operator Op (int x) {return rb_funcall(r,SI(Op),1,INT2NUM(x));}
+	FOO(+) FOO(-) FOO(*) FOO(/) FOO(%)
+	FOO(&) FOO(|) FOO(^) FOO(<<) FOO(>>)
+	FOO(<) FOO(>) FOO(<=) FOO(>=) FOO(==) FOO(!=)
+#undef FOO
+	static R value(VALUE r) {R x; x.r=r; return x;}
+} ruby;
+
+static R operator -(int a, R b) {return rb_funcall(a,SI(Op),1,INT2NUM(b.r));}
+
+static inline R ipow(R a, R b) {return R::value(rb_funcall(a.r,SI(**),1,b.r));}
+static inline R gf_abs(R a) { return R::value(rb_funcall(a.r,SI(abs),0)); }
+static inline R cmp(R a, R b) { return R::value(rb_funcall(a.r,SI(<=>),1,b.r));}
+
+//****************************************************************
 // hook into pointer manipulation. will help find memory corruption bugs.
 
 template <class T> class Pt {
@@ -377,10 +500,11 @@ public:
 #ifndef IS_BRIDGE
 extern "C" void *gfmalloc(size_t n);
 extern "C" void gffree(void *p);
-inline void *::operator new   (size_t n) { return gfmalloc(n); }
-inline void *::operator new[] (size_t n) { return gfmalloc(n); }
-inline void  ::operator delete   (void *p) { gffree(p); }
-inline void  ::operator delete[] (void *p) { gffree(p); }
+// note that C++ (GCC 3.4) now refuses the :: prefix so i removed it in the 4 following lines:
+inline void *operator new   (size_t n) { return gfmalloc(n); }
+inline void *operator new[] (size_t n) { return gfmalloc(n); }
+inline void  operator delete   (void *p) { gffree(p); }
+inline void  operator delete[] (void *p) { gffree(p); }
 #endif
 
 #define STACK_ARRAY(T,V,N) T V##_foo[N]; Pt<T> V(V##_foo,N);
@@ -400,88 +524,6 @@ template <class T> static void memswap (Pt<T> a, Pt<T> b, int n) {
 }
 
 //****************************************************************
-// my own little Ruby <-> C++ layer
-
-struct Arg { Ruby a; };
-struct ArgList { int n; Pt<Arg> v; };
-static inline bool INTEGER_P(Ruby x) {return FIXNUM_P(x)||TYPE(x)==T_BIGNUM;}
-static inline bool FLOAT_P(Ruby x)   {return TYPE(x)==T_FLOAT;}
-#define INT(x) TO(int32,x)
-#define TO(t,x) convert(x,(t*)0)
-
-// not using NUM2INT because Ruby can convert Symbol to int
-// (by compatibility with Ruby 1.4)
-static inline int32 convert(Ruby x, int32 *foo) {
-	if (INTEGER_P(x)) return NUM2INT(x);
-	if (FLOAT_P(x)) return NUM2INT(rb_funcall(x,SI(round),0));
-	RAISE("expected Integer or Float (got %s)",
-		rb_str_ptr(rb_funcall(x,SI(inspect),0)));
-}
-static int16 convert(Ruby x, int16 *foo) {
-	int v = INT(x);
-	if (v<-0x8000 || v>=0x8000) RAISE("value %d is out of range",v);
-	return v;}
-static uint16 convert(Ruby x, uint16 *foo) {
-	int v = INT(x);
-	if (v<0 || v>=0x10000) RAISE("value %d is out of range",v);
-	return v;}
-static bool  convert(Ruby x, bool  *foo) {
-	if (x==Qtrue) return true;
-	if (x==Qfalse) return false;
-	switch (TYPE(x)) {
-		case T_FIXNUM: case T_BIGNUM: case T_FLOAT: return !!INT(x);
-		default: RAISE("can't convert to bool");
-	}
-}
-
-static uint64 convert(Ruby val, uint64 *foo) {
-	if (FIXNUM_P(val)) return (uint64)FIX2LONG(val);
-	if (TYPE(val)!=T_BIGNUM) RAISE("type error");
-	uint64 v = (uint64)NUM2UINT(rb_funcall(val,SI(>>),1,INT2FIX(32))) << 32;
-	return v + NUM2UINT(rb_funcall(val,SI(&),1,UINT2NUM(0xffffffff)));}
-static int64 convert(Ruby val, int64 *foo) {
-	if (FIXNUM_P(val)) return (int64)FIX2LONG(val);
-	if (TYPE(val)!=T_BIGNUM) RAISE("type error");
-	int64 v = (int64)NUM2INT(rb_funcall(val,SI(>>),1,INT2FIX(32))) << 32;
-	return v + NUM2UINT(rb_funcall(val,SI(&),1,UINT2NUM(0xffffffff)));}
-
-static Ruby gf_ull2num(uint64 val) {
-    return rb_funcall(
-	rb_funcall(UINT2NUM((uint32)(val>>32)),SI(<<),1,INT2FIX(32)),
-	SI(+),1,UINT2NUM((uint32)val));}
-static Ruby gf_ll2num(int64 val) {
-    return rb_funcall(
-	rb_funcall(INT2NUM((int32)(val>>32)),SI(<<),1,INT2FIX(32)),
-	SI(+),1,UINT2NUM((uint32)val));}
-
-static  long  convert(Ruby x,   long *foo) {
-	return sizeof(long)==sizeof(int32) ?
-		convert(x,(int32 *)0) :
-		convert(x,(int64 *)0);
-}
-static float64 convert(Ruby x, float64 *foo) {
-	if (INTEGER_P(x)) return INT(x);
-	if (TYPE(x)!=T_FLOAT) RAISE("not a Float");
-	return ((RFloat*)x)->value;}
-static float32 convert(Ruby x, float32 *foo) {
-	return (float32) convert(x,(float64 *)0);}
-typedef Ruby Symbol, Array, String, Integer;
-static Ruby convert(Ruby x, Ruby *bogus) { return x; }
-typedef Ruby (*RMethod)(...); /* !@#$ fishy */
-
-#define BUILTIN_SYMBOLS(MACRO) \
-	MACRO(_grid,"grid") MACRO(_bang,"bang") MACRO(_float,"float") \
-	MACRO(_list,"list") MACRO(_sharp,"#") \
-	MACRO(iv_outlets,"@outlets") \
-	MACRO(iv_ninlets,"@ninlets") \
-	MACRO(iv_noutlets,"@noutlets")
-extern struct BuiltinSymbols {
-#define FOO(_sym_,_str_) Ruby _sym_;
-BUILTIN_SYMBOLS(FOO)
-#undef FOO
-} bsym;
-
-//****************************************************************
 // CObject is the base class for C++ classes that get exported to Ruby.
 // BTW: It's quite convenient to have virtual-methods in the base class
 // because otherwise the vtable* isn't at the beginning of the object
@@ -509,32 +551,23 @@ void CObject_free (void *);
 // you shouldn't use MethodDecl directly (used by source_filter.rb)
 struct MethodDecl { const char *selector; RMethod method; };
 void define_many_methods(Ruby rself, int n, MethodDecl *methods);
-
 extern Ruby mGridFlow, cFObject, cGridObject, cFormat;
 
 //****************************************************************
 // a Dim is a list of dimensions that describe the shape of a grid
 \class Dim < CObject
 struct Dim : CObject {
-	static const int MAX_DIMENSIONS=16; // maximum number of dimensions in a grid
+	static const int MAX_DIM=16; // maximum number of dimensions in a grid
 	int n;
 	Pt<int32> v; // safe pointer
-	int32 v2[MAX_DIMENSIONS]; // real stuff
+	int32 v2[MAX_DIM]; // real stuff
 	void check(); // test invariants
-	Dim(int n, Pt<int32> v) {
-		this->v = Pt<int32>(v2,MAX_DIMENSIONS);
-		this->n = n;
-		COPY(this->v,v,n); check();
-	}
-	Dim(int n, int32* v) {
-		this->v = Pt<int32>(v2,MAX_DIMENSIONS);
-		this->n = n;
-		COPY(this->v,Pt<int32>(v,n),n); check();
-	}
-	Dim()                 {v=Pt<int32>(v2,MAX_DIMENSIONS); n=0;                     check();}
-	Dim(int a)            {v=Pt<int32>(v2,MAX_DIMENSIONS); n=1;v[0]=a;              check();}
-	Dim(int a,int b)      {v=Pt<int32>(v2,MAX_DIMENSIONS); n=2;v[0]=a;v[1]=b;       check();}
-	Dim(int a,int b,int c){v=Pt<int32>(v2,MAX_DIMENSIONS); n=3;v[0]=a;v[1]=b;v[2]=c;check();}
+	Dim(int n, Pt<int32> v) { this->v = Pt<int32>(v2,MAX_DIM); this->n = n; COPY(this->v,v,n); check();}
+	Dim(int n,    int32 *v) { this->v = Pt<int32>(v2,MAX_DIM); this->n = n; COPY(this->v,Pt<int32>(v,n),n); check();}
+	Dim()                 {v=Pt<int32>(v2,MAX_DIM); n=0;                     check();}
+	Dim(int a)            {v=Pt<int32>(v2,MAX_DIM); n=1;v[0]=a;              check();}
+	Dim(int a,int b)      {v=Pt<int32>(v2,MAX_DIM); n=2;v[0]=a;v[1]=b;       check();}
+	Dim(int a,int b,int c){v=Pt<int32>(v2,MAX_DIM); n=3;v[0]=a;v[1]=b;v[2]=c;check();}
 	int count() {return n;}
 	int get(int i) { return v[i]; }
 	int32 prod(int start=0, int end=-1) {
@@ -610,6 +643,7 @@ NUMBER_TYPE_LIMITS(  int32,-0x80000000,0x7fffffff,-1)
 NUMBER_TYPE_LIMITS(  int64,-0x8000000000000000LL,0x7fffffffffffffffLL,-1)
 NUMBER_TYPE_LIMITS(float32,-HUGE_VAL,+HUGE_VAL,(RAISE("all_ones"),0))
 NUMBER_TYPE_LIMITS(float64,-HUGE_VAL,+HUGE_VAL,(RAISE("all_ones"),0))
+NUMBER_TYPE_LIMITS(   ruby,ruby(-HUGE_VAL),ruby(+HUGE_VAL),(RAISE("all_ones"),0))
 
 #ifdef HAVE_LITE
 #define NT_NOTLITE NT_UNIMPL
@@ -624,7 +658,8 @@ NUMBER_TYPE_LIMITS(float64,-HUGE_VAL,+HUGE_VAL,(RAISE("all_ones"),0))
 	MACRO( uint32,32,NT_UNSIGNED|NT_UNIMPL, "u32") MACRO(int32,32,0, "i32,i") \
 	MACRO( uint64,64,NT_UNSIGNED|NT_UNIMPL, "u64") MACRO(int64,64,NT_NOTLITE, "i64,l") \
 	MACRO(float32,32,NT_NOTLITE|NT_FLOAT, "f32,f") \
-	MACRO(float64,64,NT_NOTLITE|NT_FLOAT, "f64,d")
+	MACRO(float64,64,NT_NOTLITE|NT_FLOAT, "f64,d") \
+	MACRO(   ruby,sizeof(long),NT_NOTLITE,"r")
 
 enum NumberTypeE {
 #define FOO(_sym_,args...) _sym_##_e,
@@ -661,11 +696,12 @@ NumberTypeE NumberTypeE_find (Ruby sym);
 #define TYPESWITCH(T,C,E) switch (T) { \
   case uint8_e:   C(uint8) break;         case int16_e: C(int16) break; \
   case int32_e:   C(int32) break; NONLITE(case int64_e: C(int64) break; \
-  case float32_e: C(float32) break; case float64_e: C(float64) break;) \
+  case float32_e: C(float32) break; case float64_e: C(float64) break; \
+  case ruby_e: C(ruby) break;) \
   default: E; RAISE("type '%s' not available here",number_type_table[T].sym);}
-#define TYPESWITCH_NOFLOAT(T,C,E) switch (T) { \
+#define TYPESWITCH_JUSTINT(T,C,E) switch (T) { \
   case uint8_e: C(uint8) break; case int16_e: C(int16) break; \
-  case int32_e: C(int32) break;   NONLITE(case int64_e: C(int64) break;)\
+  case int32_e: C(int32) break;   NONLITE(case int64_e: C(int64) break;) \
   default: E; RAISE("type '%s' not available here",number_type_table[T].sym);}
 
 // Numop objects encapsulate optimised loops of simple operations
@@ -683,21 +719,22 @@ struct NumopOn : CObject {
 	typedef bool (*AlgebraicCheck)(T x, LeftRight side);
 	// neutral: right: forall y {f(x,y)=x}; left: forall x {f(x,y)=y};
 	// absorbent: right: exists a forall y {f(x,y)=a}; ...
+	T (*neutral)(LeftRight); // default neutral: e.g. 0 for addition, 1 for multiplication
 	AlgebraicCheck is_neutral, is_absorbent;
-	NumopOn(Map m, Zip z, Fold f, Scan s, AlgebraicCheck n, AlgebraicCheck a) :
-		op_map(m), op_zip(z), op_fold(f), op_scan(s),
-		is_neutral(n), is_absorbent(a) {}
+	NumopOn(Map m, Zip z, Fold f, Scan s, T (*neu)(LeftRight), AlgebraicCheck n, AlgebraicCheck a) :
+		op_map(m), op_zip(z), op_fold(f), op_scan(s), neutral(neu), is_neutral(n), is_absorbent(a) {}
 	NumopOn() {}
 	NumopOn(const NumopOn &z) {
 		op_map  = z.op_map;  op_zip  = z.op_zip;
 		op_fold = z.op_fold; op_scan = z.op_scan;
-		is_neutral = z.is_neutral; is_absorbent = z.is_absorbent; }
+		is_neutral = z.is_neutral; neutral = z.neutral;
+		is_absorbent = z.is_absorbent; }
 };
 
 // semigroup property: associativity: f(a,f(b,c))=f(f(a,b),c)
 #define OP_ASSOC (1<<0)
 // abelian property: commutativity: f(a,b)=f(b,a)
-#define OP_COMM  (1<<1)
+#define OP_COMM (1<<1)
 
 \class Numop < CObject
 struct Numop : CObject {
@@ -773,7 +810,6 @@ struct Grid : CObject {
 	P<Dim> dim;
 	NumberTypeE nt;
 	void *data;
-	void *rdata;
 	Grid(P<Dim> dim, NumberTypeE nt, bool clear=false) : dim(0), nt(int32_e), data(0) {
 		if (!dim) RAISE("hell");
 		init(dim,nt);
@@ -795,14 +831,13 @@ EACH_NUMBER_TYPE(FOO)
 		memcpy(foo->data,data,bytes());
 		return foo;
 	}
-	~Grid() {if (rdata) delete[] (uint8 *)rdata;}
+	~Grid() {if (data) free(data);}
 private:
 	void init(P<Dim> dim, NumberTypeE nt) {
 		this->dim = dim;
 		this->nt = nt;
-		rdata = dim ? new int64[1+(bytes()+7)/8] : 0;
-		int align = ((long)rdata) & 7;
-		data = (char *)rdata + ((8-align)&7);
+		data = 0;
+		if (dim) data = memalign(16,bytes()+16);
 		//fprintf(stderr,"rdata=%p data=%p align=%d\n",rdata,data,align);
 	}
 	void init_from_ruby(Ruby x);
@@ -937,18 +972,18 @@ private:
 // C is for class, I for inlet number
 // GRIN1 : int32 only
 // GRIN4 : all types
-// GRIN2 : integers only; no floats
+// GRIN2 : integers only; no floats (no R either actually)
 // GRINF : floats only; no integers
 #ifndef HAVE_LITE
-#define GRIN(TB,TS,TI,TL,TF,TD) {TB,TS,TI,TL,TF,TD}
+#define GRIN(TB,TS,TI,TL,TF,TD,TR) {TB,TS,TI,TL,TF,TD,TR}
 #else
-#define GRIN(TB,TS,TI,TL,TF,TD) {TB,TS,TI}
+#define GRIN(TB,TS,TI,TL,TF,TD,TR) {TB,TS,TI}
 #endif // HAVE_LITE
 
-#define GRIN1(C,I) GRIN(0,0,C::grinw_##I,0,0,0)
-#define GRIN4(C,I) GRIN(C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I)
-#define GRIN2(C,I) GRIN(C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,0,0)
-#define GRINF(C,I) GRIN(0,0,0,0,C::grinw_##I,C::grinw_##I)
+#define GRIN1(C,I) GRIN(0,0,C::grinw_##I,0,0,0,0)
+#define GRIN4(C,I) GRIN(C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I)
+#define GRIN2(C,I) GRIN(C::grinw_##I,C::grinw_##I,C::grinw_##I,C::grinw_##I,0,0,0)
+#define GRINF(C,I) GRIN(0,0,0,0,C::grinw_##I,C::grinw_##I,0)
 
 struct FClass { // 0.7.8: removed all GridObject-specific stuff.
 	void *(*allocator)(); // returns a new C++ object
@@ -1081,6 +1116,8 @@ static void SAME_DIM(int n, P<Dim> a, int ai, P<Dim> b, int bi) {
 
 // a stack for the profiler, etc.
 #define GF_STACK_MAX 256
+//#define NO_INLINE(decl) decl __attribute__((noinline))
+#define NO_INLINE(decl) decl
 struct GFStack {
 	struct GFStackFrame {
 		FObject *o;
@@ -1090,8 +1127,8 @@ struct GFStack {
 	GFStackFrame s[GF_STACK_MAX];
 	int n;
 	GFStack() { n = 0; }
-	void push (FObject *o) __attribute__((noinline));
-	void pop () __attribute__((noinline));
+	NO_INLINE(void push (FObject *o));
+	NO_INLINE(void pop ());
 };
 extern GFStack gf_stack;
 struct GFStackMarker {
diff --git a/externals/gridflow/base/main.c b/externals/gridflow/base/main.c
index 5cdd92f4..d65c81d0 100644
--- a/externals/gridflow/base/main.c
+++ b/externals/gridflow/base/main.c
@@ -1,5 +1,5 @@
 /*
-	$Id: main.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: main.c,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
@@ -91,7 +91,7 @@ void CObject_free (void *foo) {
 // Dim
 
 void Dim::check() {
-	if (n>MAX_DIMENSIONS) RAISE("too many dimensions");
+	if (n>MAX_DIM) RAISE("too many dimensions");
 	for (int i=0; i<n; i++) if (v[i]<0) RAISE("Dim: negative dimension");
 }
 
@@ -435,7 +435,7 @@ static Ruby GridFlow_handle_braces(Ruby rself, Ruby argv) {
 				s++;
 			}
 			const char *se = s+strlen(s);
-			while (se[-1]==')' || se[-1]=='}') { se--; close++; }
+			while (se>s && (se[-1]==')' || se[-1]=='}')) { se--; close++; }
 			if (s!=se) {
 				Ruby u = rb_str_new(s,se-s);
 				av[j++] = rb_funcall(rself,SI(FloatOrSymbol),1,u);
@@ -495,7 +495,8 @@ void gfmemcopy(uint8 *out, const uint8 *in, int n) {
 extern "C" {
 void *gfmalloc(size_t n) {
 	uint64 t = rdtsc();
-	void *p = malloc(n);
+//	void *p = malloc(n);
+	void *p = memalign(16,n);
 	long align = (long)p & 7;
 	if (align) fprintf(stderr,"malloc alignment = %ld mod 8\n",align);
 	t=rdtsc()-t;
@@ -573,7 +574,7 @@ BUILTIN_SYMBOLS(FOO)
 	rb_ivar_set(mGridFlow, SI(@bsym), PTR2FIX(&bsym));
 	rb_define_const(mGridFlow, "GF_VERSION", rb_str_new2(GF_VERSION));
 	rb_define_const(mGridFlow, "GF_COMPILE_TIME", rb_str_new2(GF_COMPILE_TIME));
-
+	rb_define_const(mGridFlow, "GCC_VERSION", rb_str_new2(GCC_VERSION));
 	cFObject = rb_define_class_under(mGridFlow, "FObject", rb_cObject);
 	EVAL(
 \ruby
diff --git a/externals/gridflow/base/main.rb b/externals/gridflow/base/main.rb
index 82976fb6..5b33bfad 100644
--- a/externals/gridflow/base/main.rb
+++ b/externals/gridflow/base/main.rb
@@ -1,8 +1,8 @@
 =begin
-	$Id: main.rb,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: main.rb,v 1.2 2006-03-15 04:37:28 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -94,6 +94,7 @@ def self.packstring_for_nt(nt)
 	when :u, :u8,  :uint8; "C*"
 	when :s, :i16, :int16; "s*"
 	when :i, :i32, :int32; "l*"
+	when :l, :i64, :int64; raise "int64? lol"
 	when :f, :f32, :float32; "f*"
 	when :d, :f64, :float64; "d*"
 	else raise "no decoder for #{nt.inspect}"
@@ -156,12 +157,26 @@ class FObject
 		attr_accessor :do_loadbangs
 		attr_accessor :comment
 		def foreign_name; @foreign_name if defined? @foreign_name end
+		def doc(selector=nil,text=nil)
+			return @doc if not selector
+			if not defined? @doc; @doc={}; end
+			return @doc[selector] if not text
+			@doc[selector] = text
+		end
+		def doc_out(selector=nil,text=nil)
+			return @doc_out if not selector
+			if not defined? @doc_out; @doc_out={}; end
+			return @doc_out[selector] if not text
+			@doc_out[selector] = text
+		end
 	end
 	def post(*a) GridFlow.post(*a) end
 	def self.subclass(*args,&b)
 		qlass = Class.new self
 		qlass.install(*args)
-		qlass.module_eval(&b)
+		#qlass.module_eval{qlass.instance_eval(&b)}
+		qlass.instance_eval{qlass.module_eval(&b)}
+		#qlass.module_eval(&b)
 	end
 	alias :total_time :total_time_get
 	alias :total_time= :total_time_set
diff --git a/externals/gridflow/base/number.c b/externals/gridflow/base/number.c
index c483cf0b..b362e2cb 100644
--- a/externals/gridflow/base/number.c
+++ b/externals/gridflow/base/number.c
@@ -1,5 +1,5 @@
 /*
-	$Id: number.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: number.c,v 1.2 2006-03-15 04:37:08 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
@@ -44,8 +44,8 @@ template <class T> class Op {
 public:
 	// I call abort() on those because I can't say they're purevirtual.
 	static T f(T a, T b) {abort();}
-	static bool is_neutral(T x, LeftRight side)   {assert(!"Op::is_neutral called?");}
-	static bool is_absorbent(T x, LeftRight side) {assert(!"Op::is_absorbent called?");}
+	static bool is_neutral(T x, LeftRight side)   {assert(!"Op::is_neutral called?");   return false;}
+	static bool is_absorbent(T x, LeftRight side) {assert(!"Op::is_absorbent called?"); return false;}
 };
 
 template <class O> class OpLoops {
@@ -58,7 +58,7 @@ public:
 	}
 	template <class T> static void op_zip (int n, T *as, T *bs) {
 		if (!n) return;
-		int ba=bs-as; // really!
+		ptrdiff_t ba=bs-as; // really!
 #define FOO(I) as[I]=O::f(as[I],as[ba+I]);
 	UNROLL_8(FOO,n,as)
 #undef FOO
@@ -66,7 +66,7 @@ public:
 	// disabled
 	template <class T> static void op_zip2 (int n, T *as, T *bs, T *cs) {
 		if (!n) return;
-		int ba=bs-as, ca=cs-as;
+		ptrdiff_t ba=bs-as, ca=cs-as;
 #define FOO(I) as[ca+I]=O::f(as[I],as[ba+I]);
 	UNROLL_8(FOO,n,as)
 #undef FOO
@@ -136,119 +136,113 @@ template <class T> static void quick_put_zip (int n, T *as, T *bs) {
 }
 
 // classic two-input operator
-#define DEF_OP(op,expr,neutral,absorbent) \
+#define DEF_OP(op,expr,neu,isneu,isorb) \
 	template <class T> class Y##op : Op<T> { public: \
 		inline static T f(T a, T b) { return expr; } \
-		inline static bool is_neutral  (T x, LeftRight side) { return neutral; } \
-		inline static bool is_absorbent(T x, LeftRight side) { return absorbent; } };
-#define DEF_OPFT(op,expr,neutral,absorbent,T) \
+		inline static T neutral (LeftRight side) {return neu;} \
+		inline static bool is_neutral  (T x, LeftRight side) {return isneu;} \
+		inline static bool is_absorbent(T x, LeftRight side) {return isorb;}};
+#define DEF_OPFT(op,expr,neu,isneu,isorb,T) \
 	template <> class Y##op<T> : Op<T> { public: \
 		inline static T f(T a, T b) { return expr; } \
-		inline static bool is_neutral  (T x, LeftRight side) { return neutral; } \
-		inline static bool is_absorbent(T x, LeftRight side) { return absorbent; } }; \
+		inline static T neutral (LeftRight side) {return neu;} \
+		inline static bool is_neutral  (T x, LeftRight side) {return isneu;} \
+		inline static bool is_absorbent(T x, LeftRight side) {return isorb;}};
 // this macro is for operators that have different code for the float version
-#define DEF_OPF(op,expr,expr2,neutral,absorbent) \
-	DEF_OP( op,expr,      neutral,absorbent) \
-	DEF_OPFT(op,expr2,neutral,absorbent,float32) \
-	DEF_OPFT(op,expr2,neutral,absorbent,float64)
+#define DEF_OPF(op,expr,expr2,neu,isneu,isorb) \
+	DEF_OP( op,expr,      neu,isneu,isorb) \
+	DEF_OPFT(op,expr2,neu,isneu,isorb,float32) \
+	DEF_OPFT(op,expr2,neu,isneu,isorb,float64)
 
 #define DECL_OPON(base,op,T) NumopOn<T>( \
 	&base<Y##op<T> >::op_map, &base<Y##op<T> >::op_zip, \
 	&base<Y##op<T> >::op_fold, &base<Y##op<T> >::op_scan, \
-	&Y##op<T>::is_neutral, &Y##op<T>::is_absorbent)
+	&Y##op<T>::neutral, &Y##op<T>::is_neutral, &Y##op<T>::is_absorbent)
 #define DECL_OPON_NOFOLD(base,op,T) NumopOn<T>( \
 	&base<Y##op<T> >::op_map, &base<Y##op<T> >::op_zip, 0,0, \
-	&Y##op<T>::is_neutral, &Y##op<T>::is_absorbent)
+	&Y##op<T>::neutral, &Y##op<T>::is_neutral, &Y##op<T>::is_absorbent)
 #define DECL_OP(op,sym,flags) Numop(0, sym, \
 	DECL_OPON(OpLoops,op,uint8), DECL_OPON(OpLoops,op,int16), \
 	DECL_OPON(OpLoops,op,int32) NONLITE(, DECL_OPON(OpLoops,op,int64), \
-	DECL_OPON(OpLoops,op,float32), DECL_OPON(OpLoops,op,float64)), flags)
+	DECL_OPON(OpLoops,op,float32), DECL_OPON(OpLoops,op,float64), \
+	DECL_OPON(OpLoops,op,ruby)), flags)
 #define DECL_OP_NOFLOAT(op,sym,flags) Numop(0, sym, \
 	DECL_OPON(OpLoops,op,uint8), DECL_OPON(OpLoops,op,int16), \
 	DECL_OPON(OpLoops,op,int32) NONLITE(, DECL_OPON(OpLoops,op,int64), \
-	NumopOn<float32>(0,0,0,0,0,0), NumopOn<float64>(0,0,0,0,0,0)), flags)
+	NumopOn<float32>(0,0,0,0,0,0,0), NumopOn<float64>(0,0,0,0,0,0,0), \
+	DECL_OPON(OpLoops,op,ruby)), flags)
 #define DECL_OP_NOFOLD(op,sym,flags) Numop(0, sym, \
 	DECL_OPON_NOFOLD(OpLoops,op,uint8), DECL_OPON_NOFOLD(OpLoops,op,int16), \
 	DECL_OPON_NOFOLD(OpLoops,op,int32) NONLITE(, DECL_OPON_NOFOLD(OpLoops,op,int64), \
-	DECL_OPON_NOFOLD(OpLoops,op,float32), DECL_OPON_NOFOLD(OpLoops,op,float64)), flags)
+	DECL_OPON_NOFOLD(OpLoops,op,float32), DECL_OPON_NOFOLD(OpLoops,op,float64), \
+	DECL_OPON_NOFOLD(OpLoops,op,ruby)), flags)
 
 template <class T> static inline T gf_floor (T a) {
 	return (T) floor((double)a); }
 template <class T> static inline T gf_trunc (T a) {
 	return (T) floor(abs((double)a)) * (a<0?-1:1); }
 
-/*
-uint8 clipadd(uint8 a, uint8 b) { int32 c=a+b; return c<0?0:c>255?255:c; }
-int16 clipadd(int16 a, int16 b) { int32 c=a+b; return c<-0x8000?-0x8000:c>0x7fff?0x7fff:c; }
-int32 clipadd(int32 a, int32 b) { int64 c=a+b; return c<-0x80000000?-0x80000000:c>0x7fffffff?0x7fffffff:c; }
-int64 clipadd(int64 a, int64 b) { int64 c=(a>>1)+(b>>1)+(a&b&1);
-	return c<(nt_smallest(0LL)/2?nt_smallest(0LL):c>nt_greatest(0LL)/2?nt_greatest(0LL):a+b; }
-uint8 clipsub(uint8 a, uint8 b) { int32 c=a-b; return c<0?0:c>255?255:c; }
-int16 clipsub(int16 a, int16 b) { int32 c=a-b; return c<-0x8000?-0x8000:c>0x7fff?0x7fff:c; }
-int32 clipsub(int32 a, int32 b) { int64 c=a-b; return c<-0x80000000?-0x80000000:c>0x7fffffff?0x7fffffff:c; }
-int64 clipsub(int64 a, int64 b) { int64 c=(a>>1)-(b>>1); //???
-	return c<(nt_smallest(0LL)/2?nt_smallest(0LL):c>nt_greatest(0LL)/2?nt_greatest(0LL):a-b; }
-*/
+// trying to avoid GCC warning about uint8 too small for ==256
+template <class T> static bool equal256 (T     x) {return x==256;}
+template <>        static bool equal256 (uint8 x) {return false;}
 
 #ifdef PASS1
-DEF_OP(ignore, a, side==at_right, side==at_left)
-DEF_OP(put, b, side==at_left, side==at_right)
-DEF_OP(add, a+b, x==0, false)
-DEF_OP(sub, a-b, side==at_right && x==0, false)
-DEF_OP(bus, b-a, side==at_left  && x==0, false)
-DEF_OP(mul, a*b, x==1, x==0)
-DEF_OP(mulshr8, ((int32)a*(int32)b)>>8, (int64)x==256, x==0) //!@#$ bug with int64
-DEF_OP(div, b==0 ? 0 : a/b, side==at_right && x==1, false)
-DEF_OP(div2, b==0 ? 0 : div2(a,b), side==at_right && x==1, false)
-DEF_OP(vid, a==0 ? 0 : b/a, side==at_left && x==1, false)
-DEF_OP(vid2, a==0 ? 0 : div2(b,a), side==at_left && x==1, false)
-DEF_OPF(mod, b==0 ? 0 : mod(a,b), b==0 ? 0 : a-b*gf_floor(a/b),
-	false, side==at_left && x==0 || side==at_right && x==1)
-DEF_OPF(dom, a==0 ? 0 : mod(b,a), a==0 ? 0 : b-a*gf_floor(b/a),
-	false, side==at_left && x==0 || side==at_right && x==1)
+DEF_OP(ignore, a, 0, side==at_right, side==at_left)
+DEF_OP(put,    b, 0, side==at_left, side==at_right)
+DEF_OP(add,  a+b, 0, x==0, false)
+DEF_OP(sub,  a-b, 0, side==at_right && x==0, false)
+DEF_OP(bus,  b-a, 0, side==at_left  && x==0, false)
+DEF_OP(mul,  a*b, 1, x==1, x==0)
+DEF_OP(mulshr8, (a*b)>>8, 256, equal256(x), x==0)
+DEF_OP(div,  b==0 ? (T)0 :      a/b , 1, side==at_right && x==1, false)
+DEF_OP(div2, b==0 ?    0 : div2(a,b), 1, side==at_right && x==1, false)
+DEF_OP(vid,  a==0 ? (T)0 :      b/a , 1, side==at_left  && x==1, false)
+DEF_OP(vid2, a==0 ?    0 : div2(b,a), 1, side==at_left  && x==1, false)
+DEF_OPF(mod, b==0 ? 0 : mod(a,b), b==0 ? 0 : a-b*gf_floor(a/b), 0, false, side==at_left && x==0 || side==at_right && x==1)
+DEF_OPF(dom, a==0 ? 0 : mod(b,a), a==0 ? 0 : b-a*gf_floor(b/a), 0, false, side==at_left && x==0 || side==at_right && x==1)
 //DEF_OPF(rem, b==0 ? 0 : a%b, b==0 ? 0 : a-b*gf_trunc(a/b))
 //DEF_OPF(mer, a==0 ? 0 : b%a, a==0 ? 0 : b-a*gf_trunc(b/a))
-DEF_OP(rem, b==0?0:a%b, false, side==at_left&&x==0 || side==at_right&&x==1)
-DEF_OP(mer, a==0?0:b%a, false, side==at_left&&x==0 || side==at_right&&x==1)
+DEF_OP(rem, b==0?(T)0:a%b, 0, false, side==at_left&&x==0 || side==at_right&&x==1)
+DEF_OP(mer, a==0?(T)0:b%a, 0, false, side==at_left&&x==0 || side==at_right&&x==1)
 #endif
 #ifdef PASS2
-DEF_OP(gcd, gcd(a,b), x==0, x==1)
-DEF_OP(gcd2, gcd2(a,b), x==0, x==1) // should test those and pick one of the two
-DEF_OP(lcm, a==0 || b==0 ? 0 : lcm(a,b), x==1, x==0)
-DEF_OPF(or , a|b, (float32)((int32)a | (int32)b), x==0, x==nt_all_ones(&x))
-DEF_OPF(xor, a^b, (float32)((int32)a ^ (int32)b), x==0, false)
-DEF_OPF(and, a&b, (float32)((int32)a & (int32)b), x==nt_all_ones(&x), x==0)
-DEF_OPF(shl, a<<b, a*pow(2.0,+b), side==at_right && x==0, false)
-DEF_OPF(shr, a>>b, a*pow(2.0,-b), side==at_right && x==0, false)
-DEF_OP(sc_and, a ? b : a, side==at_left && x!=0, side==at_left && x==0)
-DEF_OP(sc_or,  a ? a : b, side==at_left && x==0, side==at_left && x!=0)
-DEF_OP(min, min(a,b), x==nt_greatest(&x), x==nt_smallest(&x))
-DEF_OP(max, max(a,b), x==nt_smallest(&x), x==nt_greatest(&x))
+DEF_OP(gcd,   gcd(a,b), 0, x==0, x==1)
+DEF_OP(gcd2, gcd2(a,b), 0, x==0, x==1) // should test those and pick one of the two
+DEF_OP(lcm, a==0 || b==0 ? (T)0 : lcm(a,b), 1, x==1, x==0)
+DEF_OPF(or , a|b, (float32)((int32)a | (int32)b), 0, x==0, x==nt_all_ones(&x))
+DEF_OPF(xor, a^b, (float32)((int32)a ^ (int32)b), 0, x==0, false)
+DEF_OPF(and, a&b, (float32)((int32)a & (int32)b), -1 /*nt_all_ones((T*)0)*/, x==nt_all_ones(&x), x==0)
+DEF_OPF(shl, a<<b, a*pow(2.0,+b), 0, side==at_right && x==0, false)
+DEF_OPF(shr, a>>b, a*pow(2.0,-b), 0, side==at_right && x==0, false)
+DEF_OP(sc_and, a ? b : a, 1, side==at_left && x!=0, side==at_left && x==0)
+DEF_OP(sc_or,  a ? a : b, 0, side==at_left && x==0, side==at_left && x!=0)
+DEF_OP(min, min(a,b), nt_greatest((T*)0), x==nt_greatest(&x), x==nt_smallest(&x))
+DEF_OP(max, max(a,b), nt_smallest((T*)0), x==nt_smallest(&x), x==nt_greatest(&x))
+DEF_OP(cmp, cmp(a,b), 0, false, false)
+DEF_OP(eq,  a == b, 0, false, false)
+DEF_OP(ne,  a != b, 0, false, false)
+DEF_OP(gt,  a >  b, 0, false, side==at_left&&x==nt_smallest(&x)||side==at_right&&x==nt_greatest(&x))
+DEF_OP(le,  a <= b, 0, false, side==at_left&&x==nt_smallest(&x)||side==at_right&&x==nt_greatest(&x))
+DEF_OP(lt,  a <  b, 0, false, side==at_left&&x==nt_greatest(&x)||side==at_right&&x==nt_smallest(&x))
+DEF_OP(ge,  a >= b, 0, false, side==at_left&&x==nt_greatest(&x)||side==at_right&&x==nt_smallest(&x))
 #endif
 #ifdef PASS3
-DEF_OP(cmp, cmp(a,b), false, false)
-DEF_OP(eq,  a == b, false, false)
-DEF_OP(ne,  a != b, false, false)
-DEF_OP(gt,  a >  b, false, side==at_left&&x==nt_smallest(&x)||side==at_right&&x==nt_greatest(&x))
-DEF_OP(le,  a <= b, false, side==at_left&&x==nt_smallest(&x)||side==at_right&&x==nt_greatest(&x))
-DEF_OP(lt,  a <  b, false, side==at_left&&x==nt_greatest(&x)||side==at_right&&x==nt_smallest(&x))
-DEF_OP(ge,  a >= b, false, side==at_left&&x==nt_greatest(&x)||side==at_right&&x==nt_smallest(&x))
-DEF_OP(sin, (T)(b * sin(a * (M_PI / 18000))), false, false) // "LN=9000+36000n RA=0 LA=..."
-DEF_OP(cos, (T)(b * cos(a * (M_PI / 18000))), false, false) // "LN=36000n RA=0 LA=..."
-DEF_OP(atan, (T)(atan2(a,b) * (18000 / M_PI)), false, false) // "LA=0"
-DEF_OP(tanh, (T)(b * tanh(a * (M_PI / 18000))), false, x==0)
-DEF_OP(gamma, b<=0 ? 0 : (T)(0+floor(pow(a/256.0,256.0/b)*256.0)), false, false) // "RN=256"
-DEF_OP(pow, ipow(a,b), false, false) // "RN=1"
-DEF_OP(log, (T)(a==0 ? 0 : b * log(gf_abs(a))), false, false) // "RA=0"
-// 0.7.8
-//DEF_OPF(clipadd, clipadd(a,b), a+b, x==0, false)
-//DEF_OPF(clipsub, clipsub(a,b), a-b, side==at_right && x==0, false)
-DEF_OP(abssub,  gf_abs(a-b), false, false)
-DEF_OP(sqsub, (a-b)*(a-b), false, false)
-DEF_OP(avg, (a+b)/2, false, false)
-DEF_OP(hypot, (T)(0+floor(sqrt(a*a+b*b))), false, false)
-DEF_OP(sqrt, (T)(0+floor(sqrt(a))), false, false)
-DEF_OP(rand, a==0 ? 0 : random()%(int32)a, false, false)
+DEF_OP(sin, (T)((float64)b * sin((float64)a * (M_PI / 18000))), 0, false, false) // "LN=9000+36000n RA=0 LA=..."
+DEF_OP(cos, (T)((float64)b * cos((float64)a * (M_PI / 18000))), 0, false, false) // "LN=36000n RA=0 LA=..."
+DEF_OP(atan, (T)(atan2(a,b) * (18000 / M_PI)), 0, false, false) // "LA=0"
+DEF_OP(tanh, (T)((float64)b * tanh((float64)a * (M_PI / 18000))), 0, false, x==0)
+DEF_OP(gamma, b<=0 ? (T)0 : (T)(0+floor(pow((float64)a/256.0,256.0/(float64)b)*256.0)), 0, false, false) // "RN=256"
+DEF_OP(pow, ipow(a,b), 0, false, false) // "RN=1"
+DEF_OP(log, (T)(a==0 ? (T)0 : (T)((float64)b * log((float64)gf_abs(a)))), 0, false, false) // "RA=0"
+// 0.8
+DEF_OPF(clipadd, clipadd(a,b), a+b, 0, x==0, false)
+DEF_OPF(clipsub, clipsub(a,b), a-b, 0, side==at_right && x==0, false)
+DEF_OP(abssub,  gf_abs(a-b), 0, false, false)
+DEF_OP(sqsub,   (a-b)*(a-b), 0, false, false)
+DEF_OP(avg,         (a+b)/2, 0, false, false)
+DEF_OP(hypot, (T)(0+floor(sqrt(a*a+b*b))), 0, false, false)
+DEF_OP(sqrt,  (T)(0+floor(sqrt(a))),       0, false, false)
+DEF_OP(rand, a==0 ? (T)0 : (T)(random()%(int32)a), 0, false, false)
 //DEF_OP(erf,"erf*", 0)
 #endif
 
@@ -289,28 +283,43 @@ Numop op_table2[] = {
 	DECL_OP_NOFOLD(sc_or, "||", 0),
 	DECL_OP(min, "min", OP_ASSOC|OP_COMM),
 	DECL_OP(max, "max", OP_ASSOC|OP_COMM),
+	DECL_OP_NOFOLD(eq,   "==", OP_COMM),
+	DECL_OP_NOFOLD(ne,   "!=", OP_COMM),
+	DECL_OP_NOFOLD(gt,   ">", 0),
+	DECL_OP_NOFOLD(le,   "<=", 0),
+	DECL_OP_NOFOLD(lt,   "<", 0),
+	DECL_OP_NOFOLD(ge,   ">=", 0),
+	DECL_OP_NOFOLD(cmp,  "cmp", 0),
 };
 const long op_table2_n = COUNT(op_table2);
 #endif
 #ifdef PASS3
+uint8 clipadd(uint8 a, uint8 b) { int32 c=a+b; return c<0?0:c>255?255:c; }
+int16 clipadd(int16 a, int16 b) { int32 c=a+b; return c<-0x8000?-0x8000:c>0x7fff?0x7fff:c; }
+int32 clipadd(int32 a, int32 b) { int64 c=a+b; return c<-0x80000000?-0x80000000:c>0x7fffffff?0x7fffffff:c; }
+int64 clipadd(int64 a, int64 b) { int64 c=(a>>1)+(b>>1)+(a&b&1), p=nt_smallest((int64 *)0), q=nt_greatest((int64 *)0);
+	return c<p/2?p:c>q/2?q:a+b; }
+uint8 clipsub(uint8 a, uint8 b) { int32 c=a-b; return c<0?0:c>255?255:c; }
+int16 clipsub(int16 a, int16 b) { int32 c=a-b; return c<-0x8000?-0x8000:c>0x7fff?0x7fff:c; }
+int32 clipsub(int32 a, int32 b) { int64 c=a-b; return c<-0x80000000?-0x80000000:c>0x7fffffff?0x7fffffff:c; }
+int64 clipsub(int64 a, int64 b) { int64 c=(a>>1)-(b>>1); //???
+	int64 p=nt_smallest((int64 *)0), q=nt_greatest((int64 *)0);
+	return c<p/2?p:c>q/2?q:a-b; }
+
+ruby clipadd(ruby a, ruby b) { return a+b; }
+ruby clipsub(ruby a, ruby b) { return a-b; }
+
 Numop op_table3[] = {
-	DECL_OP_NOFOLD(eq,  "==", OP_COMM),
-	DECL_OP_NOFOLD(ne,  "!=", OP_COMM),
-	DECL_OP_NOFOLD(gt,  ">", 0),
-	DECL_OP_NOFOLD(le,  "<=", 0),
-	DECL_OP_NOFOLD(lt,  "<", 0),
-	DECL_OP_NOFOLD(ge,  ">=", 0),
-	DECL_OP_NOFOLD(cmp, "cmp", 0),
-	DECL_OP_NOFOLD(sin, "sin*", 0),
-	DECL_OP_NOFOLD(cos, "cos*", 0),
+	DECL_OP_NOFOLD(sin,  "sin*", 0),
+	DECL_OP_NOFOLD(cos,  "cos*", 0),
 	DECL_OP_NOFOLD(atan, "atan", 0),
 	DECL_OP_NOFOLD(tanh, "tanh*", 0),
 	DECL_OP_NOFOLD(gamma, "gamma", 0),
 	DECL_OP_NOFOLD(pow, "**", 0),
 	DECL_OP_NOFOLD(log, "log*", 0),
-// 0.7.8
-//	DECL_OP(clipadd,"clip+", OP_ASSOC|OP_COMM),
-//	DECL_OP(clipsub,"clip-", 0),
+// 0.8
+	DECL_OP(clipadd,"clip+", OP_ASSOC|OP_COMM),
+	DECL_OP(clipsub,"clip-", 0),
 	DECL_OP_NOFOLD(abssub,"abs-", OP_COMM),
 	DECL_OP_NOFOLD(sqsub,"sq-", OP_COMM),
 	DECL_OP_NOFOLD(avg,"avg", OP_COMM),
diff --git a/externals/gridflow/base/source_filter.rb b/externals/gridflow/base/source_filter.rb
index 59e24867..c55f4d95 100644
--- a/externals/gridflow/base/source_filter.rb
+++ b/externals/gridflow/base/source_filter.rb
@@ -1,14 +1,16 @@
+#!/usr/bin/env ruby
+
 $keywords = %w(class decl def end grdecl)
 $stack = []
 $classes = []
 
 ClassDecl = Struct.new(:name,:supername,:methods,:grins,:attrs,:info)
-MethodDecl = Struct.new(:rettype,:selector,:arglist,:minargs,:maxargs,:where)
+MethodDecl = Struct.new(:rettype,:selector,:arglist,:minargs,:maxargs,:where,:static)
 Arg = Struct.new(:type,:name,:default)
 
 class MethodDecl
 	def ==(o)
-		return false unless rettype==o.rettype &&
+		return false unless rettype==o.rettype && static==o.static &&
 		maxargs==o.maxargs # && minargs==o.minargs 
 		arglist.each_index{|i| arglist[i] == o.arglist[i] or return false }
 		return true
@@ -35,11 +37,11 @@ def handle_class(line)
 end
 
 def parse_methoddecl(line,term)
-	/^(\w+)\s+(\w+)\s*\(([^\)]*)\)\s*#{term}/.match line or
+	/^(static\s)?\s*(\w+)\s+(\w+)\s*\(([^\)]*)\)\s*#{term}/.match line or
 		raise "syntax error #{where} #{line}"
-	rettype,selector,arglist = $1,$2,$3
+	static,rettype,selector,arglist = $1,$2,$3,$4
 	arglist,minargs,maxargs = parse_arglist arglist
-	MethodDecl.new(rettype,selector,arglist,minargs,maxargs,where)
+	MethodDecl.new(rettype,selector,arglist,minargs,maxargs,where,static)
 end
 
 def parse_arglist(arglist)
@@ -75,10 +77,9 @@ def handle_attr(line)
 	raise "missing \\class #{where}" if
 		not $stack[-1] or not ClassDecl===$stack[-1]
 	$stack[-1].attrs[name]=Arg.new(type,name,nil)
-	Out.print line
-	Out.puts "//FCS"
+	Out.print line.gsub(/\/\/.*$/,"") # hack!
 	handle_decl "void _0_#{name}_m (#{type} #{name});"
-	Out.puts "# #{$linenumber}"
+#	Out.puts "# #{$linenumber}"
 end
 
 def handle_decl(line)
@@ -88,16 +89,17 @@ def handle_decl(line)
 	m = parse_methoddecl(line,";\s*$")
 	$stack[-1].methods[m.selector] = m
 
+	Out.print "static " if m.static
 	Out.print "#{m.rettype} #{m.selector}(int argc, Ruby *argv"
 	Out.print "," if m.arglist.length>0
 	Out.print "#{unparse_arglist m.arglist});"
 	Out.puts "static Ruby #{m.selector}_wrap"+
 	"(int argc, Ruby *argv, Ruby rself);//FCS"
-	Out.puts "# #{$linenumber+1}"
+#	Out.puts "# #{$linenumber}"
 end
 
 def handle_def(line)
-	m = parse_methoddecl(line,"\{?.*$")
+	m = parse_methoddecl(line,"\\{?.*$")
 	term = line[/\{.*/]
 	qlass = $stack[-1]
 	raise "missing \\class #{where}" if not qlass or not ClassDecl===qlass
@@ -176,7 +178,7 @@ def handle_classinfo(line)
 		c,s = frame.name,method.selector
 		"{ \"#{s}\",(RMethod)#{c}::#{s}_wrap }"
 	}.join(",")
-	Out.puts "}; FClass ci#{cl} = { #{cl}_allocator, #{cl}_startup,"
+	Out.puts "}; static FClass ci#{cl} = { #{cl}_allocator, #{cl}_startup,"
 	Out.puts "#{cl.inspect}, COUNT(#{cl}_methods), #{cl}_methods };"
 	Out.puts "void #{frame.name}_startup (Ruby rself) "+line
 end
diff --git a/externals/gridflow/base/test.rb b/externals/gridflow/base/test.rb
index 1d44f918..86c17af3 100644
--- a/externals/gridflow/base/test.rb
+++ b/externals/gridflow/base/test.rb
@@ -1,4 +1,4 @@
-# $Id: test.rb,v 1.1 2005-10-04 02:02:13 matju Exp $
+# $Id: test.rb,v 1.2 2006-03-15 04:37:28 matju Exp $
 
 $:.delete_if {|x| x=='.' }
 require "gridflow"
@@ -7,13 +7,15 @@ include GridFlow
 GridFlow.verbose=true
 
 $imdir = "./images"
-$animdir = "/opt/mex"
+$animdir = "./images/movies"
 srand Time.new.to_i
 $port = 4200+rand(100)
 
 def pressakey; puts "press return to continue."; readline; end
 
-class Expect < FObject
+FO = FObject # shortcut
+
+class Expect < FO
 	def praise(*a)
 		#raise(*a)
 		puts a
@@ -38,64 +40,71 @@ class Expect < FObject
 	install "expect", 1, 0
 end
 
+def cast value, type
+	case type
+	when :b, :u8,:uint8; value & 0xff
+	when :s,:i16,:int16; (value & 0x7fff) - (value & 0x8000)
+	when :i,:i32,:int32; value
+	when :l,:i64,:int64; value
+	when :f,:f32,:float32; value.to_f
+	when :d,:f64,:float64; value.to_f
+	when :r,:ruby; value
+	else raise "hell"
+	end
+end
+
 def test_bitpacking
 	#!@#$ WRITE ME
 end
 
-def test_operators
+def test_numops
 	#!@#$ WRITE ME
 end
 
-def cast value, type
-	case type
-	when :uint8; value & 0xff
-	when :int16; (value & 0x7fff) - (value & 0x8000)
-	when :int32; value
-	when :int64; value
-	when :float32; value.to_f
-	when :float64; value.to_f
-	else raise "hell"
-	end
+#def tnt() for nt in [:b,:s,:i,:l,:f,:d,:r] do yield end end
+def _(o,s,i,d) o.connect(s,i,d) end
+def chain(*a)
+	(a.length-1).times {|i| a[i].connect 0,a[i+1],a }
+	a[-1]
 end
 
 def test_math
+for nt in [:b,:s,:i,:l,:f,:d,:r] do
 	hm = "#".intern
-#for nt in [:uint8, :int16, :int32, :int64, :float32, :float64] do
-for nt in [:uint8, :int16, :int32, :float32] do
-
 	#GridFlow.verbose = false
-	GridFlow.gfpost "starting test for #{nt}"
-	e = FObject["@export_list"]
-	x = Expect.new
-	e.connect 0,x,0
+
+	(e=FO["#export_list"])
+	(x=Expect.new)
+	_ e,0,x,0 
 
 	x.expect([1,2,3,11,12,13,21,22,23]) {
 		e.send_in 0, 3,3,nt,hm,1,2,3,11,12,13,21,22,23 }
 
-	a = FObject["fork"]
-	b = FObject["@ +"]
-	a.connect 0,b,0
-	a.connect 1,b,1
-	b.connect 0,e,0
+	(a=FO["fork"])
+	(b=FO["@ +"])
+	_ a,0,b,0
+	_ a,1,b,1
+	_ b,0,e,0
 	x.expect([4]) { a.send_in 0, 2 }
 
-	x.expect([2,3,5,7]) { e.send_in 0,"list #{nt} 2 3 5 7" }
-	a = FObject["@fold + {#{nt} # 0}"]
-	a.connect 0,e,0
+	x.expect([2,3,5,7]) { e.send_in 0,:list,nt,2,3,5,7 }
+	a = FO["#fold + , seed {#{nt} # 0}"]
+	_ a,0,e,0
 	x.expect([cast(420000,nt)]) { a.send_in 0,"10000 #{nt} # 42" }
 
-	(a = FObject["@ + {#{nt} 0 10}"]).connect 0,e,0
+	a = FO["# + {#{nt} 0 10}"]
+	_ a,0,e,0
 	x.expect([1,12,4,18,16,42,64]) {
 		a.send_in 0,:list,nt, 1,2,4,8,16,32,64 }
 
-	a = FObject["@ + {#{nt} 2 3 5}"]
-	b = FObject["@fold + {#{nt} # 0}"]
-	a.connect 0,b,0
-	b.connect 0,e,0
+	a = FO["# + {#{nt} 2 3 5}"]
+	b = FO["#fold + , seed {#{nt} # 0}"]
+	_ a,0,b,0
+	_ b,0,e,0
 	x.expect([cast(45332,nt)]) { a.send_in 0, 1000,nt,hm,42 }
-	
 
-	(a = FObject["@ + {#{nt} # 42}"]).connect 0,e,0
+	a = FO["@ + {#{nt} # 42}"]
+	_ a,0,e,0
 	x.expect((43..169).to_a) {
 		a.send_in 0,:list,nt, *(1..127).to_a }
 
@@ -106,52 +115,47 @@ for nt in [:uint8, :int16, :int32, :float32] do
 		a.send_in 1, "list #{nt} # 10"
 		a.send_in 0,:list,nt, 1,2,4,8 }
 
-if nt!=:uint8 and nt!=:float32 and nt!=:float64
-	(a = FObject["@ / {#{nt} # 3}"]).connect 0,e,0
-	x.expect([-2,-1,-1,-1,0,0,0,0,0,1,1,1,2]) {
-		a.send_in(0,:list,nt, *(-6..6).to_a) }
-
-	(a = FObject["@ div {#{nt} # 3}"]).connect 0,e,0
-	x.expect([-2,-2,-2,-1,-1,-1,0,0,0,1,1,1,2]) {
-		a.send_in(0, :list, nt, *(-6..6).to_a) }
+if nt!=:b and nt!=:f and nt!=:d
+	a=FO["# / {#{nt} # 3}"  ]; _ a,0,e,0; x.expect([-2,-1,-1,-1,0,0,0,0,0,1,1,1,2]) { a.send_in(0,:list,nt, *(-6..6).to_a) }
+	a=FO["# div {#{nt} # 3}"]; _ a,0,e,0; x.expect([-2,-2,-2,-1,-1,-1,0,0,0,1,1,1,2]) { a.send_in(0, :list, nt, *(-6..6).to_a) }
 end
 
-	(a = FObject["@ ignore {#{nt} # 42}"]).connect 0,e,0
+	(a = FO["# ignore {#{nt} # 42}"]).connect 0,e,0
 	x.expect((42..52).to_a) { a.send_in(0, :list, nt, *(42..52).to_a) }
 
-	(a = FObject["@ put {#{nt} # 42}"]).connect 0,e,0
+	(a = FO["# put {#{nt} # 42}"]).connect 0,e,0
 	x.expect([42]*13) { a.send_in(0, :list, nt, *(-6..6).to_a) }
 
-if nt!=:uint8
-	(a = FObject["@! abs"]).connect 0,e,0
+if nt!=:b
+	(a = FO["# abs-"]).connect 0,e,0
 	x.expect([2,3,5,7]) {
 		a.send_in 0,:list,nt, -2,3,-5,7 }
 end
 
-	(a = FObject["@fold * {#{nt} # 1}"]).connect 0,e,0
+	(a = FO["#fold *, seed {#{nt} # 1}"]).connect 0,e,0
 	x.expect([210]) { a.send_in 0,:list,nt, 2,3,5,7 }
 	x.expect([128]) { a.send_in 0,:list,nt, 1,1,2,1,2,2,2,1,1,2,1,2,2 }
 
-	(a = FObject["@fold + {#{nt} 0 0}"]).connect 0,e,0
+	(a = FO["#fold +, seed {#{nt} 0 0}"]).connect 0,e,0
 	x.expect([18,23]) { a.send_in 0, 3,2,nt,hm,2,3,5,7,11,13 }
 
-	(a = FObject["@scan + {#{nt} 0 0}"]).connect 0,e,0
+	(a = FO["#scan +, seed {#{nt} 0 0}"]).connect 0,e,0
 	x.expect([2,3,7,10,18,23]) { a.send_in 0, 3,2,nt,hm,2,3,5,7,11,13 }
 
-	(a = FObject["@scan * {#{nt} # 1}"]).connect 0,e,0
+	(a = FO["#scan *, seed {#{nt} # 1}"]).connect 0,e,0
 	x.expect([2,6,30,210]) { a.send_in 0,:list,nt, 2,3,5,7 }
 	x.expect([1,1,2,2,4,8,16,16,16,32,32,64,128]) {
 		a.send_in 0,:list,nt, 1,1,2,1,2,2,2,1,1,2,1,2,2 }
 
-	(a = FObject["@scan + {#{nt} 0 0 0}"]).connect 0,e,0
+	(a = FO["#scan +, seed {#{nt} 0 0 0}"]).connect 0,e,0
 	x.expect([1,2,3,5,7,9,12,15,18]) {
 		a.send_in 0,:list,3,3,nt,hm,*(1..9).to_a }
 
-	(a = FObject["@scan + {#{nt} # 0}"]).connect 0,e,0
+	(a = FO["#scan +, seed {#{nt} # 0}"]).connect 0,e,0
 	x.expect([1,3,6, 4,9,15, 7,15,24]) {
 		a.send_in 0,:list,3,3,nt,hm,*(1..9).to_a }
 
-	(a = FObject["@outer +"]).connect 0,e,0
+	(a = FO["#outer +"]).connect 0,e,0
 	x.expect([9,10,12,17,18,20,33,34,36]) {
 		a.send_in 1,:list,nt, 1,2,4
 		a.send_in 0,:list,nt, 8,16,32 }
@@ -160,47 +164,29 @@ end
 		a.send_in 1,(0...10).to_a
 		a.send_in 0,(0...10).map{|i| 10*i }}
 
-if nt!=:uint8 and nt!=:float32 and nt!=:float64
-	(a = FObject["@outer",:%,[nt,3,-3]]).connect 0,e,0
+if nt!=:b and nt!=:f and nt!=:d
+	(a = FO["#outer",:%,[nt,3,-3]]).connect 0,e,0
 	x.expect([0,0,1,-2,2,-1,0,0,1,-2,2,-1,0,0]) {
 		a.send_in 0,:list,nt, -30,-20,-10,0,+10,+20,+30 }
 
-	(a = FObject["@outer","swap%".intern,[nt,3,-3]]).connect 0,e,0
+	(a = FO["#outer","swap%".intern,[nt,3,-3]]).connect 0,e,0
 	x.expect([-27,-3,-17,-3,-7,-3,0,0,3,7,3,17,3,27]) {
 		a.send_in 0,:list,nt, -30,-20,-10,0,+10,+20,+30 }
 end
 
-	(a = FObject["@import {3}"]).connect 0,e,0
-	x.expect([2,3,5]) { [2,3,5].each {|v| a.send_in 0,:list,nt,hm,v }}
-
-	(a = FObject["@import {3}"]).connect 0,e,0
-	x.expect([2,3,5]) { [2,3,5].each {|v| a.send_in 0,:list,nt,v }}
-
-	(a = FObject["@redim {5}"]).connect 0,e,0
-	x.expect([2,3,5,2,3]) { a.send_in 0,:list,2,3,5 }
-
-	(a = FObject["@redim {5}"]).connect 0,e,0
-	x.expect([0,0,0,0,0]) { a.send_in 0,:list }
+	(a = FO["#import {3}"]).connect 0,e,0; x.expect([2,3,5]) { [2,3,5].each {|v| a.send_in 0,:list,nt,hm,v }}
+	(a = FO["#import {3}"]).connect 0,e,0; x.expect([2,3,5]) { [2,3,5].each {|v| a.send_in 0,:list,nt,v }}
+	(a = FO["#redim {5}"]).connect 0,e,0; x.expect([2,3,5,2,3]) { a.send_in 0,:list,2,3,5 }
+	(a = FO["#redim {5}"]).connect 0,e,0; x.expect([0,0,0,0,0]) { a.send_in 0,:list }
+	(a = FO["#redim {0}"]).connect 0,e,0; x.expect([]) { a.send_in 0,:list,42,37,69 }
 
-	(a = FObject["@redim {0}"]).connect 0,e,0
-	x.expect([]) { a.send_in 0,:list,42,37,69 }
-
-	(a = FObject["@inner * + {#{nt} # 0} {2 2 #{nt} # 2 3 5 7}"]).connect 0,e,0
-	(i0 = FObject["@redim {2 2}"]).connect 0,a,0
+	(a = FO["#inner {2 2 #{nt} # 2 3 5 7}, seed {#{nt} # 0}"]).connect 0,e,0
+	(i0 = FO["@redim {2 2}"]).connect 0,a,0
 	x.expect([12,17,48,68]) { i0.send_in 0,:list,nt, 1,2,4,8 }
 
-#if nt!=:int64
-if false
-	a = FObject["@print"]
-	a.send_in 0, "3 3 #{nt} # 1 0 0 0"
-	a.send_in 0, "3 3 3 #{nt} # 1 2 3 4"
-	a.send_in 0, "base 16"
-	a.send_in 0, "3 3 3 #{nt} # 255 0 0 0"
-end
-
-	(a = FObject["@outer * {3 2 #{nt} # 1 2 3}"]).connect 0,e,0
-	b = FObject["@dim"]
-	c = FObject["@export_list"]
+	(a = FO["#outer * {3 2 #{nt} # 1 2 3}"]).connect 0,e,0
+	b = FO["#dim"]
+	c = FO["#export_list"]
 	a.connect 0,b,0
 	y = Expect.new
 	b.connect 0,c,0
@@ -211,29 +197,29 @@ end
 			a.send_in 0,:list,nt, 1, 10 }}
 
 	#pr=GridPrint.new
-	(b = FObject["@redim {5 5}"]).connect 0,e,0
-	(a = FObject["@convolve * + {#{nt} # 0}"]).connect 0,b,0
-	(i0 = FObject["@redim {5 5 1}"]).connect 0,a,0
-	(i1 = FObject["@redim {3 1}"]).connect 0,a,1
+	(b = FO["#redim {5 5}"]).connect 0,e,0
+	(a = FO["#convolve, seed {#{nt} # 0}"]).connect 0,b,0
+	(i0 = FO["#redim {5 5 1}"]).connect 0,a,0
+	(i1 = FO["#redim {3 1}"]).connect 0,a,1
 	i1.send_in 1, 3,3
 	x.expect([5,6,5,4,4,4,6,7,6,4,3,3,6,7,5,4,2,3,6,6,5,4,3,4,5]) {
 		a.send_in 1,:list,3,3,nt,hm, 1,1,1,1,1,1,1,1,1
 		i0.send_in 0,:list,nt, 1,1,1,0,0,0 }
 
-	(a = FObject["@convolve * + {#{nt} # 0}"]).connect 0,e,0
+	(a = FO["#convolve, seed {#{nt} # 0}"]).connect 0,e,0
 	x.expect([1,3,6,4,0]) {
 		a.send_in 1, 1,2,nt,hm, 1,1
 		a.send_in 0, 1,5,nt,hm, 0,1,2,4,0 }
 
-	(a = FObject["@import {4}"]).connect 0,e,0
+	(a = FO["#import {4}"]).connect 0,e,0
 	x.expect([2,3,5,7]) {
 		[2,3,5,7].each {|v| a.send_in 0,v }}
 	x.expect([1,2,3],[4,5,6],[7,8,9]) {
 		a.send_in 1, :list, 3
 		a.send_in 0, :list, *(1..9).to_a}
 
-	for o in ["@store"]
-		(a = FObject[o]).connect 0,e,0
+	for o in ["#store"]
+		(a = FO[o]).connect 0,e,0
 		a.send_in 1, 5, 4, nt, hm, 1,2,3,4,5
 		x.expect([1,2,3,4,4,5,1,2,2,3,4,5]) {
 			a.send_in 0, 3,1, hm, 0,2,4 }
@@ -251,109 +237,106 @@ end
 		x.expect([6,7,3,4, 8,11,13,3, 4,17,19,2, 3,4,5,1, 2,3,4,5]) { a.send_in 0 }
 	end
 
-	b = FObject["@dim"]
-	c = FObject["@export_list"]
+	b = FO["#dim"]
+	c = FO["#export_list"]
 	a.connect 0,b,0
 	y = Expect.new
 	b.connect 0,c,0
 	c.connect 0,y,0
 
-if nt!=:uint8 and nt!=:float32 and nt!=:float64 and nt!=:int64
-	(a = FObject["@for {#{nt} # 0} {#{nt} # 10} {#{nt} # 1}"]).connect 0,e,0
+if nt!=:b and nt!=:f and nt!=:d and nt!=:l
+	(a = FO["#for {#{nt} # 0} {#{nt} # 10} {#{nt} # 1}"]).connect 0,e,0
 	a.connect 0,b,0
 	y.expect([10]) {
 		x.expect((0...10).to_a) {
 			a.send_in 0 } }
 
-	(a = FObject["@for {#{nt} # 0} {#{nt} # -10} {#{nt} # 1}"]).connect 0,e,0
+	(a = FO["#for {#{nt} # 0} {#{nt} # -10} {#{nt} # 1}"]).connect 0,e,0
 	a.connect 0,b,0
 	y.expect([0]) { x.expect([]) { a.send_in 0 } }
 
-	(a = FObject["@for {#{nt} # 0} {#{nt} # -10} {#{nt} # -1}"]).connect 0,e,0
+	(a = FO["#for {#{nt} # 0} {#{nt} # -10} {#{nt} # -1}"]).connect 0,e,0
 	a.connect 0,b,0
 	y.expect([10]) { x.expect([0,-1,-2,-3,-4,-5,-6,-7,-8,-9]) { a.send_in 0 } }
 
-	(a = FObject["@for {#{nt} 0} {#{nt} 10} {#{nt} 1}"]).connect 0,e,0
+	(a = FO["#for {#{nt} 0} {#{nt} 10} {#{nt} 1}"]).connect 0,e,0
 	a.connect 0,b,0
 	y.expect([10,1]) {
 		x.expect((0...10).to_a) {
 			a.send_in 0 } }
 
-	(a = FObject["@for {#{nt} 2 3} {#{nt} 5 7} {#{nt} 1 1}"]).connect 0,e,0
+	(a = FO["#for {#{nt} 2 3} {#{nt} 5 7} {#{nt} 1 1}"]).connect 0,e,0
 	a.connect 0,b,0
 	y.expect([3,4,2]) {
 		x.expect([2,3,2,4,2,5,2,6,3,3,3,4,3,5,3,6,4,3,4,4,4,5,4,6]) {
 			a.send_in 0 } }
 end
 
-	(a = FObject["@complex_sq"]).connect 0,e,0
+	(a = FO["@complex_sq"]).connect 0,e,0
 	x.expect([8,0]) { a.send_in 0, 2, 2 }
 	x.expect([0,9]) { a.send_in 0, 0, 3 }
 
-	(a = FObject["@rotate 3000 {1 2 5}"]).connect 0,e,0
-#	pr = GridPrint.new
-#	a.connect 0,pr,0
-#	x.expect([]) { 
+	(a = FO["#rotate 3000 {1 2 5}"]).connect 0,e,0
 	a.send_in 0, "5 5 # 1000 0 0 0 0 0" 
-#	}
 
-#if nt==:float32 or nt==:float64
-#	(a = FObject["@matrix_solve"]).connect 0,e,0
+#if nt==:f or nt==:d
+#	(a = FO["@matrix_solve"]).connect 0,e,0
 #	x.expect([1,0,0,0,1,0,0,0,1]) { a.send_in 0, 3, 3, nt, hm, 1,0,0,0,1,0,0,0,1 }
 #end
 	GridFlow.gfpost "ending test for #{nt}"
 end # for nt
 
-	(a = FObject["@two"]).connect 0,e,0
+	(a = FO["#pack 2"]).connect 0,e,0
 	x.expect([42,0]) { a.send_in 0,42 }
 	x.expect([42,28]) { a.send_in 1,28 }
 	x.expect([1313,28]) { a.send_in 0,1313 }
 
-	(a = FObject["@three"]).connect 0,e,0
+	(a = FO["#pack 3"]).connect 0,e,0
 	x.expect([42,0,0]) { a.send_in 0,42 }
 	x.expect([42,28,0]) { a.send_in 1,28 }
 	x.expect([42,28,-1]) { a.send_in 2,-1 }
 
-	(a = FObject["@four"]).connect 0,e,0
+	(a = FO["#pack 4"]).connect 0,e,0
 	x.expect([42,0,0,0]) { a.send_in 0,42 }
 	x.expect([42,0,0,-42]) { a.send_in 3,-42 }
 
-#	glob = FObject["@global"]
-#	glob.send_in 0, "profiler_dump"
+	(a = FO["#pack 5"]).connect 0,e,0
+	x.expect([3.5,0,0,0]) { a.send_in 0,3.5 }
+	x.expect([3.5,0,0,-3.5]) { a.send_in 3,-3.5 }
 
-	e = FObject["@export_list"]
+	e = FO["#export_list"]
 	e.connect 0,x,0
 
-	a = FObject["@import per_message"]
+	a = FO["#import per_message"]
 	a.connect 0,e,0
 	x.expect([1,2,3]) { a.send_in 0,1,2,3 }
 	x.expect([102,111,111]) { a.send_in 0,:symbol,:foo }
 	x.expect([ 70, 79, 79]) { a.send_in 0,:symbol,:FOO }
 
-	a = FObject["@join 1"]
+	a = FO["@join 1"]
 	a.connect 0,e,0
 	a.send_in 1,2,2,nt,hm,11,13,17,19
 	x.expect([2,3,11,13,5,7,17,19]) { a.send_in 0,2,2,nt,hm,2,3,5,7 }
 
-if nt!=:float64; #!@#$
+if nt!=:d
 	a.send_in 1, 5,1,nt,hm,42
 	y.expect([5,4]) {
 		x.expect([2,3,5,42,7,11,13,42,17,19,23,42,29,31,37,42,41,43,47,42]) {
 			a.send_in 0, 5,3,nt,hm,2,3,5,7,11,13,17,19,23,29,31,37,41,43,47 }}
 end
-	a = FObject["@join 0"]
+	a = FO["@join 0"]
 	a.connect 0,e,0
 	a.send_in 1,2,2,nt,hm,11,13,17,19
 	x.expect([2,3,5,7,11,13,17,19]) { a.send_in 0,2,2,nt,hm,2,3,5,7 }
 
-	a = FObject["@join 0 {2 2 2 #{nt} # 1 2 3}"]
+	a = FO["@join 0 {2 2 2 #{nt} # 1 2 3}"]
 	a.connect 0,e,0
 	a.connect 0,b,0
 	y.expect([2,2,2]) { x.expect([1,2,3,1,2,3,1,2]) { a.send_in 0,0,2,2,nt,hm }}
 
-	a = FObject["@ravel"]
-	b = FObject["@dim"]
-	be = FObject["@export_list"]
+	a = FO["#ravel"]
+	b = FO["#dim"]
+	be = FO["#export_list"]
 	bx = Expect.new
 	a.connect 0,e,0
 	a.connect 0,b,0
@@ -361,28 +344,28 @@ end
 	be.connect 0,bx,0
 	bx.expect([9]) {
 		x.expect([1,2,3,2,4,6,3,6,9]) {
-			o = FObject["@outer *"]
+			o = FO["#outer *"]
 			o.connect 0,a,0
 			o.send_in 1,1,2,3
 			o.send_in 0,1,2,3
 		}
 	}
 
-	a = FObject["@grade"]
+	a = FO["#grade"]
 	a.connect 0,e,0
 	x.expect([0,2,4,6,8,9,7,5,3,1]) { a.send_in 0, 0,9,1,8,2,7,3,6,4,5 }
 	x.expect([0,9,1,8,2,7,3,6,4,5]) { a.send_in 0, 0,2,4,6,8,9,7,5,3,1 }
 	x.expect([7,6,5,4,3,2,1,0]) { a.send_in 0, 7,6,5,4,3,2,1,0 }
 
-	a = FObject["@grade"]
-	b = FObject["@fold +"]
+	a = FO["#grade"]
+	b = FO["#fold +"]
 	a.connect 0,b,0
 	b.connect 0,e,0
 	x.expect([100*99/2]) { a.send_in 0, (0...100).map { (rand*0x10000).to_i }}
 	x.expect([100*99/2]) { a.send_in 0, (0...100).map { (rand*0x10).to_i }}
 	x.expect([100*99/2]) { a.send_in 0, (0...100).map { 0 }}
 
-	a = FObject["@perspective"]
+	a = FO["#perspective"]
 	a.connect 0,e,0
 	c = []
 	8.times {|v|
@@ -396,12 +379,12 @@ end
 			a.send_in 0, 8,3,hm,*c }
 			
 # regressiontests for past bugs
-	a = FObject["@inner"] # that's it.
+	a = FO["#inner"] # that's it.
 end
 
 def test_rtmetro
-	rt = FObject["rtmetro 1000"]
-	pr = FObject["rubyprint"]
+	rt = FO["rtmetro 1000"]
+	pr = FO["rubyprint"]
 	rt.connect 0,pr,0
 	GridFlow.post "trying to start the rtmetro"
 	rt.send_in 0,1
@@ -413,8 +396,8 @@ def test_rtmetro
 end
 
 def test_print
-	i = FObject["@redim {3}"]
-	pr = FObject["@print"]
+	i = FO["#redim {3}"]
+	pr = FO["#print"]
 #	pr = GridFlow::RubyPrint.new
 	i.connect 0,pr,0
 	i.send_in 0, 85, 170, 255
@@ -433,11 +416,11 @@ class Barf < GridObject
 end
 
 def test_nonsense
-#	(a = FObject["@! abs"]).connect 0,e,0
+#	(a = FO["@! abs"]).connect 0,e,0
 #	x.expect_error {
 #		a.send_in 1, 42,42 }
 
-	a = FObject["@import {3}"]
+	a = FO["#import {3}"]
 	b = Barf.new
 	a.connect 0,b,0
 	begin
@@ -451,20 +434,20 @@ def test_nonsense
 end
 
 def test_store
-	a = FObject["@in file #{$imdir}/teapot.png"]
-	b = FObject["@store"]
-	c = FObject["@out x11"]
+	a = FO["#in file #{$imdir}/teapot.png"]
+	b = FO["#store"]
+	c = FO["#out x11"]
 	a.connect 0,b,1
 	a.send_in 0,"cast uint8"
 	a.send_in 0
 	b.connect 0,c,0
-	d = FObject["@for {0 0} {256 256} {1 1}"]
-	e = FObject["@ ^ 85"]
+	d = FO["#for {0 0} {256 256} {1 1}"]
+	e = FO["# ^ 85"]
 	d.connect 0,e,0
 	e.connect 0,b,0
-	f = FObject["fps detailed"]
+	f = FO["fps detailed"]
 	c.connect 0,f,0
-	pr = FObject["rubyprint"]
+	pr = FO["rubyprint"]
 	f.connect 0,pr,0
 	GridFlow.verbose = false
 	256.times {|t|
@@ -475,8 +458,8 @@ end
 
 # generates recursive checkerboard pattern (munchies) in bluish colours.
 class Munchies < FPatcher
-	@fobjects = ["fork","fork","@for 0 64 1","@for 0 64 1","@for 2 5 1",
-	"@outer ^","@outer *"]
+	@FOs = ["fork","fork","#for 0 64 1","#for 0 64 1","#for 2 5 1",
+	"#outer ^","#outer *"]
 	@wires = [-1,0,0,0, 0,0,1,0, 1,1,4,0, 4,0,6,1,
 	1,0,3,0, 3,0,5,1, 0,0,2,0, 2,0,5,0, 5,0,6,0, 6,0,-1,0 ]
 	def initialize() super end
@@ -485,15 +468,15 @@ end
 
 def test_munchies
 	m=Munchies.new
-	gout = FObject["@out quartz"]
+	gout = FO["#out window"]
 	m.connect 0,gout,0
 	m.send_in 0
 	$mainloop.loop
 end
 
 def test_image command
-	gin = FObject["@in"]
-	gout = FObject["@out x11"]
+	gin = FO["#in"]
+	gout = FO["#out window"]
 	gin.connect 0,gout,0
 #	31.times {
 	3.times {
@@ -501,17 +484,17 @@ def test_image command
 		gout.send_in 0,"timelog 1"
 		gin.send_in 0
 	}
-	FObject["@global"].send_in 0, "profiler_dump"
+	FO["#global"].send_in 0, "profiler_dump"
 	$mainloop.loop
 end
 
 def test_ppm2
-	gin = FObject["@in"]
-	store = FObject["@store"]
-	pa = FObject["@convolve << + 0"]
-	pb = FObject["@ / 9"]
-	ra = FObject["@redim {3 3}"]
-	gout = FObject["@out x11"]
+	gin = FO["#in"]
+	store = FO["#store"]
+	pa = FO["#convolve << + 0"]
+	pb = FO["# / 9"]
+	ra = FO["#redim {3 3}"]
+	gout = FO["#out window"]
 	gin.connect 0,store,1
 	store.connect 0,pa,0
 	pa.connect 0,pb,0
@@ -524,16 +507,16 @@ def test_ppm2
 	gin.send_in 0
 #	40.times { store.send_in 0 }
 	loop { store.send_in 0 }
-	v4j = FObject["@global"]
+	v4j = FO["#global"]
 	v4j.send_in 0,"profiler_dump"
 #	$mainloop.loop
 end
 
 def test_foo
-	foo = FObject["@for {0 0} {64 64} {1 1}"]
-	che = FObject["@checkers"]
-	sca = FObject["@scale_by {5 3}"]
-	out = FObject["@out x11"]
+	foo = FO["#for {0 0} {64 64} {1 1}"]
+	che = FO["#checkers"]
+	sca = FO["#scale_by {5 3}"]
+	out = FO["#out window"]
 	foo.connect 0,che,0
 	che.connect 0,sca,0
 	sca.connect 0,out,0
@@ -543,43 +526,42 @@ end
 
 def test_anim(*msgs)
 	GridFlow.verbose = false
-	gin = FObject["@in"]
-	#gout1 = FObject["@out x11"]
-	gout1 = FObject["@out sdl"]
-	#gout1 = FObject["@out quicktime file test.mov"]
+	gin = FO["#in"]
+	gout1 = FO["#out window"]
+	#gout1 = FO["@out quicktime file test.mov"]
 	#gout1.send_in 0, :codec, :jpeg
-	fps = FObject["fps detailed"]
-	rpr = FObject["rubyprint"]
+	fps = FO["fps detailed"]
+	rpr = FO["rubyprint"]
 	gout1.connect 0,fps,0
 	#fps.connect 0,rpr,0
 =begin
-	gout1 = FObject["@downscale_by {3 2}"]
-	gout2 = FObject["@rgb_to_greyscale"]
-	gout3 = FObject["@out aalib X11 -height 60 -width 132"]
+	gout1 = FO["#downscale_by {3 2}"]
+	gout2 = FO["#rgb_to_greyscale"]
+	gout3 = FO["#out aalib X11 -height 60 -width 132"]
 	gout1.connect 0,gout2,0
 	gout2.connect 0,gout3,0
 =end
 
-	rpr = FObject["rubyprint"]
+	rpr = FO["rubyprint"]
 #	gin.connect 1,rpr,0
 
 	gin.connect 0,gout1,0
 =begin
-	layer=FObject["@layer"]
+	layer=FO["@layer"]
 	gin.connect 0,layer,0
 	layer.connect 0,gout1,0
-	check=FObject["@checkers"]
-	phor=FObject["@for {0 0} {256 256} {1 1}"]
+	check=FO["@checkers"]
+	phor=FO["@for {0 0} {256 256} {1 1}"]
 	phor.connect 0,check,0
 	check.connect 0,layer,1
 	phor.send_in 0
 =end
 
-#	scale = FObject["@scale_by 3"]
+#	scale = FO["@scale_by 3"]
 #	gin.connect 0,scale,0
 #	scale.connect 0,gout1,0
 
-#	pr = FObject["rubyprint time"]; gout.connect 0,pr,0
+#	pr = FO["rubyprint time"]; gout.connect 0,pr,0
 	msgs.each {|m| gin.send_in 0,m }
 	gin.send_in 0, "cast uint8"
 #	gout.send_in 0,"timelog 1"
@@ -591,7 +573,7 @@ def test_anim(*msgs)
 		#gin.send_in 0, rand(1000)
 	}
 #	loop { gin.send_in 0 }
-#	metro = FObject["rtmetro 80"]
+#	metro = FO["rtmetro 80"]
 #	metro.connect 0,gin,0
 #	metro.send_in 0,1
 #	$mainloop.loop
@@ -601,11 +583,11 @@ def test_anim(*msgs)
 		frames, d, 1000*d/frames, frames/d
 #	global.send_in 0,"dfgdfgdkfjgl"
 	gout1.send_in 0, :close
-	global = FObject["@global"]
+	global = FO["@global"]
 	global.send_in 0,"profiler_dump"
 end
 
-class TestTCP < FObject
+class TestTCP < FO
 	attr_accessor :idle
 	def initialize
 		@idle = true
@@ -624,8 +606,8 @@ def test_tcp
 	if fork
 		# client (is receiving)
 		GridFlow.post_header = "[client] "
-		$in_client = in1 = FObject["@in"]
-		out = FObject["@out x11"]
+		$in_client = in1 = FO["@in"]
+		out = FO["@out x11"]
 		in1.connect 0,out,0
 		out.send_in 0,"timelog 1"
 		out.send_in 0,"autodraw 2"
@@ -646,9 +628,9 @@ def test_tcp
 	else
 		# server (is sending)
 		GridFlow.post_header = "[server] "
-		$in1_server = in1 = FObject["@in"]
-		$in2_server = in2 = FObject["@in"]
-		$out = out = FObject["@out"]
+		$in1_server = in1 = FO["@in"]
+		$in2_server = in2 = FO["@in"]
+		$out = out = FO["@out"]
 		toggle = 0
 		in1.connect 0,out,0
 		in2.connect 0,out,0
@@ -656,7 +638,7 @@ def test_tcp
 		in2.send_in 0,"open #{$imdir}/b001.jpg"
 		out.send_in 0,"open grid tcpserver #{$port}"
 		out.send_in 0,"type uint8"
-		test_tcp = GridFlow::FObject.new
+		test_tcp = GridFlow::FO.new
 		def test_tcp._0_bang
 			# GridFlow.post "tick"
 			@toggle ||= 0
@@ -678,22 +660,22 @@ end
 
 def test_layer
 	
-	gin = FObject["@in png file ShaunaKennedy/atmosphere-bleu.png"]
-#	gin1 = FObject["@in file #{$imdir}/r001.jpg"]
-#	gin = FObject["@join 2 {240 320 1 # 128}"]
+	gin = FO["@in png file ShaunaKennedy/atmosphere-bleu.png"]
+#	gin1 = FO["@in file #{$imdir}/r001.jpg"]
+#	gin = FO["@join 2 {240 320 1 # 128}"]
 #	gin1.connect 0,gin,0
 
-#	gfor = FObject["@for {0 0} {120 160} {1 1}"]
-#	gfor = FObject["@for {0 0} {240 320} {1 1}"]
-	gfor = FObject["@for {0 0} {480 640} {1 1}"]
-	gche = FObject["@checkers"]
+#	gfor = FO["@for {0 0} {120 160} {1 1}"]
+#	gfor = FO["@for {0 0} {240 320} {1 1}"]
+	gfor = FO["@for {0 0} {480 640} {1 1}"]
+	gche = FO["@checkers"]
 
-	gove = FObject["@layer"]
-#	gove = FObject["@fold + {0 0 0 0}"]
-#	gout = FObject["@print"]
-#	gove = FObject["@inner2 * + 0 {3 4 # 1 0 0 0 0}"]
-#	gout = FObject["@out sdl"]
-	gout = FObject["@out x11"]
+	gove = FO["@layer"]
+#	gove = FO["@fold + {0 0 0 0}"]
+#	gout = FO["@print"]
+#	gove = FO["@inner2 * + 0 {3 4 # 1 0 0 0 0}"]
+#	gout = FO["@out sdl"]
+	gout = FO["@out x11"]
 
 	gin.connect 0,gove,0
 	gfor.connect 0,gche,0
@@ -702,8 +684,8 @@ def test_layer
 
 	gfor.send_in 0
 
-	fps = FObject["fps detailed"]
-	pr = FObject["rubyprint"]
+	fps = FO["fps detailed"]
+	pr = FO["rubyprint"]
 	gout.connect 0,fps,0
 	fps.connect 0,pr,0
 
@@ -715,20 +697,17 @@ end
 
 Images = [
 	"png file opensource.png",
-#	"png file ShaunaKennedy/atmosphere.png",
-#	"targa file #{$imdir}/tux.tga",
-#	"png file #{$imdir}/lena.png",
-	"file #{$imdir}/ruby0216.jpg",
-	"file #{$imdir}/g001.jpg",
-	"file #{$imdir}/teapot.tga",
+	"#{$imdir}/ruby0216.jpg",
+	"#{$imdir}/g001.jpg",
+#	"#{$imdir}/teapot.tga",
 	"grid gzfile #{$imdir}/foo.grid.gz",
 	"grid gzfile #{$imdir}/foo2.grid.gz",
 #	"videodev /dev/video0",
 ]
 
 def test_formats_speed
-	gin = FObject["@in"]
-	gout = FObject["@out x11"]
+	gin = FO["@in"]
+	gout = FO["@out x11"]
 	gin.connect 0,gout,0
 	GridFlow.verbose=false
 	t1=[]
@@ -743,14 +722,15 @@ def test_formats_speed
 end
 
 def test_formats
-	gin = FObject["@in"]
-	gout = FObject["@out window"]
-	gs = FObject["@ + {int16 # 0}"]
+	gin = FO["@in"]
+	gout = FO["@out window"]
+	gs = FO["@ + {int16 # 0}"]
 	gin.connect 0,gs,0
 	gs.connect 0,gout,0
 #	GridFlow.verbose=false
 	t1=[]
 	Images.each {|command|
+		GridFlow.post "SENDING open %s", command
 		gin.send_in 0,"open #{command}"
 		gin.send_in 0,"cast int16"
 		# test for load, rewind, load
@@ -763,10 +743,10 @@ def test_formats
 end
 
 def test_rewind
-	gin = FObject["@in videodev /dev/video1 noinit"]
+	gin = FO["@in videodev /dev/video1 noinit"]
 	gin.send_in 0, "transfer read"
-	gout = FObject["@out ppm file /tmp/foo.ppm"]
-#	gout = FObject["@out x11"]
+	gout = FO["@out ppm file /tmp/foo.ppm"]
+#	gout = FO["@out x11"]
 	gin.connect 0,gout,0
 	loop {
 		gin.send_in 0
@@ -776,15 +756,15 @@ end
 
 def test_formats_write
 	# read files, store and save them, reload, compare, expect identical
-	a = FObject["@in"]
-	b = FObject["@out"]; a.connect 0,b,0
-	c = FObject["@ -"]; a.connect 0,c,1
-	d = FObject["@in"]; d.connect 0,c,0
-	e = FObject["@fold +"]; c.connect 0,e,0
-	f = FObject["@fold +"]; e.connect 0,f,0
-	g = FObject["@fold +"]; f.connect 0,g,0
-	h = FObject["@ / 15000"]; g.connect 0,h,0
-	i = FObject["@export_list"]; h.connect 0,i,0
+	a = FO["@in"]
+	b = FO["@out"]; a.connect 0,b,0
+	c = FO["@ -"]; a.connect 0,c,1
+	d = FO["@in"]; d.connect 0,c,0
+	e = FO["@fold +"]; c.connect 0,e,0
+	f = FO["@fold +"]; e.connect 0,f,0
+	g = FO["@fold +"]; f.connect 0,g,0
+	h = FO["@ / 15000"]; g.connect 0,h,0
+	i = FO["@export_list"]; h.connect 0,i,0
 	x = Expect.new; i.connect 0,x,0
 	[
 		["ppm file", "#{$imdir}/g001.jpg"],
@@ -807,21 +787,21 @@ def test_formats_write
 end
 
 def test_mpeg_write
-	a = FObject["@in ppm file /opt/mex/r.ppm.cat"]
-	b = FObject["@out x11"]
+	a = FO["@in ppm file /opt/mex/r.ppm.cat"]
+	b = FO["@out x11"]
 	a.connect 0,b,0
 	loop{a.send_in 0}
 end
 
 def test_headerless
-	gout = FObject["@out"]
+	gout = FO["@out"]
 	gout.send_in 0, "open grid file #{$imdir}/hello.txt"
 	gout.send_in 0, "headerless"
 	gout.send_in 0, "type uint8"
 	gout.send_in 0, "104 101 108 108 111 32 119 111 114 108 100 33 10"
 	gout.send_in 0, "close"
-	gin = FObject["@in"]
-	pr = FObject["@print"]
+	gin = FO["@in"]
+	pr = FO["@print"]
 	gin.connect 0,pr,0
 	gin.send_in 0, "open grid file #{$imdir}/hello.txt"
 	gin.send_in 0, "headerless 13"
@@ -831,14 +811,14 @@ end
 
 
 def test_sound
-#	o2 = FObject["@ * 359"] # @ 439.775 Hz
-#	o1 = FObject["@for 0 44100 1"] # 1 sec @ 1.225 Hz ?
-	o1 = FObject["@for 0 4500 1"]
-	o2 = FObject["@ * 1600"] # @ 439.775 Hz
-	o3 = FObject["@ sin* 255"]
-	o4 = FObject["@ gamma 400"]
-	o5 = FObject["@ << 7"]
-	out = FObject["@out"]
+#	o2 = FO["@ * 359"] # @ 439.775 Hz
+#	o1 = FO["@for 0 44100 1"] # 1 sec @ 1.225 Hz ?
+	o1 = FO["@for 0 4500 1"]
+	o2 = FO["@ * 1600"] # @ 439.775 Hz
+	o3 = FO["@ sin* 255"]
+	o4 = FO["@ gamma 400"]
+	o5 = FO["@ << 7"]
+	out = FO["@out"]
 	o1.connect 0,o2,0
 	o2.connect 0,o3,0
 	o3.connect 0,o4,0
@@ -857,29 +837,29 @@ end
 
 include Math
 def test_polygon
-	o1 = FObject["@for 0 5 1"]
-	o2 = FObject["@ * 14400"]
-	o3 = FObject["@outer + {0 9000}"]
-	o4 = FObject["@ +"]
-	o5 = FObject["@ cos* 112"]
-	o6 = FObject["@ + {120 160}"]
-	poly = FObject["@draw_polygon + {3 uint8 # 255}"]
+	o1 = FO["@for 0 5 1"]
+	o2 = FO["@ * 14400"]
+	o3 = FO["@outer + {0 9000}"]
+	o4 = FO["@ +"]
+	o5 = FO["@ cos* 112"]
+	o6 = FO["@ + {120 160}"]
+	poly = FO["@draw_polygon + {3 uint8 # 255}"]
 if false
-	out1 = FObject["@cast int32"]
-	out2 = FObject["@solarize"]
-#	out1 = FObject["@downscale_by 2 smoothly"]
-	out3 = FObject["@out x11"]
+	out1 = FO["@cast int32"]
+	out2 = FO["@solarize"]
+#	out1 = FO["@downscale_by 2 smoothly"]
+	out3 = FO["@out x11"]
 	out1.connect 0,out2,0
 	out2.connect 0,out3,0
 else
-	out1 = FObject["@out x11"]
-	fps = FObject["fps detailed cpu"]
+	out1 = FO["@out x11"]
+	fps = FO["fps detailed cpu"]
 	out1.connect 0,fps,0
-	pr = FObject["rubyprint"]
+	pr = FO["rubyprint"]
 	fps.connect 0,pr,0
 end
-	store = FObject["@store"]; store.send_in 1, "240 320 3 uint8 # 0"
-#	store2 = FObject["@store"]
+	store = FO["@store"]; store.send_in 1, "240 320 3 uint8 # 0"
+#	store2 = FO["@store"]
 	store.connect 0,poly,0
 	poly.connect 0,store,1
 #	store2.connect 0,store,1
@@ -889,7 +869,7 @@ end
 	o4.connect 0,o5,0
 	o5.connect 0,o6,0
 	o6.connect 0,poly,2
-#	cast = FObject["@cast int32"]
+#	cast = FO["@cast int32"]
 #	poly.connect 0,cast,0
 #	cast.connect 0,out1,0
 	poly.connect 0,out1,0
@@ -910,7 +890,7 @@ end
 	$mainloop.loop
 end
 
-class FRoute2 < FObject
+class FRoute2 < FO
 	def initialize(selector)
 		@selector = selector.to_s
 	end
@@ -924,15 +904,15 @@ class FRoute2 < FObject
 end
 
 def test_aalib
-#	gin = FObject["@in ppm file #{$imdir}/r001.jpg"]
-	gin = FObject["@in ppm file #{$animdir}/b.jpg.cat"]
-	grey = FObject["@rgb_to_greyscale"]
-	cont = FObject["@ << 1"]
-	clip = FObject["@ min 255"]
-	gout = FObject["@out aalib X11"]
-	sto = FObject["@store"]
-	op = FObject["aa_fill_with_text {localhost 4242}"]
-	filt = FObject["route2 grid"]
+#	gin = FO["@in ppm file #{$imdir}/r001.jpg"]
+	gin = FO["@in ppm file #{$animdir}/b.jpg.cat"]
+	grey = FO["@rgb_to_greyscale"]
+	cont = FO["@ << 1"]
+	clip = FO["@ min 255"]
+	gout = FO["@out aalib X11"]
+	sto = FO["@store"]
+	op = FO["aa_fill_with_text {localhost 4242}"]
+	filt = FO["route2 grid"]
 	gin.connect 0,grey,0
 	grey.connect 0,cont,0
 	cont.connect 0,clip,0
@@ -956,14 +936,14 @@ end
 
 def test_store2
 	o = [
-		FObject["@for {0 0} {240 320} {1 1}"],
-		FObject["@ / 2"],
-		FObject["@ + 0"],
-		FObject["@ + 0"],
-		FObject["@store"],
-		FObject["@out x11"]]
+		FO["@for {0 0} {240 320} {1 1}"],
+		FO["@ / 2"],
+		FO["@ + 0"],
+		FO["@ + 0"],
+		FO["@store"],
+		FO["@out x11"]]
 	(0..4).each {|x| o[x].connect 0,o[x+1],0 }
-	q = FObject["@in ppm file images/r001.jpg"]
+	q = FO["@in ppm file images/r001.jpg"]
 	q.connect 0,o[4],1
 	q.send_in 0
 	o[0].send_in 0
@@ -971,12 +951,12 @@ def test_store2
 end
 
 def test_remap
-	rem = FObject["@remap_image"]
-	rot = FObject["@rotate 4000"]
+	rem = FO["@remap_image"]
+	rot = FO["@rotate 4000"]
 	rem.connect 1,rot,0
 	rot.connect 0,rem,1
-	gin = FObject["@in ppm file #{$imdir}/teapot.png"]
-	gout = FObject["@out x11"]
+	gin = FO["@in ppm file #{$imdir}/teapot.png"]
+	gout = FO["@out x11"]
 	gin.connect 0,rem,0
 	rem.connect 0,gout,0
 	gin.send_in 0
@@ -985,15 +965,15 @@ end
 
 def test_asm
 	GridFlow.verbose=false
-	a = FObject["@in ppm file images/r001.jpg"]
-	aa = FObject["@cast uint8"]
-	b = FObject["@store"]
-	d = FObject["@store"]
+	a = FO["@in ppm file images/r001.jpg"]
+	aa = FO["@cast uint8"]
+	b = FO["@store"]
+	d = FO["@store"]
 	a.connect 0,aa,0
 	aa.connect 0,b,1
 	aa.connect 0,d,1
 	a.send_in 0
-	c = FObject["@ + {uint8 # 0}"]
+	c = FO["@ + {uint8 # 0}"]
 	t0 = Time.new; 1000.times {b.send_in 0}; t1 = Time.new-t0
 	t1 *= 1
 	b.connect 0,c,0
@@ -1021,17 +1001,17 @@ def test_metro
 end
 
 def test_outer
-	o = FObject["@outer + {0}"]
+	o = FO["@outer + {0}"]
 	o.send_in 0, 25, 240, 320, 3, "#".intern, 42
-	g = FObject["@global"]
+	g = FO["@global"]
 	g.send_in 0, :profiler_dump
 end
 
 def test_jmax_to_pd filename
 	require "gridflow/extra/jmax_format.rb"
 	require "gridflow/extra/puredata_format.rb"
-	jfr = JMaxFileReader.new(File.open(filename),FObject)
-	FObject.broken_ok = true
+	jfr = JMaxFileReader.new(File.open(filename),FO)
+	FO.broken_ok = true
 	my_patcher = jfr.parse
 #	my_patcher.subobjects.each {|x,| x.trigger if LoadBang===x }
 #	$mainloop.loop
@@ -1045,7 +1025,7 @@ def test_jmax_to_pd filename
 end
 
 def test_error
-	x = FObject["@store"]
+	x = FO["@store"]
 	x.send_in 0
 end
 
@@ -1084,3 +1064,11 @@ end
 #test_sound
 #test_metro
 #$mainloop.loop
+
+=begin
+a = FO["@print"]
+a.send_in 0, "3 3 #{nt} # 1 0 0 0"
+a.send_in 0, "3 3 3 #{nt} # 1 2 3 4"
+a.send_in 0, "base 16"
+a.send_in 0, "3 3 3 #{nt} # 255 0 0 0"
+=end
diff --git a/externals/gridflow/bridge/placebo.rb b/externals/gridflow/bridge/placebo.rb
index 3d712d1d..b52e196e 100644
--- a/externals/gridflow/bridge/placebo.rb
+++ b/externals/gridflow/bridge/placebo.rb
@@ -1,5 +1,5 @@
 =begin
-	$Id: placebo.rb,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: placebo.rb,v 1.2 2006-03-15 04:38:20 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
@@ -23,7 +23,9 @@
 
 class Object
   def self.dummy(sel)
-    self.module_eval "def #{sel}(*args) GridFlow.post \"dummy #{sel}: %s\", args.inspect end"
+    self.module_eval "def #{sel}(*args)
+	#GridFlow.post \"dummy #{sel}: %s\", args.inspect
+    end"
   end
 end
 
@@ -36,6 +38,7 @@ module GridFlow
   class Clock
     def initialize(victim) @victim=victim end
     dummy :delay
+    dummy :unset
   end
   class Pointer
     dummy :initialize
diff --git a/externals/gridflow/bridge/puredata.c b/externals/gridflow/bridge/puredata.c
index dd6fd88f..1109b59c 100644
--- a/externals/gridflow/bridge/puredata.c
+++ b/externals/gridflow/bridge/puredata.c
@@ -1,5 +1,5 @@
 /*
-	$Id: puredata.c,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: puredata.c,v 1.2 2006-03-15 04:38:20 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
@@ -43,6 +43,9 @@ tries to call a Ruby method of the proper name.
 #include <unistd.h>
 #include "g_canvas.h"
 
+#define CObject_free CObject_freeee
+#define gfpost post
+
 /* **************************************************************** */
 struct BFObject;
 struct FMessage {
@@ -61,11 +64,11 @@ static const char *rb_sym_name(Ruby sym) {return rb_id2name(SYM2ID(sym));}
 
 static BuiltinSymbols *syms;
 
-void CObject_freeee (void *victim) {
+void CObject_free (void *victim) {
 	CObject *self = (CObject *)victim;
 	self->check_magic();
 	if (!self->rself) {
-		fprintf(stderr,"attempt to free object that has no rself\n");
+		L fprintf(stderr,"attempt to free object that has no rself\n");
 		abort();
 	}
 	self->rself = 0; /* paranoia */
@@ -81,7 +84,7 @@ static Ruby mPointer=0;
 \class Pointer < CObject
 struct Pointer : CObject {
 	void *p;
-	Pointer() { assert(!"DYING HORRIBLY"); }
+	Pointer() { assert(!"DYING HORRIBLY (GASP)"); }
 	Pointer(void *_p) : p(_p) {}
 	\decl Ruby ptr ();
 };
@@ -94,7 +97,10 @@ struct Pointer : CObject {
 );}
 \end class Pointer
 Ruby Pointer_s_new (void *ptr) {
-	return Data_Wrap_Struct(EVAL("GridFlow::Pointer"), 0, 0, new Pointer(ptr));
+	Pointer *self = new Pointer(ptr);
+	Ruby rself = Data_Wrap_Struct(EVAL("GridFlow::Pointer"), 0, CObject_free, self);
+	self->rself = rself;
+	return rself;
 }
 void *Pointer_get (Ruby rself) {
 	DGS(Pointer);
@@ -129,18 +135,13 @@ static int noutlets_of (Ruby qlass) {
 #endif
 extern "C" void Init_stack(VALUE *addr);
 static VALUE *localize_sysstack () {
-	long bp;
-	sscanf(RUBY_STACK_END,"0x%08lx",&bp);
-	//fprintf(stderr,"old RUBY_STACK_END = %08lx\n",bp);
+	long bp0,bp1;
+	sscanf(STACK_END,"0x%08lx",&bp0);
 	// HACK (2004.08.29: alx has a problem; i hope it doesn't get worse)
-	// this rounds to the last word of a 4k block
-	// cross fingers that no other OS does it too different
-	// !@#$ doesn't use STACK_GROW_DIRECTION
-	// bp=((bp+0xfff)&~0xfff)-sizeof(void*);
-	// GAAAH
-	bp=((bp+0xffff)&~0xffff)-sizeof(void*);
-	//fprintf(stderr,"new RUBY_STACK_END = %08lx\n",bp);
-	return (VALUE *)bp;
+	// this rounds to the last word of a 64k block (bug: doesn't use STACK_GROW_DIRECTION)
+	bp1=((bp0+0xffff)&~0xffff)-sizeof(void*);
+	fprintf(stderr,"STACK_END old=0x%08lx; new=0x%08lx\n",bp0,bp1);
+	return (VALUE *)bp1;
 }
 
 //****************************************************************
@@ -312,7 +313,7 @@ static void BFObject_delete_1 (FMessage *fm) {
 	if (fm->self->rself) {
 		rb_funcall(fm->self->rself,SI(delete),0);
 	} else {
-		post("BFObject_delete is NOT handling BROKEN object at %08x",(int)fm);
+		post("BFObject_delete is NOT handling BROKEN object at %*lx",2*sizeof(long),(long)fm);
 	}
 }
 
@@ -652,7 +653,7 @@ struct Clock : CObject {
 
 void Clock_fn (Ruby rself) { rb_funcall_myrescue(rself,SI(call),0); }
 void Clock_mark (Clock *self) { rb_gc_mark(self->owner); }
-void Clock_free (Clock *self) { clock_free(self->serf); CObject_freeee(self); }
+void Clock_free (Clock *self) { clock_free(self->serf); CObject_free(self); }
 
 Ruby Clock_s_new (Ruby qlass, Ruby owner) {
 	Clock *self = new Clock();
diff --git a/externals/gridflow/bridge/puredata.rb b/externals/gridflow/bridge/puredata.rb
index fffda1c2..184bb2a7 100644
--- a/externals/gridflow/bridge/puredata.rb
+++ b/externals/gridflow/bridge/puredata.rb
@@ -1,5 +1,5 @@
 =begin
-	$Id: puredata.rb,v 1.1 2005-10-04 02:02:13 matju Exp $
+	$Id: puredata.rb,v 1.2 2006-03-15 04:38:20 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002 by Mathieu Bouchard
diff --git a/externals/gridflow/bundled/pd/g_canvas.h b/externals/gridflow/bundled/pd/g_canvas.h
index 45bcd4a9..07fa75b5 100644
--- a/externals/gridflow/bundled/pd/g_canvas.h
+++ b/externals/gridflow/bundled/pd/g_canvas.h
@@ -1,3 +1,4 @@
+
 /* Copyright (c) 1997-1999 Miller Puckette.
 * For information on usage and redistribution, and for a DISCLAIMER OF ALL
 * WARRANTIES, see the file, "LICENSE.txt," in this distribution.  */
@@ -36,12 +37,17 @@ glist has its own window, even if miniaturized.
 /* NOTE: this file describes Pd implementation details which may change
 in future releases.  The public (stable) API is in m_pd.h. */  
 
+#ifndef __G_CANVAS_H
+#define __G_CANVAS_H
+#ifndef DESIRE
+
 #if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus)
 extern "C" {
 #endif
 
+
 /* --------------------- geometry ---------------------------- */
-#define IOWIDTH 7   	/* width of an inlet/outlet in pixels */
+#define IOWIDTH 7       /* width of an inlet/outlet in pixels */
 #define IOMIDDLE ((IOWIDTH-1)/2)
 #define GLIST_DEFGRAPHWIDTH 200
 #define GLIST_DEFGRAPHHEIGHT 140
@@ -50,17 +56,21 @@ extern "C" {
 typedef struct _updateheader
 {
     struct _updateheader *upd_next;
-    unsigned int upd_array:1;	    /* true if array, false if glist */
-    unsigned int upd_queued:1;	    /* true if we're queued */
+    unsigned int upd_array:1;       /* true if array, false if glist */
+    unsigned int upd_queued:1;      /* true if we're queued */
 } t_updateheader;
 
     /* types to support glists grabbing mouse motion or keys from parent */
 typedef void (*t_glistmotionfn)(void *z, t_floatarg dx, t_floatarg dy);
 typedef void (*t_glistkeyfn)(void *z, t_floatarg key);
+#endif /*DESIRE*/
+
 
 EXTERN_STRUCT _rtext;
 #define t_rtext struct _rtext
 
+#ifndef DESIRE
+
 EXTERN_STRUCT _gtemplate;
 #define t_gtemplate struct _gtemplate
 
@@ -73,6 +83,9 @@ EXTERN_STRUCT _tscalar;
 EXTERN_STRUCT _canvasenvironment;
 #define t_canvasenvironment struct _canvasenvironment 
 
+EXTERN_STRUCT _fielddesc;
+#define t_fielddesc struct _fielddesc
+
 typedef struct _selection
 {
     t_gobj *sel_what;
@@ -82,22 +95,22 @@ typedef struct _selection
     /* this structure is instantiated whenever a glist becomes visible. */
 typedef struct _editor
 {
-    t_updateheader e_upd;   	    /* update header structure */
-    t_selection *e_updlist; 	    /* list of objects to update */
-    t_rtext *e_rtext;	    	    /* text responder linked list */
-    t_selection *e_selection;  	    /* head of the selection list */
-    t_rtext *e_textedfor;   	    /* the rtext if any that we are editing */
-    t_gobj *e_grab;	    	    /* object being "dragged" */
+    t_updateheader e_upd;           /* update header structure */
+    t_selection *e_updlist;         /* list of objects to update */
+    t_rtext *e_rtext;               /* text responder linked list */
+    t_selection *e_selection;       /* head of the selection list */
+    t_rtext *e_textedfor;           /* the rtext if any that we are editing */
+    t_gobj *e_grab;                 /* object being "dragged" */
     t_glistmotionfn e_motionfn;     /* ... motion callback */
-    t_glistkeyfn e_keyfn;	    /* ... keypress callback */
-    t_binbuf *e_connectbuf;	    /* connections to deleted objects */
-    t_binbuf *e_deleted;    	    /* last stuff we deleted */
+    t_glistkeyfn e_keyfn;           /* ... keypress callback */
+    t_binbuf *e_connectbuf;         /* connections to deleted objects */
+    t_binbuf *e_deleted;            /* last stuff we deleted */
     t_guiconnect *e_guiconnect;     /* GUI connection for filtering messages */
-    struct _glist *e_glist;	    /* glist which owns this */
-    int e_xwas;   	    	    /* xpos on last mousedown or motion event */
-    int e_ywas;   	    	    /* ypos, similarly */
-    int e_selectline_index1;	    /* indices for the selected line if any */
-    int e_selectline_outno; 	    /* (only valid if e_selectedline is set) */
+    struct _glist *e_glist;         /* glist which owns this */
+    int e_xwas;                     /* xpos on last mousedown or motion event */
+    int e_ywas;                     /* ypos, similarly */
+    int e_selectline_index1;        /* indices for the selected line if any */
+    int e_selectline_outno;         /* (only valid if e_selectedline is set) */
     int e_selectline_index2;
     int e_selectline_inno;
     t_outconnect *e_selectline_tag;
@@ -107,12 +120,12 @@ typedef struct _editor
     unsigned int e_selectedline: 1; /* one if a line is selected */
 } t_editor;
 
-#define MA_NONE    0 	/* e_onmotion: do nothing on mouse motion */
-#define MA_MOVE    1	/* drag the selection around */
-#define MA_CONNECT 2	/* make a connection */
-#define MA_REGION  3	/* selection region */
-#define MA_PASSOUT 4	/* send on to e_grab */
-#define MA_DRAGTEXT 5	/* drag in text editor to alter selection */
+#define MA_NONE    0    /* e_onmotion: do nothing on mouse motion */
+#define MA_MOVE    1    /* drag the selection around */
+#define MA_CONNECT 2    /* make a connection */
+#define MA_REGION  3    /* selection region */
+#define MA_PASSOUT 4    /* send on to e_grab */
+#define MA_DRAGTEXT 5   /* drag in text editor to alter selection */
 
 /* editor structure for "garrays".  We don't bother to delete and regenerate
 this structure when the "garray" becomes invisible or visible, although we
@@ -120,17 +133,17 @@ could do so if the structure gets big (like the "editor" above.) */
     
 typedef struct _arrayvis
 {
-    t_updateheader av_upd;   	    /* update header structure */
-    t_garray *av_garray;    	    /* owning structure */    
+    t_updateheader av_upd;          /* update header structure */
+    t_garray *av_garray;            /* owning structure */    
 } t_arrayvis;
 
 /* the t_tick structure describes where to draw x and y "ticks" for a glist */
 
-typedef struct _tick	/* where to put ticks on x or y axes */
+typedef struct _tick    /* where to put ticks on x or y axes */
 {
-    float k_point;  	/* one point to draw a big tick at */
-    float k_inc;    	/* x or y increment per little tick */
-    int k_lperb;    	/* little ticks per big; 0 if no ticks to draw */
+    float k_point;      /* one point to draw a big tick at */
+    float k_inc;        /* x or y increment per little tick */
+    int k_lperb;        /* little ticks per big; 0 if no ticks to draw */
 } t_tick;
 
 /* the t_glist structure, which describes a list of elements that live on an
@@ -140,43 +153,45 @@ area of a window.
 
 struct _glist
 {  
-    t_object gl_obj; 	    	/* header in case we're a glist */
-    t_gobj *gl_list;	    	/* the actual data */
-    struct _gstub *gl_stub; 	/* safe pointer handler */
-    int gl_valid;   	    	/* incremented when pointers might be stale */
-    struct _glist *gl_owner;	/* parent glist, supercanvas, or 0 if none */
-    int gl_pixwidth;   	    	/* width in pixels (on parent, if a graph) */
+    t_object gl_obj;            /* header in case we're a glist */
+    t_gobj *gl_list;            /* the actual data */
+    struct _gstub *gl_stub;     /* safe pointer handler */
+    int gl_valid;               /* incremented when pointers might be stale */
+    struct _glist *gl_owner;    /* parent glist, supercanvas, or 0 if none */
+    int gl_pixwidth;            /* width in pixels (on parent, if a graph) */
     int gl_pixheight;
-    float gl_x1;    	    	/* bounding rectangle in our own coordinates */
+    float gl_x1;                /* bounding rectangle in our own coordinates */
     float gl_y1;
     float gl_x2;
     float gl_y2;
-    int gl_screenx1;	    	/* screen coordinates when toplevel */
+    int gl_screenx1;            /* screen coordinates when toplevel */
     int gl_screeny1;
     int gl_screenx2;
     int gl_screeny2;
-    t_tick gl_xtick; 	    	/* ticks marking X values */    
-    int gl_nxlabels;	    	/* number of X coordinate labels */
-    t_symbol **gl_xlabel;   	    /* ... an array to hold them */
-    float gl_xlabely;	    	    /* ... and their Y coordinates */
-    t_tick gl_ytick;	    	/* same as above for Y ticks and labels */
+    int gl_xmargin;                /* origin for GOP rectangle */
+    int gl_ymargin;
+    t_tick gl_xtick;            /* ticks marking X values */    
+    int gl_nxlabels;            /* number of X coordinate labels */
+    t_symbol **gl_xlabel;           /* ... an array to hold them */
+    float gl_xlabely;               /* ... and their Y coordinates */
+    t_tick gl_ytick;            /* same as above for Y ticks and labels */
     int gl_nylabels;
     t_symbol **gl_ylabel;
     float gl_ylabelx;
-    t_editor *gl_editor;    	/* editor structure when visible */
-    t_symbol *gl_name;	    	/* symbol bound here */
-    int gl_font;    	    	/* nominal font size in points, e.g., 10 */
-    struct _glist *gl_next; 	    /* link in list of toplevels */
+    t_editor *gl_editor;        /* editor structure when visible */
+    t_symbol *gl_name;          /* symbol bound here */
+    int gl_font;                /* nominal font size in points, e.g., 10 */
+    struct _glist *gl_next;         /* link in list of toplevels */
     t_canvasenvironment *gl_env;    /* root canvases and abstractions only */
     unsigned int gl_havewindow:1;   /* true if we own a window */
     unsigned int gl_mapped:1;       /* true if, moreover, it's "mapped" */
-    unsigned int gl_dirty:1; 	    /* (root canvas only:) patch has changed */
-    unsigned int gl_loading:1;	    /* am now loading from file */
-    unsigned int gl_willvis:1;	    /* make me visible after loading */ 
-    unsigned int gl_edit:1;  	    /* edit mode */
+    unsigned int gl_dirty:1;        /* (root canvas only:) patch has changed */
+    unsigned int gl_loading:1;      /* am now loading from file */
+    unsigned int gl_willvis:1;      /* make me visible after loading */ 
+    unsigned int gl_edit:1;         /* edit mode */
     unsigned int gl_isdeleting:1;   /* we're inside glist_delete -- hack! */
-    unsigned int gl_stretch:1;	    /* stretch contents on resize */
-    unsigned int gl_isgraph:1;	    /* show as graph on parent */
+    unsigned int gl_goprect:1;      /* draw rectangle for graph-on-parent */
+    unsigned int gl_isgraph:1;      /* show as graph on parent */
 };
 
 #define gl_gobj gl_obj.te_g
@@ -193,29 +208,40 @@ typedef struct _dataslot
 {
     int ds_type;
     t_symbol *ds_name;
-    t_symbol *ds_arraytemplate;	    /* filled in for arrays only */
+    t_symbol *ds_arraytemplate;     /* filled in for arrays only */
 } t_dataslot;
 
-
-/* T.Grill - changed t_pd member to t_pdobj to avoid name clashed */
 typedef struct _template
 {
-    t_pd t_pdobj;	    	/* header */
-    struct _gtemplate *t_list;	/* list of "struct"/gtemplate objects */
-    t_symbol *t_sym;	    	/* name */
-    int t_n;	    	    	/* number of dataslots (fields) */
-    t_dataslot *t_vec;	    	/* array of dataslots */
+    t_pd t_pdobj;               /* header */
+    struct _gtemplate *t_list;  /* list of "struct"/gtemplate objects */
+    t_symbol *t_sym;            /* name */
+    int t_n;                    /* number of dataslots (fields) */
+    t_dataslot *t_vec;          /* array of dataslots */
 } t_template;
 
 struct _array
 {
-    int a_n;	    	/* number of elements */
-    int a_elemsize; 	/* size in bytes; LATER get this from template */
-    char *a_vec;  	/* array of elements */
-    t_symbol *a_templatesym;	/* template for elements */
-    int a_valid;    	/* protection against stale pointers into array */
-    t_gpointer a_gp;	/* pointer to scalar or array element we're in */
-    t_gstub *a_stub;
+    int a_n;            /* number of elements */
+    int a_elemsize;     /* size in bytes; LATER get this from template */
+    char *a_vec;        /* array of elements */
+    t_symbol *a_templatesym;    /* template for elements */
+    int a_valid;        /* protection against stale pointers into array */
+    t_gpointer a_gp;    /* pointer to scalar or array element we're in */
+    t_gstub *a_stub;    /* stub for pointing into this array */
+};
+
+struct _garray
+{
+    t_gobj x_gobj;
+    t_scalar *x_scalar;     /* scalar "containing" the array */
+    t_glist *x_glist;       /* containing glist */
+    t_symbol *x_name;       /* unexpanded name (possibly with leading '$') */
+    t_symbol *x_realname;   /* expanded name (symbol we're bound to) */
+    char x_usedindsp;       /* true if some DSP routine is using this */
+    char x_saveit;          /* true if we should save this with parent */
+    char x_listviewing;     /* true if list view window is open */
+    double x_lastupdate;    /* T.Grill - clock_getlogicaltime() of last array update */
 };
 
     /* structure for traversing all the connections in a glist */
@@ -242,23 +268,23 @@ widgets.  We don't use Pd methods because Pd's typechecking can't specify the
 types of pointer arguments.  Also it's more convenient this way, since
 every "patchable" object can just get the "text" behaviors. */
 
-    	/* Call this to get a gobj's bounding rectangle in pixels */
+        /* Call this to get a gobj's bounding rectangle in pixels */
 typedef void (*t_getrectfn)(t_gobj *x, struct _glist *glist,
     int *x1, int *y1, int *x2, int *y2);
-    	/* and this to displace a gobj: */
+        /* and this to displace a gobj: */
 typedef void (*t_displacefn)(t_gobj *x, struct _glist *glist, int dx, int dy);
-    	/* change color to show selection: */
+        /* change color to show selection: */
 typedef void (*t_selectfn)(t_gobj *x, struct _glist *glist, int state);
-    	/* change appearance to show activation/deactivation: */
+        /* change appearance to show activation/deactivation: */
 typedef void (*t_activatefn)(t_gobj *x, struct _glist *glist, int state);
-    	/* warn a gobj it's about to be deleted */
+        /* warn a gobj it's about to be deleted */
 typedef void (*t_deletefn)(t_gobj *x, struct _glist *glist);
-    	/*  making visible or invisible */
+        /*  making visible or invisible */
 typedef void (*t_visfn)(t_gobj *x, struct _glist *glist, int flag);
-    	/* field a mouse click (when not in "edit" mode) */
+        /* field a mouse click (when not in "edit" mode) */
 typedef int (*t_clickfn)(t_gobj *x, struct _glist *glist,
     int xpix, int ypix, int shift, int alt, int dbl, int doit);
-    	/* ... and later, resizing; getting/setting font or color... */
+        /* ... and later, resizing; getting/setting font or color... */
 
 struct _widgetbehavior
 {
@@ -280,29 +306,30 @@ which really does draw the scalar on the parent window; see g_scalar.c. */
 /* note how the click function wants the whole scalar, not the "data", so
 doesn't work on array elements... LATER reconsider this */
 
-    	/* bounding rectangle: */
+        /* bounding rectangle: */
 typedef void (*t_parentgetrectfn)(t_gobj *x, struct _glist *glist,
     t_word *data, t_template *tmpl, float basex, float basey,
     int *x1, int *y1, int *x2, int *y2);
-    	/* displace it */
+        /* displace it */
 typedef void (*t_parentdisplacefn)(t_gobj *x, struct _glist *glist, 
     t_word *data, t_template *tmpl, float basex, float basey,
     int dx, int dy);
-    	/* change color to show selection */
+        /* change color to show selection */
 typedef void (*t_parentselectfn)(t_gobj *x, struct _glist *glist,
     t_word *data, t_template *tmpl, float basex, float basey,
     int state);
-    	/* change appearance to show activation/deactivation: */
+        /* change appearance to show activation/deactivation: */
 typedef void (*t_parentactivatefn)(t_gobj *x, struct _glist *glist,
     t_word *data, t_template *tmpl, float basex, float basey,
     int state);
-    	/*  making visible or invisible */
+        /*  making visible or invisible */
 typedef void (*t_parentvisfn)(t_gobj *x, struct _glist *glist,
     t_word *data, t_template *tmpl, float basex, float basey,
     int flag);
-    	/*  field a mouse click */
+        /*  field a mouse click */
 typedef int (*t_parentclickfn)(t_gobj *x, struct _glist *glist,
-    t_scalar *sc, t_template *tmpl, float basex, float basey,
+    t_word *data, t_template *tmpl, t_scalar *sc, t_array *ap,
+    float basex, float basey,
     int xpix, int ypix, int shift, int alt, int dbl, int doit);
 
 struct _parentwidgetbehavior
@@ -327,9 +354,13 @@ EXTERN void canvas_setcursor(t_glist *x, unsigned int cursornum);
 
 extern t_canvas *canvas_editing;    /* last canvas to start text edting */ 
 extern t_canvas *canvas_whichfind;  /* last canvas we did a find in */ 
-extern t_canvas *canvas_list;	    /* list of all root canvases */
+extern t_canvas *canvas_list;       /* list of all root canvases */
 extern t_class *vinlet_class, *voutlet_class;
-extern int glist_valid;     	/* incremented when pointers might be stale */
+extern int glist_valid;         /* incremented when pointers might be stale */
+
+#define PLOTSTYLE_POINTS 0     /* plotting styles for arrays */
+#define PLOTSTYLE_POLY 1
+#define PLOTSTYLE_BEZ 2
 
 /* ------------------- functions on any gobj ----------------------------- */
 EXTERN void gobj_getrect(t_gobj *x, t_glist *owner, int *x1, int *y1,
@@ -378,7 +409,6 @@ EXTERN float glist_ytopixels(t_glist *x, float yval);
 EXTERN float glist_dpixtodx(t_glist *x, float dxpix);
 EXTERN float glist_dpixtody(t_glist *x, float dypix);
 
-EXTERN void glist_redrawitem(t_glist *owner, t_gobj *gobj);
 EXTERN void glist_getnextxy(t_glist *gl, int *xval, int *yval);
 EXTERN void glist_glist(t_glist *g, t_symbol *s, int argc, t_atom *argv);
 EXTERN t_glist *glist_addglist(t_glist *g, t_symbol *sym,
@@ -407,8 +437,10 @@ EXTERN int text_ycoord(t_text *x, t_glist *glist);
 EXTERN int text_xpix(t_text *x, t_glist *glist);
 EXTERN int text_ypix(t_text *x, t_glist *glist);
 EXTERN int text_shouldvis(t_text *x, t_glist *glist);
+#endif /*DESIRE */
 
 /* -------------------- functions on rtexts ------------------------- */
+
 #define RTEXT_DOWN 1
 #define RTEXT_DRAG 2
 #define RTEXT_DBL 3
@@ -431,8 +463,10 @@ EXTERN int rtext_width(t_rtext *x);
 EXTERN int rtext_height(t_rtext *x);
 EXTERN char *rtext_gettag(t_rtext *x);
 EXTERN void rtext_gettext(t_rtext *x, char **buf, int *bufsize);
+EXTERN void rtext_getseltext(t_rtext *x, char **buf, int *bufsize);
 
 /* -------------------- functions on canvases ------------------------ */
+#ifndef DESIRE
 EXTERN t_class *canvas_class;
 
 EXTERN t_canvas *canvas_new(void *dummy, t_symbol *sel, int argc, t_atom *argv);
@@ -444,11 +478,12 @@ EXTERN void canvas_stowconnections(t_canvas *x);
 EXTERN void canvas_restoreconnections(t_canvas *x);
 EXTERN void canvas_redraw(t_canvas *x);
 
-EXTERN t_inlet *canvas_addinlet(t_canvas *x, t_pd *who, t_symbol *sym,t_symbol* s);
+EXTERN t_inlet *canvas_addinlet(t_canvas *x, t_pd *who, t_symbol *sym, t_symbol* h);
 EXTERN void canvas_rminlet(t_canvas *x, t_inlet *ip);
 EXTERN t_outlet *canvas_addoutlet(t_canvas *x, t_pd *who, t_symbol *sym);
 EXTERN void canvas_rmoutlet(t_canvas *x, t_outlet *op);
-EXTERN void canvas_redrawallfortemplate(t_canvas *tmpl);
+EXTERN void canvas_redrawallfortemplate(t_template *tmpl, int action);
+EXTERN void canvas_redrawallfortemplatecanvas(t_canvas *x, int action);
 EXTERN void canvas_zapallfortemplate(t_canvas *tmpl);
 EXTERN void canvas_setusedastemplate(t_canvas *x);
 EXTERN t_canvas *canvas_getcurrent(void);
@@ -480,17 +515,15 @@ EXTERN int canvas_hitbox(t_canvas *x, t_gobj *y, int xpos, int ypos,
 EXTERN int canvas_setdeleting(t_canvas *x, int flag);
 
 typedef void (*t_undofn)(t_canvas *canvas, void *buf,
-    int action);	/* a function that does UNDO/REDO */
-#define UNDO_FREE 0	    	    	/* free current undo/redo buffer */
-#define UNDO_UNDO 1 	    	    	/* undo */
-#define UNDO_REDO 2 	    	    	/* redo */
+    int action);        /* a function that does UNDO/REDO */
+#define UNDO_FREE 0                     /* free current undo/redo buffer */
+#define UNDO_UNDO 1                     /* undo */
+#define UNDO_REDO 2                     /* redo */
 EXTERN void canvas_setundo(t_canvas *x, t_undofn undofn, void *buf,
     const char *name);
 EXTERN void canvas_noundo(t_canvas *x);
 EXTERN int canvas_getindex(t_canvas *x, t_gobj *y);
 
-/* T.Grill - made public for dynamic object creation */
-/* in g_editor.c */
 EXTERN void canvas_connect(t_canvas *x,
     t_floatarg fwhoout, t_floatarg foutno,t_floatarg fwhoin, t_floatarg finno);
 EXTERN void canvas_disconnect(t_canvas *x,
@@ -513,14 +546,6 @@ EXTERN void linetraverser_start(t_linetraverser *t, t_canvas *x);
 EXTERN t_outconnect *linetraverser_next(t_linetraverser *t);
 EXTERN void linetraverser_skipobject(t_linetraverser *t);
 
-/* --------------------- functions on tscalars --------------------- */
-
-EXTERN void tscalar_getrect(t_tscalar *x, t_glist *owner,
-    int *xp1, int *yp1, int *xp2, int *yp2);
-EXTERN void tscalar_vis(t_tscalar *x, t_glist *owner, int flag);
-EXTERN int tscalar_click(t_tscalar *x, int xpix, int ypix, int shift,
-    int alt, int dbl, int doit);
-
 /* --------- functions on garrays (graphical arrays) -------------------- */
 
 EXTERN t_template *garray_template(t_garray *x);
@@ -529,7 +554,7 @@ EXTERN t_template *garray_template(t_garray *x);
 EXTERN t_garray *graph_array(t_glist *gl, t_symbol *s, t_symbol *tmpl,
     t_floatarg f, t_floatarg saveit);
 EXTERN t_array *array_new(t_symbol *templatesym, t_gpointer *parent);
-EXTERN void array_resize(t_array *x, t_template *tmpl, int n);
+EXTERN void array_resize(t_array *x, int n);
 EXTERN void array_free(t_array *x);
 
 /* --------------------- gpointers and stubs ---------------- */
@@ -543,22 +568,27 @@ EXTERN void word_restore(t_word *wp, t_template *tmpl,
     int argc, t_atom *argv);
 EXTERN t_scalar *scalar_new(t_glist *owner,
     t_symbol *templatesym);
+EXTERN void word_free(t_word *wp, t_template *tmpl);
 EXTERN void scalar_getbasexy(t_scalar *x, float *basex, float *basey);
+EXTERN void scalar_redraw(t_scalar *x, t_glist *glist);
 
 /* ------helper routines for "garrays" and "plots" -------------- */
-EXTERN int array_doclick(t_array *array, t_glist *glist, t_gobj *gobj,
+EXTERN int array_doclick(t_array *array, t_glist *glist, t_scalar *sc, t_array *ap,
     t_symbol *elemtemplatesym,
-    float linewidth, float xloc, float xinc, float yloc,
+    float linewidth, float xloc, float xinc, float yloc, float scalarvis,
+    t_fielddesc *xfield, t_fielddesc *yfield, t_fielddesc *wfield,
     int xpix, int ypix, int shift, int alt, int dbl, int doit);
 
 EXTERN void array_getcoordinate(t_glist *glist,
     char *elem, int xonset, int yonset, int wonset, int indx,
     float basex, float basey, float xinc,
+    t_fielddesc *xfielddesc, t_fielddesc *yfielddesc, t_fielddesc *wfielddesc,
     float *xp, float *yp, float *wp);
 
 EXTERN int array_getfields(t_symbol *elemtemplatesym,
     t_canvas **elemtemplatecanvasp,
     t_template **elemtemplatep, int *elemsizep,
+    t_fielddesc *xfielddesc, t_fielddesc *yfielddesc, t_fielddesc *wfielddesc, 
     int *xonsetp, int *yonsetp, int *wonsetp);
 
 /* --------------------- templates ------------------------- */
@@ -579,6 +609,8 @@ EXTERN void template_setsymbol(t_template *x, t_symbol *fieldname,
 EXTERN t_template *gtemplate_get(t_gtemplate *x);
 EXTERN t_template *template_findbyname(t_symbol *s);
 EXTERN t_canvas *template_findcanvas(t_template *tmpl);
+EXTERN void template_notify(t_template *tmpl,
+    t_symbol *s, int argc, t_atom *argv);
 
 EXTERN t_float template_getfloat(t_template *x, t_symbol *fieldname,
     t_word *wp, int loud);
@@ -588,6 +620,13 @@ EXTERN t_symbol *template_getsymbol(t_template *x, t_symbol *fieldname,
     t_word *wp, int loud);
 EXTERN void template_setsymbol(t_template *x, t_symbol *fieldname,
     t_word *wp, t_symbol *s, int loud);
+EXTERN t_float fielddesc_getcoord(t_fielddesc *f, t_template *tmpl,
+    t_word *wp, int loud);
+EXTERN void fielddesc_setcoord(t_fielddesc *f, t_template *tmpl,
+    t_word *wp, float pix, int loud);
+EXTERN t_float fielddesc_cvttocoord(t_fielddesc *f, float val);
+EXTERN float fielddesc_cvtfromcoord(t_fielddesc *f, float coord);
+
 
 /* ----------------------- guiconnects, g_guiconnect.c --------- */
 EXTERN t_guiconnect *guiconnect_new(t_pd *who, t_symbol *sym);
@@ -600,3 +639,7 @@ EXTERN t_symbol *iemgui_dollar2raute(t_symbol *s);
 #if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus)
 }
 #endif
+
+#endif /* DESIRE */
+#endif /* __G_CANVAS_H */
+
diff --git a/externals/gridflow/configure b/externals/gridflow/configure
index d9b19139..1cfed471 100755
--- a/externals/gridflow/configure
+++ b/externals/gridflow/configure
@@ -1,8 +1,8 @@
 #!/usr/bin/env ruby
-# $Id: configure,v 1.1 2005-10-04 02:12:43 matju Exp $
+# $Id: configure,v 1.2 2006-03-15 04:48:05 matju Exp $
 =begin
 	GridFlow
-	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -25,9 +25,17 @@ require "rbconfig"
 require "mkmf"
 require "ftools"
 include Config
+OSX = !!( CONFIG["arch"] =~ /darwin/ )
+
 require "win32/process" if CONFIG["arch"] =~ /mingw/
 LOG = File.open "./config.log", "w"
 
+Red   = "\e[0;1;31m"
+Green = "\e[0;1;32m"
+Light = "\e[0m"
+Dark  = "\e[0;1;30m"
+Yellow = "\e[0;1;33;44m"
+
 $verbose=false
 LOG.puts "-"*64
 LOG.puts "Environment Variables: "
@@ -72,10 +80,12 @@ $conf={
 	:FEATURES => {},
 	:OPTIONS => [],
 	:DEFINES => {
-		:RUBY_PREFIX => CONFIG['prefix'],
+#		:RUBY_PREFIX => CONFIG['prefix'],
+		:RUBY_PREFIX => nil,
 		:PREFIX => "/usr/local",
 		:CPU => nil,
 		:RUBY_ARCH => CONFIG['arch'],
+		:GEM_SOURCE => "../Gem/src",
 	},
 	:CC => "g++",
 	:OBJS => [],
@@ -198,34 +208,45 @@ def read_ld_so_conf
 	x
 end
 
+def epath x; (ENV[x]||"").split(":") end
+
 $C_INCLUDE_PATH = (
-	(ENV["CPLUS_INCLUDE_PATH"]||"").split(":") +
-	(ENV["C_INCLUDE_PATH"]||"").split(":") +
+	epath("CPLUS_INCLUDE_PATH") +
+	epath("C_INCLUDE_PATH") +
 	["/usr/include"]).uniq
 
 $LIBRARY_PATH = (
-	(ENV["LIBRARY_PATH"]||"").split(":") +
+	epath("LIBRARY_PATH") +
 	["/usr/lib","/lib"]).uniq
 
 $LD_LIBRARY_PATH = (
-	(ENV["LD_LIBRARY_PATH"]||"").split(":") +
-		read_ld_so_conf +
-		["/usr/lib","/lib"]).uniq
+	epath("LD_LIBRARY_PATH") +
+	read_ld_so_conf +
+	["/usr/lib","/lib"]).uniq
+$LIBX11DIR = ["-L/usr/X11R6/lib"]
+$LIBX11 = ["-L/usr/X11R6/lib","-lX11"]
 
 # making it easier for everybody I hope:
-["/Applications/Pd.app/Contents/Resources","/sw","/usr/local",ENV["home"]].each do|base|
-	if not $LD_LIBRARY_PATH.include? "#{base}/lib" and
-	   not $LIBRARY_PATH.include? "#{base}/lib" then
-		$conf[:LDSOFLAGS].unshift "-L#{base}/lib"
-		$LD_LIBRARY_PATH.unshift "#{base}/lib"
-		$LIBRARY_PATH.unshift "#{base}/lib"
+def prepend_path base
+	bl = base+"/lib"
+	bi = base+"/include"
+	if not $LD_LIBRARY_PATH.include? bl and
+	   not $LIBRARY_PATH.include? bl then
+		$conf[:LDSOFLAGS].unshift "-L"+bl
+		$LD_LIBRARY_PATH.unshift bl
+		$LIBRARY_PATH.unshift bl
 	end
-	#and not $CPLUS_INCLUDE_PATH.include? "#{base}/include"
-	if not $C_INCLUDE_PATH.include? "#{base}/include" then
-		$CFLAGS += " -I#{base}/include"
-		$C_INCLUDE_PATH.unshift "#{base}/include"
+	#and not $CPLUS_INCLUDE_PATH.include? bi
+	if not $C_INCLUDE_PATH.include? bi then
+		$CFLAGS += " -I"+bi
+		$C_INCLUDE_PATH.unshift bi
 	end
 end
+prepend_path "/Applications/Pd.app/Contents/Resources" if OSX
+prepend_path "/sw" if OSX
+prepend_path "/usr/local"
+prepend_path ENV["HOME"]
+# prepend_path "."
 
 for var in [:$C_INCLUDE_PATH, :$LIBRARY_PATH, :$LD_LIBRARY_PATH] do
 	LOG.puts "#{var}: #{eval(var.to_s).inspect}"
@@ -261,6 +282,10 @@ FILES = [
   [:directory, "format/",
     [:ruby, "main.rb"],
   ],
+  [:directory, "optional/",
+    [:ruby, "usb.rb"],
+    [:ruby, "lti.rb"],
+  ],
   [:directory, "extra/",
 	[:ruby, "smpte.rb"],
 	[:ruby, "server_2.rb"],
@@ -273,13 +298,10 @@ FILES = [
 
 #----------------------------------------------------------------#
 Feature.add {
-	tag :fast
-	name "Compile for speed (and not debuggability)"
-}
-Feature.add {
 	tag :gcc3
 	name "GNU C++ Compiler 3"
 	options ["HAVE_GCC3"]
+=begin
 	test proc {
 		pi=File.popen "#{$conf[:CC]} -v 2>&1", "r"
 		vline = pi.readlines.find {|l| /gcc version ([\d\.]+)/.match l }
@@ -288,6 +310,20 @@ Feature.add {
 		if version < "3" then raise "version #{version} < 3" end
 		true
 	}
+=end
+	test proc {
+		c_test %{
+		#include <stdio.h>
+		int main () {
+			printf("GCC_VERSION %d.%d.%d\\n", __GNUC__, __GNUC_MINOR__, __GNUC_PATCHLEVEL__);
+			return !(__GNUC__>=3);
+		}}
+	}
+	defines :GCC_VERSION => proc {
+		m = /GCC_VERSION\s+(.*)/.match(File.popen("tmp/#{$$}","r"){|f| f.read })
+		m[1]
+	}
+
 }
 Feature.add {
 	tag :stl
@@ -309,7 +345,7 @@ Feature.add {
 		#include <stdio.h>
 		#include <stdlib.h>
 		#include <cstddef>
-		#define T(a) printf("%s:%d; ",#a,sizeof(a));
+		#define T(a) printf("%s:%ld; ",#a,(long)sizeof(a));
 		int main () {
 			T(void *)T(ptrdiff_t)T(off_t)T(size_t)puts("");
 			T(char)T(short)T(int)T(long)T(long long)puts("");
@@ -321,13 +357,69 @@ Feature.add {
 
 #----------------------------------------------------------------#
 
-$stack_end_test = %{
+Feature.add {
+	tag :libc_stack_end
+	name "Stack end defined by LibC"
+	status :disabled
+	test proc { c_test '
+	#include <stdio.h>
+	extern void *__libc_stack_end;
+	int main () {
+		printf("#define STACK_END 0x%0*lx",sizeof(long)*2,__libc_stack_end);
+		return 0;
+	}
+	', uses_bridge_so }
+	defines :HAVE_LIBC_STACK_END
+	defines :STACK_END => proc {
+		m = /STACK_END\s+(.*)/.match(File.popen("tmp/#{$$}","r"){|f| f.read })
+		m[1]
+	}
+}
+Feature.add {
+	tag :segv_stack_end
+	name "Stack end probed"
+	test proc { c_test %`
+		/* the segfault trick (by Mathieu Bouchard) */
+		#ifndef STACK_GROW_DIRECTION
+		#define STACK_GROW_DIRECTION -1
+		#endif
+		#include <stdio.h>
+		#include <signal.h>
+		#include <setjmp.h>
+		static volatile long bogus = 0; // to force *bp to be read in memory
+		static sigjmp_buf rescue_segfault;
+		static void trap_segfault (int patate) { siglongjmp(rescue_segfault,11); }
+		int main () {
+		// get any stack address
+		volatile long * volatile bp = (volatile long *)&bp;
+		void (*oldsegv)(int) = signal(SIGSEGV,trap_segfault);
+		void (*oldbus)(int)  = signal(SIGBUS, trap_segfault);
+		if (!sigsetjmp(rescue_segfault,0)) for (;;bp-=STACK_GROW_DIRECTION) bogus += *bp;
+		printf("#define STACK_END 0x%0*lx\\n",sizeof(long)*2,(long)(bp+STACK_GROW_DIRECTION));
+		return 0;
+	}
+	`, uses_bridge_so }
+	defines :HAVE_LIBC_STACK_END
+	defines :STACK_END => proc {
+		m = /STACK_END\s+(.*)/.match(File.popen("tmp/#{$$}","r"){|f| f.read })
+		m[1]
+	}
+}
+Feature.add {
+	tag :wild_stack_end
+	name "Stack end wild guess"
+	unless_feature [:libc_stack_end,:segv_stack_end]
+	test proc { c_test '
 	#include <stdio.h>
-	#include <ruby.h>
 	int main () {
 		void *bp;
-		printf("#define RUBY_STACK_END 0x%08lx",(long)&bp);
-		return rb_rescue==0;
+		printf("#define STACK_END 0x%0*lx",sizeof(long)*2,(long)&bp);
+		return 0;
+	}
+	', uses_bridge_so }
+	defines :STACK_END => proc {
+		m = /STACK_END\s+(.*)/.match(File.popen("tmp/#{$$}","r"){|f| f.read })
+		m[1]
 	}
 }
 Feature.add {
@@ -335,11 +427,8 @@ Feature.add {
 	name "Ruby as a dynamic library"
 	uses_bridge_so ["-lruby"]
 	#uses_h ["ruby.h"] # is in special directory
-	defines :RUBY_STACK_END => proc {
-		m = /RUBY_STACK_END\s+(.*)/.match(File.popen("tmp/#{$$}","r"){|f| f.read })
-		m[1]
-	}
-	test proc { c_test $stack_end_test, uses_bridge_so }
+	test proc { c_test "#include <ruby.h>
+		int main () { return rb_rescue==0; }", uses_bridge_so }
 }
 Feature.add {
 	tag :librubystatic
@@ -348,16 +437,12 @@ Feature.add {
 	#uses_h ["ruby.h"] # is in special directory
 	uses_bridge_so {
 		lib = " #{$LIBRUBY_A} #{CONFIG['LIBS']} "
-		unless CONFIG["arch"] =~ /darwin/
-			lib = "-Wl,--whole-archive"+lib+"-Wl,--no-whole-archive"
-		end
+			lib = "-Wl,--whole-archive"+lib+"-Wl,--no-whole-archive" unless OSX
 		[lib]
 	}
-	defines :RUBY_STACK_END => proc {
-		m = /RUBY_STACK_END\s+(.*)/.match(File.popen("tmp/#{$$}","r"){|f| f.read })
-		m[1]
-	}
-	test proc { c_test $stack_end_test, ["-xnone", $LIBRUBY_A, *(CONFIG['LIBS'].split)] }
+	test proc { c_test "#include <ruby.h>
+		int main () { return rb_rescue==0; }",
+		["-xnone", $LIBRUBY_A, *(CONFIG['LIBS'].split)] }
 	options ["HAVE_STATIC_RUBY"] #!@#$ useless?
 }
 #----------------------------------------------------------------#
@@ -366,7 +451,7 @@ Feature.add {
 	name "Pentium-compatible CPU"
 	action proc { $conf[:DEFINES][:CPU] ||= "pentium" }
 	test proc {
-		(CONFIG["arch"] =~ /i\d86/) or raise "#{CONFIG["arch"]} instead"
+		(CONFIG["arch"] =~ /(i\d86|x86_64)/) or raise "#{CONFIG["arch"]} instead"
 		c_test '
 		#include <stdio.h>
 		char get_cpuid[]={
@@ -468,7 +553,7 @@ Feature.add {
 Feature.add {
 	tag :x11
 	name "X11 Display Protocol"
-	uses_so ["-L/usr/X11R6/lib","-lX11","-lXext"]
+	uses_so $LIBX11
 	uses_h ["X11/Xlib.h"]
 	test proc {
 		c_test "
@@ -480,9 +565,9 @@ Feature.add {
 }
 Feature.add {
 	tag :x11_shm
-	name "X11 acceleration through shared memory"
+	name "X11 acceleration by shared memory (XSHM plugin)"
 	uses_feature [:x11]
-	uses_so ["-L/usr/X11R6/lib","-lX11","-lXext"]
+	uses_so $LIBX11+["-lXext"]
 	uses_h ["X11/Xlib.h","sys/shm.h","X11/extensions/XShm.h"]
 	test proc {
 		c_test "
@@ -495,13 +580,26 @@ Feature.add {
 	}
 	options ["HAVE_X11_SHARED_MEMORY"]
 }
-=begin
+Feature.add {
+	tag :x11_xv
+	status :disabled
+	name "X11 acceleration (XVIDEO plugin)"
+	uses_feature [:x11]
+	uses_so $LIBX11+["-lXext","-lXv"]
+	uses_h ["X11/Xlib.h","X11/extensions/Xv.h"]
+	test proc {
+		c_test "
+		#include#
+		int main () {return 0;}
+		"
+	}
+	options ["HAVE_X11_XVIDEO"]
+}
 Feature.add {
 	tag :opengl
 	name "OpenGL (only as framebuffer)"
-	status :disabled
-	uses_so ["-L/usr/X11R6/lib","-lglut","-lGL","-lGLU"]
-	uses_h ["GL/glut.h"]
+	uses_so $LIBX11DIR+["-lglut","-lGL","-lGLU"]
+	uses_h ["GL/gl.h","GL/glu.h","GL/glut.h"]
 	test proc {
 		c_test "
 		#include#
@@ -510,13 +608,12 @@ Feature.add {
 	}
 	uses_o ["format/opengl.o"]
 }
-=end
 Feature.add {
 	tag :sdl
 	name "Simple Directmedia Layer (experimental support)"
 	uses_so {
 		a=["-lSDL","-lpthread"]
-		a<<"-lobjc" if CONFIG["arch"] =~ /darwin/
+		a<<"-lobjc" if OSX
 		a
 	}
 	uses_h ["SDL/SDL.h"]
@@ -607,6 +704,7 @@ Feature.add {
 	}
 	uses_o ["format/png.o"]
 }
+#------------------------------------------------#
 Feature.add {
 	tag :videodev
 	name "Video4linux Digitizer Driver Interface"
@@ -622,8 +720,7 @@ Feature.add {
 Feature.add {
 	tag :mpeg3
 	name "HeroineWarrior LibMPEG3"
-	uses_so ["-lmpeg3","-lpthread","-lm",
-		"-L/usr/X11R6/lib"]
+	uses_so $LIBX11DIR+["-lmpeg3","-lpthread","-lm"]
 	uses_h Or["libmpeg3/libmpeg3.h","libmpeg3.h"]
 	test proc {|f|
 		f.c_test "
@@ -649,11 +746,14 @@ Feature.add {
 Feature.add {
 	tag :quicktimehw
 	unless_feature :quicktimeapple
-	name "HeroineWarrior QuickTime4Linux (or LibQuickTime)"
+	name "Plaum's LibQuickTime"
 	uses_so Or[
 		["-lquicktime","-lpthread","-lpng","-ldl","-lglib","-lz"],
 		["-lquicktime","-lpthread","-lpng","-ldl","-lglib-1.2","-lz"]]
-	uses_h ["quicktime/quicktime.h","quicktime/lqt_version.h"]
+	f = ["quicktime.h","colormodels.h","lqt.h","lqt_version.h","lqt_codecinfo.h"]
+	uses_h Or[
+		f.map{|x| "quicktime/"+x },
+		f.map{|x| "lqt/"+x }]
 	test proc {|f|
 		f.c_test %`
 		#include <stdio.h>
@@ -727,18 +827,38 @@ Feature.add {
 		`
 	}
 }
+#--------------------------------#
+Feature.add {
+	tag :gem
+	name "PureData GEM (source code)"
+#	uses_h [$conf[:DEFINES][:GEM_SOURCE]+"/src/Base/GemBase.h"]
+	uses_feature [:puredata]
+	uses_o ["optional/gem.o"]
+	test proc {
+		# hack
+		$C_INCLUDE_PATH.unshift $conf[:DEFINES][ :GEM_SOURCE]
+		$CFLAGS += " -I"+$conf[:DEFINES][ :GEM_SOURCE]
+		c_test %`
+			#include "Base/GemBase.h"
+			int main () {
+				return 0;
+			}
+		`
+	}
+}
+#--------------------------------#
 
 $features_h = {}
 $features.each {|f| $features_h[f.tag]=f }
 
-#--------------------------------#
 
 def usage
 	log = ""
 	log << "usage: ./configure "
 	log << "[--use-compiler compiler] [--use-compiler-option option]* "
 	log << "[--use-cpu cpu] [--lite] [--debug] [--debug-harder]"
-	log << "[--ruby-prefix directory] "
+	log << "[--ruby-prefix directory] [--gem-source directory]"
+	# [--puredata-prefix directory] "
 	$features_h.keys.map {|k| k.to_s }.sort.each {|k| log << "[--no-#{k}] " }
 	$features_h.keys.map {|k| k.to_s }.sort.each {|k| log << "[--force-#{k}] " }
 	puts
@@ -778,8 +898,11 @@ while ARGV.length>0 do
 		puts "Lite Mode (no float, no int64)"
 		$conf[:OPTIONS].push :HAVE_LITE
 	when "--help"; usage; exit 0
-	when "--prefix", "--ruby-prefix"
-		$conf[:DEFINES][:RUBY_PREFIX]=ARGV.shift
+
+	when "--prefix", "--ruby-prefix"       : $conf[:DEFINES][:RUBY_PREFIX]=ARGV.shift
+	when "--pd-prefix", "--puredata-prefix": $conf[:DEFINES][  :PD_PREFIX]=ARGV.shift
+	when "--gem-source"                    : $conf[:DEFINES][ :GEM_SOURCE]=ARGV.shift
+
 	when "--use-compiler"
 		$conf[:CC] = ARGV.shift
 	when "--use-compiler-option"
@@ -789,7 +912,7 @@ while ARGV.length>0 do
 	when "--verbose"
 		$verbose=true
 	when "--bindir"
-		$conv[:BINDIR] = ARGV.shift
+		$conf[:BINDIR] = ARGV.shift
 	else puts "unknown option \"#{arg}\""; usage; exit 1
 	end
 end
@@ -798,8 +921,7 @@ end
 CONFIG["ruby_version"] ||= "$(MAJOR).$(MINOR)"
 CONFIG["rubylibdir"] ||= "$(libdir)/ruby/$(ruby_version)"
 CONFIG["archdir"] ||= CONFIG["rubylibdir"] + "/" + CONFIG["arch"]
-
-$CFLAGS += " -I " + (make_expand CONFIG["archdir"])
+$CFLAGS += " -I" + (make_expand CONFIG["archdir"])
 
 #--------------------------------#
 
@@ -815,6 +937,7 @@ DUAL.instance_eval {
 }
 
 def try feature
+
 	if Or===feature.uses_so
 		k=1
 		feature.uses_so.a.each {|i|
@@ -826,28 +949,31 @@ def try feature
 	end
 	if Or===feature.uses_h
 		feature.uses_h.a.each {|i|
-			e=feature.dup; e.uses_h i; e.name(e.name+" <#{e.uses_h}>")
+			e=feature.dup; e.uses_h i; e.name(e.name+" <#{i.to_a[0]}>")
 			r=try e; return r if r
 		}
 		return false
 	end
 	LOG.puts "", "-"*64
-	DUAL.print "[#{feature.tag}] #{feature.name}: "
+	line = "[#{feature.tag}] #{feature.name}: "
+	DUAL.print Light + "[#{Yellow}#{feature.tag}#{Light}] #{feature.name}: "
+	arrow = "-"*([78-line.length,0].max)+ "> "
+	#DUAL.print Dark + arrow +Red
 	(feature.uses_feature||[]).find {|f|
 		if not (
 		  if Or===f then f.a.find {|x| $conf[:FEATURES][x] } else $conf[:FEATURES][f] end
 		) then 
-			DUAL.puts "disabled (would need #{f})"
+			DUAL.puts Red+arrow+"disabled (would need #{f})"
 			return
 		end
 	}
-	if feature.status==:disabled then DUAL.puts "disabled (by author)"; return end
-	if not $features_h[feature.tag] then DUAL.puts "disabled (by user)"; return end
+	if feature.status==:disabled then DUAL.puts Dark+arrow+"disabled (by author)"; return end
+	if not $features_h[feature.tag] then DUAL.puts Dark+arrow+"disabled (by user)"; return end
 	fu = feature.unless_feature || []
 	fu = [fu] if not Array===fu
 	for f in fu || [] do
 		if $conf[:FEATURES][f] then
-			DUAL.puts "disabled (using #{f} instead)"
+			DUAL.puts Dark+arrow+"disabled (using #{f} instead)"
 			return
 		end
 	end
@@ -858,7 +984,7 @@ def try feature
 		rescue StandardError => e
 		end
 		if tresult
-			DUAL.puts "found "+(if tresult!=true
+			DUAL.puts Green+arrow+"found "+(if tresult!=true
 				then " (#{tresult})"
 				else "" end)
 			if tresult == "static"
@@ -870,7 +996,7 @@ def try feature
 				} if feature.uses_bridge_so
 			end
 		else
-			DUAL.puts "missing "+(if e
+			DUAL.puts Red+arrow+"missing "+(if e
 				then (if $verbose
 					then "(#{e} @ #{e.backtrace.join', '})"
 					else "(#{e})" end)
@@ -882,7 +1008,7 @@ def try feature
 			return false
 		end
 	else
-		puts "enabled"
+		puts Green+arrow+"enabled"
 		$conf[:FEATURES][feature.tag] = feature
 		feature.action.call if feature.action
 	end
@@ -898,7 +1024,7 @@ def try feature
 	true
 end
 
-DUAL.puts "This is the GridFlow 0.8.0 configurator within Ruby version #{RUBY_VERSION}"
+DUAL.puts "This is the GridFlow 0.8.1 configurator within Ruby version #{RUBY_VERSION}"
 
 begin
   $features.each {|feature| try feature }
@@ -907,10 +1033,12 @@ ensure
   system "/bin/rm -f tmp/#{$$} tmp/#{$$}.c tmp/#{$$}.o tmp/#{$$}.asm"
 end
 
+puts Light
+
 $conf[:LDSOFLAGS].uniq!
 $conf[:BRIDGE_LDFLAGS].uniq!
 
-$CFLAGS += " -falign-functions=4" if $conf[:FEATURES][:gcc3]
+$CFLAGS += " -falign-functions=16" if $conf[:FEATURES][:gcc3]
 
 #if not $conf[:FEATURES][:gcc3]
 #  puts "You should install gcc 3.x; gcc 2.9.x is no longer supported"
@@ -975,17 +1103,18 @@ RUBYARCH=#{CONFIG['arch']}
 
 f.puts "BRIDGE_LDFLAGS = " + $conf[:BRIDGE_LDFLAGS].flatten.join(" ") + " " + $LDFLAGS
 
-if CONFIG["arch"] =~ /darwin/ then
+if OSX then
 	f.puts "BRIDGE_LDFLAGS += -bundle -flat_namespace"
 else
 	f.puts "BRIDGE_LDFLAGS += -rdynamic -shared"
 end
-$CFLAGS +=  " -mcpu=$(CPU)" if $conf[:DEFINES][:CPU]
+$CFLAGS += " -mtune=$(CPU)" if $conf[:DEFINES][:CPU]
 $CFLAGS += " -march=$(CPU)" if $conf[:DEFINES][:CPU]
 #$CFLAGS += " -fforce-addr"
 #$CFLAGS += " -fprefetch-loop-arrays"
 #$CFLAGS += " -falign-jumps=4"
 #$CFLAGS += " -falign-loops=4"
+$CFLAGS += " -DMACOSX" if OSX
 f.puts "CFLAGS += " + $CFLAGS
 
 for k   in $conf[:OPTIONS] do f.puts "#{k}=yes" end
@@ -1023,13 +1152,19 @@ f.puts "#define STARTUP_LIST(PRE) \\"
 f.puts $conf[:OBJS].map {|o| "PRE startup_#{File.basename(o,'.o')}();" }.join("\\\n")
 for k   in $conf[:OPTIONS] do f.puts "\#define #{k}" end
 for k,v in $conf[:DEFINES] do f.puts "\#define #{k} "+v.inspect end
-if $conf[:FEATURES][:mpeg3]
-f.puts "
-\#ifdef LIBMPEG_INCLUDE_HERE
-\#include <#{$conf[:FEATURES][:mpeg3].uses_h}>
-\#endif
-"
+
+def include_here(f,a,b)
+  return unless $conf[:FEATURES][b]
+  f.puts "\#ifdef #{a}_INCLUDE_HERE"
+  for inc in $conf[:FEATURES][b].uses_h.to_a do
+    f.puts "\#include <#{inc}>"
+  end
+  f.puts "\#endif"
 end
+
+include_here f,"LIBMPEG", :mpeg3
+include_here f,"QUICKTIMEHW",:quicktimehw
+
 f.puts "
 \#define RUBY_BINDIR #{make_expand(CONFIG['bindir']).inspect}
 \#endif /* __CONFIG_H */"
@@ -1089,7 +1224,13 @@ mf.sub! /^(OBJS = .*)$/, "\\1 #{$conf[:OBJS].join' '}"
 mf[0,0] = "COMMON_DEPS = config.make Makefile Makefile.gf base/source_filter.rb\n"+
 	"gfbindir = #{$conf[:BINDIR]}\n"
 mf.sub!(/^site-install:\s*install/,"site-install: ")
-mf.sub! /^prefix = .*$/, "prefix = " + make_expand($conf[:DEFINES][:RUBY_PREFIX])
+
+rp=$conf[:DEFINES][:RUBY_PREFIX]
+if rp
+  mf.sub! /^prefix\s*=.*$/,   "prefix = " + make_expand(rp)
+  mf.sub! /^sitedir\s*=.*$/, "sitedir = " + make_expand(rp)
+end
+
 mf.sub! /^LDSHARED = g?cc/, "LDSHARED = $(CXX)"
 # Adam Lindsay's Mac attempts.
 mf.sub! /-no-precomp/, "-no-cpp-precomp"
diff --git a/externals/gridflow/doc/architecture.html b/externals/gridflow/doc/architecture.html
index 3009be34..009464a1 100644
--- a/externals/gridflow/doc/architecture.html
+++ b/externals/gridflow/doc/architecture.html
@@ -1,6 +1,6 @@
 <html><head>
-<!-- $Id: architecture.html,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
-<title>GridFlow 0.8.0 - Reference Manual: Architecture</title>
+<!-- $Id: architecture.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
+<title>GridFlow 0.8.1 - Reference Manual: Architecture</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" href="gridflow.css" type="text/css">
 </head>
@@ -14,7 +14,7 @@
 <tr><td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4" height="16"> 
-    <h4>GridFlow 0.8.0 - Reference Manual: Architecture</h4>
+    <h4>GridFlow 0.8.1 - Reference Manual: Architecture</h4>
 </td></tr>
 <tr> 
   <td width="5%"  rowspan="2">&nbsp;</td>
@@ -208,9 +208,9 @@ with the main part. </p></td></tr>
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4"> 
 <p><font size="-1">
-GridFlow 0.8.0 Documentation<br>
-Copyright &copy; 2001,2002,2003,2004,2005 by Mathieu Bouchard
-<a href="mailto:matju@sympatico.ca">matju@artengine.ca</a>
+GridFlow 0.8.1 Documentation<br>
+Copyright &copy; 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
+<a href="mailto:matju@artengine.ca">matju@artengine.ca</a>
 </font></p>
 </td></tr></table></body></html>
 
diff --git a/externals/gridflow/doc/architecture.xml b/externals/gridflow/doc/architecture.xml
index ec0c5a14..bf87474e 100644
--- a/externals/gridflow/doc/architecture.xml
+++ b/externals/gridflow/doc/architecture.xml
@@ -1,7 +1,7 @@
 <?xml version="1.0" standalone="no" ?>
 <!DOCTYPE documentation SYSTEM 'jmax.dtd'>
 <documentation title="Reference Manual: Architecture">
-<!-- $Id: architecture.xml,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
+<!-- $Id: architecture.xml,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
 	GridFlow Reference Manual: Architecture
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/doc/flow_classes/@complex_sq-icon.png b/externals/gridflow/doc/flow_classes/@complex_sq-icon.png
new file mode 100644
index 00000000..7c9dd8d5
--- /dev/null
+++ b/externals/gridflow/doc/flow_classes/@complex_sq-icon.png
diff --git a/externals/gridflow/doc/flow_classes/@join-icon.png b/externals/gridflow/doc/flow_classes/@join-icon.png
new file mode 100644
index 00000000..461f626e
--- /dev/null
+++ b/externals/gridflow/doc/flow_classes/@join-icon.png
diff --git a/externals/gridflow/doc/flow_classes/demux-icon.png b/externals/gridflow/doc/flow_classes/demux-icon.png
new file mode 100644
index 00000000..d3937142
--- /dev/null
+++ b/externals/gridflow/doc/flow_classes/demux-icon.png
diff --git a/externals/gridflow/doc/flow_classes/inv*-icon.png b/externals/gridflow/doc/flow_classes/inv*-icon.png
new file mode 100644
index 00000000..d887f1ba
--- /dev/null
+++ b/externals/gridflow/doc/flow_classes/inv*-icon.png
diff --git a/externals/gridflow/doc/flow_classes/rubyarray.png b/externals/gridflow/doc/flow_classes/rubyarray.png
new file mode 100644
index 00000000..2d3ad9e5
--- /dev/null
+++ b/externals/gridflow/doc/flow_classes/rubyarray.png
diff --git a/externals/gridflow/doc/flow_classes/unix_time-help.pd b/externals/gridflow/doc/flow_classes/unix_time-help.pd
index b0105ab5..d80b4c19 100644
--- a/externals/gridflow/doc/flow_classes/unix_time-help.pd
+++ b/externals/gridflow/doc/flow_classes/unix_time-help.pd
@@ -1,25 +1,29 @@
-#N canvas 696 154 450 446 10;
-#X obj 137 107 unix_time;
-#X obj 136 68 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#N canvas 134 38 639 312 10;
+#X obj 91 113 unix_time;
+#X obj 91 82 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 78 146 #export_list;
-#X obj 167 171 display;
-#X obj 43 18 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X obj 8 172 #export_list;
+#X obj 91 40 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
 ;
-#X obj 283 243 nbx 9 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
--262144 -1 -1 0 256;
-#X obj 11 290 display;
-#X text 381 243 <-- 1/100000 th of a second \, useful for generating
-filenames;
-#X text 213 170 <-- Unix timestamp;
-#X obj 86 30 metro 500;
-#X text 274 19 GridFlow 0.8.0;
-#X text 225 88 Outputs;
-#X text 62 287 <-- Ascii format for the date;
+#X obj 9 246 display;
+#X obj 91 58 metro 500;
+#X text 60 243 <-- Ascii format for the date;
+#X obj 308 221 display;
+#X obj 123 171 display;
+#X obj 307 195 display;
+#X obj 306 170 rubysprintf %04d%02d%02d-%02d%02d%02d;
+#X obj 8 282 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 16 289 GridFlow 0.8.0;
+#X obj 8 5 cnv 15 720 15 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 9 5 SUMMARY : the unixtime command;
 #X connect 0 0 2 0;
-#X connect 0 1 3 0;
-#X connect 0 2 5 0;
+#X connect 0 1 8 0;
+#X connect 0 2 7 0;
+#X connect 0 2 10 0;
 #X connect 1 0 0 0;
-#X connect 2 0 6 0;
-#X connect 4 0 9 0;
-#X connect 9 0 1 0;
+#X connect 2 0 4 0;
+#X connect 3 0 5 0;
+#X connect 5 0 1 0;
+#X connect 10 0 9 0;
diff --git a/externals/gridflow/doc/format.html b/externals/gridflow/doc/format.html
index 325a6409..243e508e 100644
--- a/externals/gridflow/doc/format.html
+++ b/externals/gridflow/doc/format.html
@@ -1,6 +1,6 @@
 <html><head>
-<!-- $Id: format.html,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
-<title>GridFlow 0.8.0 - Reference Manual: Format Classes</title>
+<!-- $Id: format.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
+<title>GridFlow 0.8.1 - Reference Manual: Format Classes</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" href="gridflow.css" type="text/css">
 </head>
@@ -14,7 +14,7 @@
 <tr><td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4" height="16"> 
-    <h4>GridFlow 0.8.0 - Reference Manual: Format Classes</h4>
+    <h4>GridFlow 0.8.1 - Reference Manual: Format Classes</h4>
 </td></tr>
 <tr> 
   <td width="5%"  rowspan="2">&nbsp;</td>
@@ -476,9 +476,9 @@
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4"> 
 <p><font size="-1">
-GridFlow 0.8.0 Documentation<br>
-Copyright &copy; 2001,2002,2003,2004,2005 by Mathieu Bouchard
-<a href="mailto:matju@sympatico.ca">matju@artengine.ca</a>
+GridFlow 0.8.1 Documentation<br>
+Copyright &copy; 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
+<a href="mailto:matju@artengine.ca">matju@artengine.ca</a>
 </font></p>
 </td></tr></table></body></html>
 
diff --git a/externals/gridflow/doc/format.xml b/externals/gridflow/doc/format.xml
index 39f17cf3..030a777d 100644
--- a/externals/gridflow/doc/format.xml
+++ b/externals/gridflow/doc/format.xml
@@ -1,7 +1,7 @@
 <?xml version="1.0" standalone="no" ?>
 <!DOCTYPE documentation SYSTEM 'jmax.dtd'>
 <documentation title="Reference Manual: Format Classes">
-<!-- $Id: format.xml,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
+<!-- $Id: format.xml,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
 	GridFlow Reference Manual: Format Handler Reference
 	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
diff --git a/externals/gridflow/doc/install.html b/externals/gridflow/doc/install.html
index e65652e3..6127c79c 100644
--- a/externals/gridflow/doc/install.html
+++ b/externals/gridflow/doc/install.html
@@ -1,6 +1,6 @@
 <html><head>
-<!-- $Id: install.html,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
-<title>GridFlow 0.8.0 - Installation</title>
+<!-- $Id: install.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
+<title>GridFlow 0.8.1 - Installation</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" href="gridflow.css" type="text/css">
 </head>
@@ -14,7 +14,7 @@
 <tr><td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4" height="16"> 
-    <h4>GridFlow 0.8.0 - Installation</h4>
+    <h4>GridFlow 0.8.1 - Installation</h4>
 </td></tr>
 <tr> 
   <td width="5%"  rowspan="2">&nbsp;</td>
@@ -113,9 +113,9 @@ crashes, or changes didn't go through. <ul> <li><b>1</b> : Did you forget the "m
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4"> 
 <p><font size="-1">
-GridFlow 0.8.0 Documentation<br>
-Copyright &copy; 2001,2002,2003,2004,2005 by Mathieu Bouchard
-<a href="mailto:matju@sympatico.ca">matju@artengine.ca</a>
+GridFlow 0.8.1 Documentation<br>
+Copyright &copy; 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
+<a href="mailto:matju@artengine.ca">matju@artengine.ca</a>
 </font></p>
 </td></tr></table></body></html>
 
diff --git a/externals/gridflow/doc/install.xml b/externals/gridflow/doc/install.xml
index 6a45e224..e1f1c434 100644
--- a/externals/gridflow/doc/install.xml
+++ b/externals/gridflow/doc/install.xml
@@ -1,7 +1,7 @@
 <?xml version="1.0" standalone="no" ?>
 <!DOCTYPE documentation SYSTEM 'jmax.dtd'>
 <documentation title="Installation">
-<!-- $Id: install.xml,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
+<!-- $Id: install.xml,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
         GridFlow Installation
         Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
diff --git a/externals/gridflow/doc/internals.html b/externals/gridflow/doc/internals.html
index dfc51b73..4a2e7978 100644
--- a/externals/gridflow/doc/internals.html
+++ b/externals/gridflow/doc/internals.html
@@ -1,6 +1,6 @@
 <html><head>
-<!-- $Id: internals.html,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
-<title>GridFlow 0.8.0 - C++/Ruby Internals</title>
+<!-- $Id: internals.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
+<title>GridFlow 0.8.1 - C++/Ruby Internals</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" href="gridflow.css" type="text/css">
 </head>
@@ -14,7 +14,7 @@
 <tr><td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4" height="16"> 
-    <h4>GridFlow 0.8.0 - C++/Ruby Internals</h4>
+    <h4>GridFlow 0.8.1 - C++/Ruby Internals</h4>
 </td></tr>
 <tr> 
   <td width="5%"  rowspan="2">&nbsp;</td>
@@ -197,9 +197,9 @@ and they point to each other using "peer pointers".
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4"> 
 <p><font size="-1">
-GridFlow 0.8.0 Documentation<br>
-Copyright &copy; 2001,2002,2003,2004,2005 by Mathieu Bouchard
-<a href="mailto:matju@sympatico.ca">matju@artengine.ca</a>
+GridFlow 0.8.1 Documentation<br>
+Copyright &copy; 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
+<a href="mailto:matju@artengine.ca">matju@artengine.ca</a>
 </font></p>
 </td></tr></table></body></html>
 
diff --git a/externals/gridflow/doc/internals.xml b/externals/gridflow/doc/internals.xml
index 19173719..952d0507 100644
--- a/externals/gridflow/doc/internals.xml
+++ b/externals/gridflow/doc/internals.xml
@@ -1,7 +1,7 @@
 <?xml version="1.0" standalone="no" ?>
 <!DOCTYPE documentation SYSTEM 'jmax.dtd'>
 <documentation title="C++/Ruby Internals">
-<!-- $Id: internals.xml,v 1.1 2005-10-04 02:09:42 matju Exp $ -->
+<!-- $Id: internals.xml,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
 	GridFlow Reference Manual: Internals
 	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
diff --git a/externals/gridflow/doc/license.html b/externals/gridflow/doc/license.html
index 5b5d39b7..0414218f 100644
--- a/externals/gridflow/doc/license.html
+++ b/externals/gridflow/doc/license.html
@@ -1,6 +1,6 @@
 <html>
 <head>
-<!-- $Id: license.html,v 1.1 2005-10-04 02:09:43 matju Exp $ -->
+<!-- $Id: license.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
 	GridFlow Reference Manual: Architecture
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/doc/moulinette.rb b/externals/gridflow/doc/moulinette.rb
index 03dbfa86..c74933d6 100644
--- a/externals/gridflow/doc/moulinette.rb
+++ b/externals/gridflow/doc/moulinette.rb
@@ -1,5 +1,5 @@
 =begin
-	$Id: moulinette.rb,v 1.1 2005-10-04 02:02:14 matju Exp $
+	$Id: moulinette.rb,v 1.2 2006-03-15 04:44:50 matju Exp $
 	convert GridFlow Documentation XML to HTML with special formatting.
 
 	GridFlow
@@ -22,12 +22,12 @@
 	Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 =end
 
-GF_VERSION = "0.8.0"
+GF_VERSION = "0.8.1"
 
 #$use_rexml = true
 $use_rexml = false
 
-#require "gridflow"
+require "gridflow"
 
 if $use_rexml
 	# this is a pure ruby xml-parser
@@ -138,6 +138,9 @@ class XNode
 			#	public :show_index
 			#}
 		end
+		def [](tag,att,*contents)
+			self.valid_tags[tag].new(tag,att,*contents)
+		end
 	end
 
 	def initialize tag, att, *contents
@@ -166,6 +169,7 @@ class XNode
 	end
 	def inspect; "#<XNode #{tag}>"; end
 	def to_s; inspect; end
+	def << x; contents << x; x.parent=self end
 end
 
 XNode.register("documentation") {}
@@ -549,8 +553,8 @@ puts <<EOF
 <tr><td colspan="4"> 
 <p><font size="-1">
 GridFlow #{GF_VERSION} Documentation<br>
-Copyright &copy; 2001,2002,2003,2004,2005 by Mathieu Bouchard
-<a href="mailto:matju@sympatico.ca">matju@artengine.ca</a>
+Copyright &copy; 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
+<a href="mailto:matju@artengine.ca">matju@artengine.ca</a>
 </font></p>
 </td></tr></table></body></html>
 EOF
@@ -561,12 +565,53 @@ end
 $nodes = {}
 XMLParserError = Exception if $use_rexml
 
+def harvest_doc_of_class xclass, v, way
+	doc = case way; when:in:v.doc;   when:out:v.doc_out end
+	tag = case way; when:in:"inlet"; when:out:"outlet" end
+	doc.keys.each {|sel|
+		text = v.doc[sel]
+		m=/^_(\d+)_(\w+)/.match sel.to_s
+		if m then
+			xclass << XNode[tag,{"id"=>Integer(m[1])},
+			  XNode["method",{"name"=>m[2]},XString.new(text)]]
+		else
+			xclass << XNode["method",{"name"=>sel.to_s},XString.new(text)]
+		end
+	}
+end
+
+def harvest_doc tree
+	kla = {}
+	tree.contents.find_all {|x| XNode===x and x.tag=="section" }.each {|sex|
+		sex.contents.each {|y|
+			next unless XNode===y and y.tag=="class"
+			kla[y.att["name"]] = y
+		}
+	}
+	#STDERR.puts kla.inspect
+	tree << (nu=XNode["section",{"name"=>"(new documentation)"}])
+	tree << (un=XNode["section",{"name"=>"(undocumented)"}])
+	alph = GridFlow.fclasses.keys.sort
+	alph.each {|k|
+		next if /^@/=~k and GridFlow.fclasses[k.gsub(/^@/,"#")]
+		v = GridFlow.fclasses[k]
+		if v.doc then
+			nu << (xclass=XNode["class",{"name"=>k}])
+			harvest_doc_of_class xclass, v, :in
+			harvest_doc_of_class xclass, v, :out
+		elsif not kla[k] then
+			un << XNode["p",{},XString.new("[#{k}]")]
+		end
+	}
+end
+
 def read_one_page file
 	begin
 		STDERR.puts "reading #{file}"
 		parser = GFDocParser.new(file)
 		parser.do_it
 		$nodes[file] = parser.stack[0][0]
+		if file=="reference.xml" then harvest_doc $nodes[file] end
 	rescue Exception => e
 		puts ""
 		puts ""
@@ -587,8 +632,10 @@ def write_one_page file
 		$file = file
 		output_name = file.sub(/\.xml/,".html")
 		STDERR.puts "writing #{output_name}"
+		STDOUT.flush # bug in 1.9 ?
 		STDOUT.reopen output_name, "w"
 		tree = $nodes[file]
+#		tree.contents.each {|x| STDERR.puts x.inspect }
 		write_header(tree)
 		mk(:tr) { mk(:td,:colspan,2) { mk(:div,:cols,tree.att["indexcols"]||1) {
 			tree.show_index
@@ -605,8 +652,9 @@ def write_one_page file
 end
 
 $files = %w(
-	install.xml project_policy.xml
+	install.xml
 	reference.xml format.xml internals.xml architecture.xml)
+# project_policy.xml
 
 $files.each {|input_name| read_one_page input_name }
 $files.each {|input_name| write_one_page input_name }
diff --git a/externals/gridflow/doc/profiling.html b/externals/gridflow/doc/profiling.html
index aac2ea1f..f804e87d 100644
--- a/externals/gridflow/doc/profiling.html
+++ b/externals/gridflow/doc/profiling.html
@@ -1,6 +1,6 @@
 <html>
 <head>
-<!-- $Id: profiling.html,v 1.1 2005-10-04 02:09:43 matju Exp $ -->
+<!-- $Id: profiling.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
 	GridFlow Reference Manual: Architecture
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/doc/reference.html b/externals/gridflow/doc/reference.html
index ac1f4373..8dce72ec 100644
--- a/externals/gridflow/doc/reference.html
+++ b/externals/gridflow/doc/reference.html
@@ -1,6 +1,6 @@
 <html><head>
-<!-- $Id: reference.html,v 1.1 2005-10-04 02:09:43 matju Exp $ -->
-<title>GridFlow 0.8.0 - Reference Manual: Flow Classes</title>
+<!-- $Id: reference.html,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
+<title>GridFlow 0.8.1 - Reference Manual: Flow Classes</title>
 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 <link rel="stylesheet" href="gridflow.css" type="text/css">
 </head>
@@ -14,7 +14,7 @@
 <tr><td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4" height="16"> 
-    <h4>GridFlow 0.8.0 - Reference Manual: Flow Classes</h4>
+    <h4>GridFlow 0.8.1 - Reference Manual: Flow Classes</h4>
 </td></tr>
 <tr> 
   <td width="5%"  rowspan="2">&nbsp;</td>
@@ -129,6 +129,15 @@
 <li><a href="#pd_netsend"><img src="flow_classes/pd_netsend-icon.png" alt="[pd_netsend]" border="0"></a></li>
 <li><a href="#pd_netreceive"><img src="flow_classes/pd_netreceive-icon.png" alt="[pd_netreceive]" border="0"></a></li>
 </ul>
+<h4><a href="#(new_documentation)">(new documentation)</a></h4><ul>
+<li><a href="#listfind"><img src="flow_classes/listfind-icon.png" alt="[listfind]" border="0"></a></li>
+<li><a href="#memstat"><img src="flow_classes/memstat-icon.png" alt="[memstat]" border="0"></a></li>
+<li><a href="#regsub"><img src="flow_classes/regsub-icon.png" alt="[regsub]" border="0"></a></li>
+<li><a href="#sendgui"><img src="flow_classes/sendgui-icon.png" alt="[sendgui]" border="0"></a></li>
+<li><a href="#sys_vgui"><img src="flow_classes/sys_vgui-icon.png" alt="[sys_vgui]" border="0"></a></li>
+</ul>
+<h4><a href="#(undocumented)">(undocumented)</a></h4><ul>
+</ul>
 <br><br>
 </div></td></tr> <tr><td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
@@ -208,6 +217,13 @@
 <img src="flow_classes/%23color-icon.png" alt="[#color]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
  <p>Triple slider for the selection of RGB values.</p> <br><b>method</b>&nbsp;init <b>(</b><i>float</i> min<b>, </b><i>float</i> max<b>, </b><i>0,1</i> hidepreview<b>)</b>     <br>
  <br><b>inlet&nbsp;0 </b><b>method</b>&nbsp;grid <b>(</b><b>)</b>  
+			changes all three values (R,G,B). The grid must 
+			be a Dim(3). <br>
+ <br><b>inlet&nbsp;0 </b><b>method</b>&nbsp;delegate <b>(</b><b>)</b>  
+			sends the rest of the message to each of the three sliders. 
+			this relies on the fact that [#color] is implemented using 
+			three [hsl] and this might not still work in the far future. <br>
+ <br><b>outlet&nbsp;0 </b><b>method</b>&nbsp;grid <b>(</b><b>)</b>  
 			Produces a Dim(3) grid of RGB values. <br>
  <br></td></tr><tr><td></td><td></td><td> </td></tr>
 <tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="#unpack">#unpack</a></td></tr><tr><td></td><td valign="top"><br>
@@ -874,7 +890,11 @@ Outputs the fractions of a second up to 10 microseconds (?) (actual precision is
 		This object is similar to the Unix list command 
 		'ls'. It returns the names of files in a given 
 		directory.  May be used with [listlength] to retrieve the number of files. 
-		Hidden files are displayed. </p> <br><b>inlet&nbsp;0 </b><b>method</b>&nbsp;symbol <b>(</b><b>)</b> <br>
+		Hidden files are displayed. </p> <br><b>inlet&nbsp;0 </b><b>method</b>&nbsp;symbol <b>(</b><b>)</b>  
+			lists all files in a given directory <br>
+ <br><b>inlet&nbsp;0 </b><b>method</b>&nbsp;glob <b>(</b><b>)</b>  
+			lists all files matching a given pattern. 
+			"symbol hello" is like "glob hello/*" <br>
  <br></td></tr><tr><td></td><td></td><td> </td></tr>
 <tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="exec">exec</a></td></tr><tr><td></td><td valign="top"><br>
 <img src="flow_classes/exec-icon.png" alt="[exec]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
@@ -1057,13 +1077,88 @@ Outputs the HPGL commands in ASCII format <br></td></tr><tr><td></td><td></td><t
  
 		same as jmax_udpreceive but for PureData UDP connections. <br></td></tr><tr><td></td><td></td><td> </td></tr>
 <tr><td>&nbsp;</td></tr>
- <td colspan="4" bgcolor="black">
+ <tr><td colspan="4" bgcolor="black">
+<img src="images/black.png" width="1" height="2"></td></tr>
+<tr><td colspan="4"><a name="(new_documentation)"></a><h4>(new documentation)</h4></td></tr><tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="listfind">listfind</a></td></tr><tr><td></td><td valign="top"><br>
+<img src="flow_classes/listfind-icon.png" alt="[listfind]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
+<br><b>method</b>&nbsp;_1_list <b>(</b><b>)</b> list to search into<br>
+<br><b>method</b>&nbsp;_0_float <b>(</b><b>)</b> float to find in that list<br>
+<br><b>method</b>&nbsp;_1_float <b>(</b><b>)</b> position of the incoming float in the stored list<br>
+<br></td></tr><tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="memstat">memstat</a></td></tr><tr><td></td><td valign="top"><br>
+<img src="flow_classes/memstat-icon.png" alt="[memstat]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
+<br><b>method</b>&nbsp;_0_bang <b>(</b><b>)</b> lookup process stats for the currently running pd+ruby and figure out how much RAM it uses.<br>
+<br><b>method</b>&nbsp;_0_float <b>(</b><b>)</b> virtual size of RAM in kilobytes (includes swapped out and shared memory)<br>
+<br></td></tr><tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="regsub">regsub</a></td></tr><tr><td></td><td valign="top"><br>
+<img src="flow_classes/regsub-icon.png" alt="[regsub]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
+<br><b>method</b>&nbsp;_1_symbol <b>(</b><b>)</b> a regexp pattern to be found inside of the string<br>
+<br><b>method</b>&nbsp;_0_symbol <b>(</b><b>)</b> a string to transform<br>
+<br><b>method</b>&nbsp;_2_symbol <b>(</b><b>)</b> a replacement for the found pattern<br>
+<br><b>method</b>&nbsp;_0_symbol <b>(</b><b>)</b> the transformed string<br>
+<br></td></tr><tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="sendgui">sendgui</a></td></tr><tr><td></td><td valign="top"><br>
+<img src="flow_classes/sendgui-icon.png" alt="[sendgui]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
+<br><b>method</b>&nbsp;_0_list <b>(</b><b>)</b> a Tcl/Tk command to send to the pd client.<br>
+<br></td></tr><tr><td colspan="4" bgcolor="#ffb080"><b>&nbsp;&nbsp;class </b><a name="sys_vgui">sys_vgui</a></td></tr><tr><td></td><td valign="top"><br>
+<img src="flow_classes/sys_vgui-icon.png" alt="[sys_vgui]" border="0"><br clear="left"><br><br><br clear="left"><br></td><td><br>
+<br><b>method</b>&nbsp;_0_list <b>(</b><b>)</b> a Tcl/Tk command to send to the pd client.<br>
+<br></td></tr><tr><td>&nbsp;</td></tr>
+<tr><td colspan="4" bgcolor="black">
+<img src="images/black.png" width="1" height="2"></td></tr>
+<tr><td colspan="4"><a name="(undocumented)"></a><h4>(undocumented)</h4></td></tr><tr><td></td><td></td><td><p>[#edit]</p></td></tr>
+<tr><td></td><td></td><td><p>[#in]</p></td></tr>
+<tr><td></td><td></td><td><p>[#in:aalib]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:file]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:grid]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:jpeg]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:mpeg]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:opengl]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:png]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:ppm]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:quicktime]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:sdl]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:targa]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:tk]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:videodev]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:window]</p></td></tr>
+<tr><td></td><td></td><td><p>[#io:x11]</p></td></tr>
+<tr><td></td><td></td><td><p>[#matrix_solve]</p></td></tr>
+<tr><td></td><td></td><td><p>[#out]</p></td></tr>
+<tr><td></td><td></td><td><p>[#peephole]</p></td></tr>
+<tr><td></td><td></td><td><p>[@!]</p></td></tr>
+<tr><td></td><td></td><td><p>[@eight]</p></td></tr>
+<tr><td></td><td></td><td><p>[@four]</p></td></tr>
+<tr><td></td><td></td><td><p>[@global]</p></td></tr>
+<tr><td></td><td></td><td><p>[@scale_to]</p></td></tr>
+<tr><td></td><td></td><td><p>[@three]</p></td></tr>
+<tr><td></td><td></td><td><p>[@two]</p></td></tr>
+<tr><td></td><td></td><td><p>[GridObject]</p></td></tr>
+<tr><td></td><td></td><td><p>[SoundMixer]</p></td></tr>
+<tr><td></td><td></td><td><p>[ascii]</p></td></tr>
+<tr><td></td><td></td><td><p>[broken]</p></td></tr>
+<tr><td></td><td></td><td><p>[button]</p></td></tr>
+<tr><td></td><td></td><td><p>[delcomusb]</p></td></tr>
+<tr><td></td><td></td><td><p>[for]</p></td></tr>
+<tr><td></td><td></td><td><p>[gfmessagebox]</p></td></tr>
+<tr><td></td><td></td><td><p>[gridflow]</p></td></tr>
+<tr><td></td><td></td><td><p>[jcomment]</p></td></tr>
+<tr><td></td><td></td><td><p>[jmax4_udpreceive]</p></td></tr>
+<tr><td></td><td></td><td><p>[jmax4_udpsend]</p></td></tr>
+<tr><td></td><td></td><td><p>[joystick_port]</p></td></tr>
+<tr><td></td><td></td><td><p>[jpatcher]</p></td></tr>
+<tr><td></td><td></td><td><p>[klippeltronics]</p></td></tr>
+<tr><td></td><td></td><td><p>[loadbang]</p></td></tr>
+<tr><td></td><td></td><td><p>[messbox]</p></td></tr>
+<tr><td></td><td></td><td><p>[parallel_port]</p></td></tr>
+<tr><td></td><td></td><td><p>[pd_netsocket]</p></td></tr>
+<tr><td></td><td></td><td><p>[system]</p></td></tr>
+<tr><td></td><td></td><td><p>[toggle]</p></td></tr>
+<tr><td>&nbsp;</td></tr>
+<td colspan="4" bgcolor="black">
 <img src="images/black.png" width="1" height="2"></td></tr>
 <tr><td colspan="4"> 
 <p><font size="-1">
-GridFlow 0.8.0 Documentation<br>
-Copyright &copy; 2001,2002,2003,2004,2005 by Mathieu Bouchard
-<a href="mailto:matju@sympatico.ca">matju@artengine.ca</a>
+GridFlow 0.8.1 Documentation<br>
+Copyright &copy; 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
+<a href="mailto:matju@artengine.ca">matju@artengine.ca</a>
 </font></p>
 </td></tr></table></body></html>
 
diff --git a/externals/gridflow/doc/reference.xml b/externals/gridflow/doc/reference.xml
index 8a5f8f7e..e7bf94a1 100644
--- a/externals/gridflow/doc/reference.xml
+++ b/externals/gridflow/doc/reference.xml
@@ -1,10 +1,11 @@
 <?xml version="1.0" standalone="no" ?>
 <!DOCTYPE documentation SYSTEM 'gridflow.dtd'>
 <documentation title="Reference Manual: Flow Classes" indexcols="3">
-<!-- $Id: reference.xml,v 1.1 2005-10-04 02:09:43 matju Exp $ -->
+<!-- $Id: reference.xml,v 1.2 2006-03-15 04:44:50 matju Exp $ -->
 <!--
 	GridFlow Reference Manual: Class Reference
-	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard and Alexandre Castonguay
+	Copyright (c) 2001,2002,2003,2004,2005,2006
+	by Mathieu Bouchard and Alexandre Castonguay
 -->
 
 <section name="Objects for making grids and breaking them down">
@@ -148,8 +149,17 @@
 			<arg name="hidepreview" type="0,1"></arg>
 		</method>
 		<inlet id="0"><method name="grid">
-			Produces a Dim(3) grid of RGB values.
+			changes all three values (R,G,B). The grid must
+			be a Dim(3).
+		</method>
+		<method name="delegate">
+			sends the rest of the message to each of the three sliders.
+			this relies on the fact that [#color] is implemented using
+			three [hsl] and this might not still work in the far future.
 		</method></inlet>
+		<outlet id="0"><method name="grid">
+			Produces a Dim(3) grid of RGB values.
+		</method></outlet>
 	</class>
 
 	<class name="#unpack">
@@ -1342,7 +1352,13 @@
 		directory.  May be used with [listlength] to retrieve the number of files. 
 		Hidden files are displayed.
 		</p>
-		<inlet id="0"><method name="symbol"/></inlet>
+		<inlet id="0"><method name="symbol">
+			lists all files in a given directory
+		</method>
+		<method name="glob">
+			lists all files matching a given pattern.
+			"symbol hello" is like "glob hello/*"
+		</method></inlet>
 	</class>
 
 	<class name="exec">
diff --git a/externals/gridflow/doc/tutorials/0-0-intro_page.pd b/externals/gridflow/doc/tutorials/0-0-intro_page.pd
new file mode 100755
index 00000000..3ac9fb86
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/0-0-intro_page.pd
@@ -0,0 +1,89 @@
+#N canvas 226 0 429 638 10;
+#X obj -22 -68 cnv 1 430 80 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj -24 49 cnv 1 430 520 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj -24 82 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 57 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -17 49 cnv 1 2 480 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 390 50 cnv 1 2 480 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 144 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 168 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 26 98 1.1 What is a grid?;
+#X obj 41 534 cnv 15 300 30 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 53 539 Stephanie Brodeur & Darsha Hewitt 2005;
+#X obj -22 7 cnv 15 430 30 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 88 -3 cnv 15 100 17 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 88 -5 GridFlow 0.8.0;
+#X obj -22 -68 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X obj -23 37 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X obj 189 11 cnv 15 63 17 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 188 8 Tutorials;
+#X obj -24 48 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X obj -24 528 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X text 14 63 1;
+#X obj 32 62 Introduction to Grids;
+#X text 26 178 2.1 How does GridFlow understand images?;
+#X text 15 150 2;
+#X obj 36 147 Introduction to Images;
+#X text 419 224 2.3 Different options on how to open an image.;
+#X text 445 241 2.3.1 Opening different images in one window.;
+#X text 445 258 2.3.2 Opening images using send and receive.;
+#X obj -24 310 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 334 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 18 317 3;
+#X obj 39 315 Introduction to Video;
+#X text 482 201 REMOVE 2.3 -- see pd tuts;
+#X text 17 405 4;
+#X obj 38 405 Introduction to Live Feed;
+#X obj 37 481 Putting it all Together;
+#X text 20 482 5;
+#X text 30 430 4.1 Opening a live video feed;
+#X text 30 446 4.2 Motion Detection;
+#X text 29 372 3.3 Recording video;
+#X obj -24 310 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 334 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 400 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 424 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 400 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 424 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 476 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 500 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 476 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj -24 500 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 26 114 1.2 How to create a grid;
+#X text 26 197 2.2 Opening an image;
+#X text 26 214 2.3 Image manipulation;
+#X text 55 244 2.3.2 Resizing an image;
+#X text 55 228 2.3.1 Numop;
+#X text 55 273 2.3.4 Remap image;
+#X text 55 259 2.3.3 Greyscale;
+#X text 55 286 2.3.5 Convolve;
+#X text 29 342 3.1 Opening a video;
+#X text 29 358 3.2 Video manipulation;
diff --git a/externals/gridflow/doc/tutorials/2-3-4-image-modification-2-remap-image.pd b/externals/gridflow/doc/tutorials/2-3-4-image-modification-2-remap-image.pd
new file mode 100755
index 00000000..b6e4755d
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/2-3-4-image-modification-2-remap-image.pd
@@ -0,0 +1,55 @@
+#N canvas 41 17 876 618 10;
+#X obj 10 519 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X msg 53 173 open b001.jpg;
+#X obj 23 116 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 23 204 #in;
+#X obj 23 142 t b b;
+#X obj 23 351 #out window;
+#X obj 102 323 #print;
+#X obj 184 160 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 203 225 5 0 0 0 - - -;
+#X obj 173 184 #for (0 0) (240 320) (1 1);
+#X obj 173 134 metro 100;
+#X obj 173 109 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 23 292 #remap_image;
+#X text 18 526 GridFlow 0.8.0;
+#X text 243 224 <-- Modify the value to see transformations.;
+#X obj 173 257 # / 1;
+#X text 227 261 The remap object works with numops.;
+#X obj 9 -17 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 9 -52 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 15 -17 2.4 Image Manipulation;
+#X text 16 -46 2 Introduction to Images;
+#X text 15 2 2.4.4 Remap Image;
+#X text 26 408 Remap image permits you to modify an image using numeric
+operators. Different numeric Operators have different effects ton the
+image and can be changed to give the desired effect. The multiplication
+operator multiplies the values and distorts the image. The division
+operator does the same but shrinks the operator...;
+#X text 467 24 Have the list of operators and what they do in order
+to know the various effects.;
+#X text 468 77 example:;
+#X obj 474 121 # / 2;
+#X text 523 114 multiplication multiplies the numbers in the grid and
+distorts the image.;
+#N canvas 0 0 450 300 META 0;
+#X restore 130 527 pd META;
+#X connect 1 0 3 0;
+#X connect 2 0 4 0;
+#X connect 3 0 12 0;
+#X connect 4 0 3 0;
+#X connect 4 1 1 0;
+#X connect 7 0 9 0;
+#X connect 8 0 15 1;
+#X connect 9 0 15 0;
+#X connect 10 0 9 0;
+#X connect 11 0 10 0;
+#X connect 12 0 5 0;
+#X connect 12 1 6 0;
+#X connect 15 0 12 1;
diff --git a/externals/gridflow/doc/tutorials/2-3-5-image-modification-2-convolve.pd b/externals/gridflow/doc/tutorials/2-3-5-image-modification-2-convolve.pd
new file mode 100755
index 00000000..4a099537
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/2-3-5-image-modification-2-convolve.pd
@@ -0,0 +1,120 @@
+#N canvas 47 0 787 658 10;
+#X msg 468 148 3 3 # 0 4 0 4 9 -4 0 -4 0;
+#X msg 467 100 3 3 # 4 0 0 0 1 0 0 0 4;
+#X obj 80 219 #store;
+#X obj 80 270 # / 9;
+#X msg 467 75 3 3 # 1 1 1 1 1 1 1 1 1;
+#X obj -13 201 #out window;
+#X msg 470 263 1 3 # 0 9 -9;
+#X obj -21 117 #in;
+#X msg 468 124 3 3 # 2 2 2 2 -7 2 2 2 2;
+#X obj 80 145 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 70 325 @! abs;
+#X obj -21 77 loadbang;
+#X obj 80 182 metro 33.3667;
+#X obj -21 139 t a;
+#X obj 80 244 #convolve \, seed 4;
+#X obj 401 78 loadbang;
+#X obj 80 299 shunt 2;
+#X obj 124 270 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+1;
+#X msg 170 280 0;
+#X obj 124 351 # + 128;
+#X msg 170 304 1;
+#X obj 469 174 display;
+#X obj -13 225 fps;
+#X obj -13 250 print;
+#X obj -50 466 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text -42 473 GridFlow 0.8.0;
+#X text -42 473 GridFlow 0.8.0;
+#X msg 470 242 1 3 # 0 2 -2;
+#X msg 470 325 3 3 # 0 -1 0 -1 4 -1 0 -1 0;
+#X msg 470 348 3 3 # -1 -1 -1 -1 8 -1 -1 -1 -1;
+#X msg 470 416 3 3 # 0 -1 0 -1 13 -1 0 -1 0;
+#X obj 124 325 # << 4;
+#X msg -21 97 open babbage.jpg \, bang;
+#X obj -49 -111 cnv 15 780 15 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj -49 -146 cnv 15 780 30 empty empty empty 20 12 0 14 -233017
+-66577 0;
+#X obj 470 218 cnv 15 100 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X obj 468 52 cnv 15 37 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 470 218 Edge detection;
+#X obj 470 303 cnv 15 110 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 472 303 Laplacian masks;
+#X obj 470 393 cnv 15 50 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 470 393 Sharpen;
+#X obj -21 383 #clip;
+#X obj 190 118 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X obj 210 97 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X text 146 97 <-- step #1: load image;
+#X obj 173 141 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X text 109 141 <-- step #3: start metro;
+#X text 154 118 step #2: select transformation -->;
+#X text 468 52 Blurs;
+#N canvas 0 0 450 300 META 0;
+#X restore 69 473 pd META;
+#X text -44 -140 2 Introduction to Images;
+#X text -44 -112 2.4 Image Manipulation;
+#X obj -49 24 cnv 15 780 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text -49 23 (Source convolve.pd : Copyright Mathieu Bouchard 2002)
+;
+#X text -16 -67 Convolve is an abstraction used for modifying an image.
+In this patch you can choose to create a "blur" \, to view "edge detection"
+\, to add a "laplacian mask" or to "sharpen" an image. The image must
+be loaded \, the transformation selected and the metro started before
+seeing the transformation applied to the image.;
+#X obj -17 -89 cnv 15 100 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text -17 -90 2.4.4 Convolve;
+#X connect 0 0 18 0;
+#X connect 0 0 14 1;
+#X connect 0 0 21 0;
+#X connect 1 0 18 0;
+#X connect 1 0 14 1;
+#X connect 2 0 14 0;
+#X connect 3 0 16 0;
+#X connect 4 0 18 0;
+#X connect 4 0 14 1;
+#X connect 5 0 22 0;
+#X connect 6 0 14 1;
+#X connect 6 0 20 0;
+#X connect 7 0 13 0;
+#X connect 8 0 18 0;
+#X connect 8 0 14 1;
+#X connect 9 0 12 0;
+#X connect 10 0 42 0;
+#X connect 11 0 32 0;
+#X connect 12 0 2 0;
+#X connect 13 0 2 1;
+#X connect 13 0 5 0;
+#X connect 14 0 3 0;
+#X connect 15 0 4 0;
+#X connect 16 0 10 0;
+#X connect 16 1 31 0;
+#X connect 17 0 16 1;
+#X connect 18 0 17 0;
+#X connect 19 0 42 0;
+#X connect 20 0 17 0;
+#X connect 22 0 23 0;
+#X connect 27 0 18 0;
+#X connect 27 0 14 1;
+#X connect 28 0 14 1;
+#X connect 28 0 20 0;
+#X connect 29 0 20 0;
+#X connect 29 0 14 1;
+#X connect 30 0 18 0;
+#X connect 30 0 14 1;
+#X connect 31 0 19 0;
+#X connect 32 0 7 0;
+#X connect 42 0 13 0;
diff --git a/externals/gridflow/doc/tutorials/2-3-6-image-modification-2-cross-fade.pd b/externals/gridflow/doc/tutorials/2-3-6-image-modification-2-cross-fade.pd
new file mode 100755
index 00000000..6b8fe50a
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/2-3-6-image-modification-2-cross-fade.pd
@@ -0,0 +1,93 @@
+#N canvas 92 129 774 521 10;
+#X text 24 355 note: the #layer/#join objects can make the crossfade
+process simpler but it's still not faster.;
+#X obj 14 95 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 14 120 metro 33.3667;
+#X obj 14 140 float;
+#X obj 26 169 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 0 256;
+#X obj 58 139 + 4;
+#X obj 14 190 pingpong 256;
+#X obj 25 212 hsl 129 15 0 256 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X text 25 393 also #draw_image/#join is a possibility;
+#X obj 13 40 cnv 15 680 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 27 53 Copyright 2002 Mathieu Bouchard;
+#X text 27 37 cross_fade.pd;
+#X obj 6 324 cnv 15 680 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 18 326 GridFlow 0.8.0;
+#N canvas 515 126 450 300 cross_fade 0;
+#X obj 40 198 # *>>8;
+#X text 67 242 first picture plus a fraction of the difference;
+#X obj 40 240 # +;
+#X obj 40 177 #store;
+#X obj 264 137 # inv+;
+#X obj 95 261 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+;
+#X msg 422 195 open r001.jpg \, cast int16 \, bang;
+#X obj 321 156 #in;
+#X obj 40 156 #finished;
+#X text 116 264 click to clip out-of-range colours;
+#X text 89 197 multiply by a N/256 fraction;
+#X obj 88 302 # max 0;
+#X obj 254 89 #in;
+#X obj 88 281 # min 255;
+#X obj 44 337 #out window;
+#X obj 40 116 #cast int16;
+#X text 88 177 keep the difference between both pictures;
+#X obj 447 99 t b b;
+#X obj 445 74 loadbang;
+#X obj 40 260 shunt 2;
+#X obj 40 135 t a a;
+#X msg 459 137 open g001.jpg \, cast int16 \, bang;
+#X obj 30 75 inlet;
+#X connect 0 0 2 0;
+#X connect 2 0 19 0;
+#X connect 3 0 0 0;
+#X connect 4 0 3 1;
+#X connect 5 0 19 1;
+#X connect 6 0 7 0;
+#X connect 7 0 4 1;
+#X connect 8 0 3 0;
+#X connect 11 0 14 0;
+#X connect 12 0 4 0;
+#X connect 12 0 2 1;
+#X connect 13 0 11 0;
+#X connect 15 0 20 0;
+#X connect 17 0 21 0;
+#X connect 17 1 6 0;
+#X connect 18 0 17 0;
+#X connect 19 0 14 0;
+#X connect 19 1 13 0;
+#X connect 20 0 8 0;
+#X connect 20 1 0 1;
+#X connect 21 0 12 0;
+#X connect 22 0 15 0;
+#X restore 13 261 pd cross_fade;
+#X obj 15 11 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 18 11 What is a grid?;
+#X obj 15 -24 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 20 -25 2 Images;
+#X text 22 -11 Description: opening multiple images from one window.
+;
+#X obj 11 416 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 19 423 GridFlow 0.8.0;
+#X text 219 118 some objects have been created to perform specoific
+tasks. One of these is the crossfade patch it permits you to fade from
+one image to another. you can chose the images you want to ping pong
+between \, to get a nice steady fade between two images.;
+#N canvas 0 0 450 300 META 0;
+#X restore 146 428 pd META;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 3 0 5 0;
+#X connect 3 0 6 0;
+#X connect 5 0 3 1;
+#X connect 6 0 7 0;
+#X connect 6 0 14 0;
diff --git a/externals/gridflow/doc/tutorials/2nd-part-numop.pd b/externals/gridflow/doc/tutorials/2nd-part-numop.pd
new file mode 100755
index 00000000..a6f96f9c
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/2nd-part-numop.pd
@@ -0,0 +1,80 @@
+#N canvas 66 33 927 601 10;
+#X obj 16 -206 cnv 15 200 170 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 38 -178 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 24 -127 #in;
+#X obj 82 -114 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -241291
+-1 -1 0 1;
+#X obj 24 -88 # + \$1;
+#X obj 125 -157 metro 33.3;
+#X obj 125 -177 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0
+1;
+#X obj 462 -153 cnv 15 400 350 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 482 -109 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 468 -30 #in;
+#X msg 468 -132 open b001.jpg;
+#X obj 508 -49 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -241291
+-1 -1 0 1;
+#X obj 468 84 # + \$1;
+#X obj 514 -109 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1
+1;
+#X obj 468 128 #clip;
+#X obj 24 -60 s slider_metro;
+#X obj 468 154 s slider_metro_clip;
+#X floatatom 79 -86 5 0 0 0 - - -;
+#X text 10 210 In all these examples the [# +] numop is used. All the
+numeric operators can be found in the numeric operator help patch (right
+click on the [# +] and select help to view them). If you want to see
+what effects other numops can do \, try replacing the [# +] numop with
+another one (either cut and past a different numop from the help file
+or create the object in the current canvas.;
+#X obj 514 -89 metro 33.3;
+#X obj 552 -21 #color;
+#X msg 552 44 255 0 0;
+#X text 614 44 donner une liste changer couleurs;
+#X obj 552 88 #scale_by (8 8);
+#X msg 552 66 2 2 3 # 255 0 0 0 255 0 0 0 255 191 191 191;
+#X obj 834 211 r slider_metro;
+#X obj 843 238 r slider_metro_clip;
+#X obj 834 265 #out window;
+#X obj 16 -284 cnv 15 70 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 15 -284 Example #4;
+#X text 15 -261 Will demonstrate how to use the metro (see pd_intro
+#4) and the slider which allows you to scroll through values and modify
+a grid in real-time.;
+#X msg 24 -202 open b001.jpg;
+#X obj 456 -281 cnv 15 70 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 455 -281 Example #5;
+#X text 457 -260 We introduce the [#clip] object. It is used with numops
+in order to set constraints on the pixel to eliminate color wrapping.
+Colour wrapping occurs when the individual pixel values in a grid exceed
+255 which results in over-saturation of colour. GridFlow reads colours
+as values from 0 (black) to 255 (white). Refer to glossary for more
+information on colour.;
+#X connect 1 0 2 0;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 3 0 17 0;
+#X connect 4 0 15 0;
+#X connect 5 0 2 0;
+#X connect 6 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 12 0;
+#X connect 10 0 9 0;
+#X connect 11 0 12 1;
+#X connect 12 0 14 0;
+#X connect 13 0 19 0;
+#X connect 14 0 16 0;
+#X connect 19 0 9 0;
+#X connect 20 0 12 1;
+#X connect 21 0 12 1;
+#X connect 23 0 12 1;
+#X connect 24 0 23 0;
+#X connect 25 0 27 0;
+#X connect 26 0 27 0;
+#X connect 31 0 2 0;
diff --git a/externals/gridflow/doc/tutorials/3-1-0-open-video.pd b/externals/gridflow/doc/tutorials/3-1-0-open-video.pd
new file mode 100755
index 00000000..2abf0e74
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/3-1-0-open-video.pd
@@ -0,0 +1,38 @@
+#N canvas 48 56 545 431 10;
+#X obj 100 156 #in;
+#X obj 100 222 #out window;
+#X obj 124 33 openpanel;
+#X obj 124 9 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 124 58 open \$1;
+#X obj 17 11 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 17 45 metro 33.33;
+#X floatatom 317 190 5 0 0 0 - - -;
+#X obj 401 166 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 401 193 print go;
+#X msg 201 124 loop 0;
+#X msg 201 97 loop 1;
+#X msg 283 13 open home/steph/Desktop/PDDP_summer;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 10 -37 What is a grid?;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -73 2 Images;
+#X text 14 -59 Description: opening multiple images from one window.
+;
+#X obj 8 320 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 16 327 GridFlow 0.8.0;
+#X connect 0 0 1 0;
+#X connect 0 1 7 0;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 4 0 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X connect 8 0 9 0;
+#X connect 10 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 0;
diff --git a/externals/gridflow/doc/tutorials/3-2-video-manipulation.pd b/externals/gridflow/doc/tutorials/3-2-video-manipulation.pd
new file mode 100755
index 00000000..78a7b427
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/3-2-video-manipulation.pd
@@ -0,0 +1 @@
+#N canvas 0 0 450 300 10;
diff --git a/externals/gridflow/doc/tutorials/3-3-record-video.pd b/externals/gridflow/doc/tutorials/3-3-record-video.pd
new file mode 100755
index 00000000..ff158554
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/3-3-record-video.pd
@@ -0,0 +1,51 @@
+#N canvas 151 21 517 609 10;
+#X obj 15 320 #camera;
+#X obj 15 260 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 142 370 #out window;
+#X obj 90 260 hsl 128 15 20 300 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 142 395 fps detailed;
+#X obj 142 419 print;
+#X obj 15 294 metro 100;
+#X obj 53 473 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 129 506 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 149 505 stop recording;
+#X text 73 471 select filename;
+#X text 111 488 start recording;
+#X obj 91 489 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 15 528 #record_quicktime;
+#X text 21 54 To record a video from a live stream or a video... you
+can use this patch.;
+#X text 224 315 xinitrc ssh pdrc bach rc export bookmarks;
+#X text 11 110 The outside of the patch uses objects seen in previous
+patches. The [#record_quicktime] object is an abstraction in which
+the settings and the optins are situated. to contruct the patch ...
+Do we explain how to do it if it is in an abstraction???;
+#X text 86 198 we don't nec have to explain how to build it since its
+available to them through the pd_examples and they have been through
+enough patvhes to easily understand what's going on.;
+#X obj 11 29 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 14 29 What is a grid?;
+#X obj 11 -6 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 21 -7 2 Images;
+#X text 18 7 Description: opening multiple images from one window.
+;
+#X obj 13 561 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 21 568 GridFlow 0.8.0;
+#X connect 0 0 2 0;
+#X connect 0 0 13 0;
+#X connect 1 0 6 0;
+#X connect 2 0 4 0;
+#X connect 3 0 6 1;
+#X connect 4 0 5 0;
+#X connect 6 0 0 0;
+#X connect 7 0 13 1;
+#X connect 8 0 13 3;
+#X connect 12 0 13 2;
diff --git a/externals/gridflow/doc/tutorials/4-0-open-live-stream.pd b/externals/gridflow/doc/tutorials/4-0-open-live-stream.pd
new file mode 100755
index 00000000..7ce60b4d
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/4-0-open-live-stream.pd
@@ -0,0 +1,24 @@
+#N canvas 286 99 571 305 10;
+#X obj 91 104 #camera;
+#X obj 40 40 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 91 12 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 91 59 metro 50;
+#X obj 91 151 #out window;
+#X text 162 103 In this case there is no need for the [#in] objec.
+Thereis one in the [#camera] object already.;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 10 -37 What is a grid?;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -73 2 Images;
+#X text 14 -59 Description: opening multiple images from one window.
+;
+#X obj 10 197 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 18 204 GridFlow 0.8.0;
+#X connect 0 0 4 0;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 0;
diff --git a/externals/gridflow/doc/tutorials/4-1-2-simple-motion-detection-absolute-value.pd b/externals/gridflow/doc/tutorials/4-1-2-simple-motion-detection-absolute-value.pd
new file mode 100755
index 00000000..a4021d41
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/4-1-2-simple-motion-detection-absolute-value.pd
@@ -0,0 +1,31 @@
+#N canvas 452 202 450 438 10;
+#X obj 91 104 #camera;
+#X obj 40 40 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 91 12 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 91 59 metro 50;
+#X obj 100 253 #out window;
+#X obj 88 134 trigger anything anything;
+#X obj 133 162 # -;
+#X obj 133 201 #clip;
+#X obj 343 223 @! abs;
+#X obj 343 254 # + 50;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 10 -37 What is a grid?;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -73 2 Images;
+#X text 14 -59 Description: opening multiple images from one window.
+;
+#X obj 8 320 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 16 327 GridFlow 0.8.0;
+#X connect 0 0 5 0;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 0;
+#X connect 5 0 6 1;
+#X connect 5 1 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 4 0;
diff --git a/externals/gridflow/doc/tutorials/4-1-3-motion-detection-more-advanced-and-more-options.pd b/externals/gridflow/doc/tutorials/4-1-3-motion-detection-more-advanced-and-more-options.pd
new file mode 100755
index 00000000..112d2f8c
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/4-1-3-motion-detection-more-advanced-and-more-options.pd
@@ -0,0 +1,49 @@
+#N canvas 476 26 450 542 10;
+#X obj 91 104 #camera;
+#X obj 248 302 #out window;
+#X obj 40 40 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X text 167 102 there is an [#in] within [#camera];
+#X obj 80 12 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 248 325 fps detailed;
+#X obj 248 351 print;
+#X obj 108 20 metro 50;
+#X obj 248 198 # -;
+#X obj 248 269 #clip;
+#X obj 248 220 @! abs;
+#X obj 248 244 # + 50;
+#X obj 164 141 trigger anything anything;
+#X text 281 197 230400 (240x320x3);
+#X obj 101 303 #rgb_to_greyscale;
+#X obj 101 326 #centroid;
+#X floatatom 154 404 5 0 0 0 - - -;
+#X floatatom 200 403 5 0 0 0 - - -;
+#X obj 85 375 display;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 10 -37 What is a grid?;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -73 2 Images;
+#X text 14 -59 Description: opening multiple images from one window.
+;
+#X obj 6 432 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 14 439 GridFlow 0.8.0;
+#X connect 0 0 12 0;
+#X connect 1 0 5 0;
+#X connect 2 0 0 0;
+#X connect 4 0 7 0;
+#X connect 5 0 6 0;
+#X connect 7 0 0 0;
+#X connect 8 0 10 0;
+#X connect 9 0 1 0;
+#X connect 9 0 14 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 8 1;
+#X connect 12 1 8 0;
+#X connect 14 0 15 0;
+#X connect 15 0 18 0;
+#X connect 15 1 16 0;
+#X connect 15 2 17 0;
diff --git a/externals/gridflow/doc/tutorials/4-1-simple-motion-detection.pd b/externals/gridflow/doc/tutorials/4-1-simple-motion-detection.pd
new file mode 100755
index 00000000..bb3962a1
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/4-1-simple-motion-detection.pd
@@ -0,0 +1,37 @@
+#N canvas 83 181 707 437 10;
+#X obj 91 104 #camera;
+#X obj 40 40 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 91 12 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 91 59 metro 50;
+#X obj 100 253 #out window;
+#X obj 40 136 trigger anything anything;
+#X obj 89 187 # -;
+#X obj 89 226 #clip;
+#X text 245 235 as a short cut you can use [t a a]. The values of one
+frame are substracted from the previous frame only keeps the difference
+and gives allows you to see the movement that occured between the first
+seconde frame in relation to the first one.;
+#X text 242 38 Motion detection is a way to view only the movement
+in a space. Movement can be detected in darkness and seen as a video
+image. the detection occurs when one frame it substractes the current
+frame froom the last frame.;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 10 -37 What is a grid?;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -73 2 Images;
+#X text 14 -59 Description: opening multiple images from one window.
+;
+#X obj 8 320 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 16 327 GridFlow 0.8.0;
+#X connect 0 0 5 0;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 0;
+#X connect 5 0 6 1;
+#X connect 5 1 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 4 0;
diff --git a/externals/gridflow/doc/tutorials/PD-GF-Lecture.pd b/externals/gridflow/doc/tutorials/PD-GF-Lecture.pd
new file mode 100755
index 00000000..1f7b6d52
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/PD-GF-Lecture.pd
@@ -0,0 +1,80 @@
+#N canvas 23 16 880 578 10;
+#X obj 5 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 5 550 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 666 549 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#X text 9 13 Welcome to Pure-Data...;
+#X obj 6 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 11 46 What is Pure-Data (aka PD)?;
+#X obj 4 233 cnv 15 430 145 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 25 271 pddp_open pure-data-1;
+#X obj 25 294 pddp_open pure-data-2;
+#X obj 25 317 pddp_open pure-data-3;
+#X obj 25 340 pddp_open pure-data-4;
+#X text 200 271 Pure-Data Introduction;
+#X text 200 294 GUI Objects for Interaction;
+#X text 200 317 Creating your first patch;
+#X text 200 340 Control: metro \, random & counter;
+#X obj 444 233 cnv 15 430 145 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X obj 5 391 cnv 15 430 145 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 25 416 pddp_open pure-data-5;
+#X obj 25 439 pddp_open pure-data-6;
+#X text 200 439 The powerful message object;
+#X obj 25 462 pddp_open pure-data-7;
+#X text 200 462 More about lists;
+#X text 200 485 Nesting collections of objects;
+#X text 200 416 Connectionless communications;
+#X obj 25 485 pddp_open pure-data-8;
+#X text 200 509 Using GUI's in abstractions;
+#X obj 25 509 pddp_open pure-data-9;
+#X obj 445 391 cnv 15 430 145 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X text 642 296 Introduction to Images;
+#X obj 468 271 pddp_open GridFlow-1;
+#X obj 468 294 pddp_open GridFlow-2;
+#X obj 468 317 pddp_open GridFlow-3;
+#X obj 468 340 pddp_open GridFlow-4;
+#X text 642 319 Introduction to video;
+#X text 642 342 Introduction to Live Feeds;
+#X obj 446 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 451 46 What is GridFLow?;
+#X text 642 457 Putting it all together;
+#X text 641 428 Interfacing with sensors;
+#X text 642 273 Introduction to Grids;
+#X obj 467 429 pddp_open GridFlow-6;
+#X obj 467 452 pddp_open GridFlow-7;
+#X text 451 236 2 Introduction to GridFlow;
+#X text 454 144 This section deals with the particular objects related
+to GridFlow. GridFlow uses the usual PD "control" objects \, as well
+as a set of GridFlow specific objects. Before we get into the tutorials
+we will explain the grid "#" \, the most important concept in GridFlow.
+;
+#X text 453 84 GridFlow is a plug-in for PureData that introduces the
+frid (#) data type into the PD environment. GridFlow allows you to
+work with live video \, still images and video files in a real-time
+environment.;
+#X text 14 85 Pure-Data is an open-source patching environment for
+multi-media (audio+image). Pure-Data is a programming language where
+you create relationships by connecting visual boxes (rather than typing
+complex commands). This lecture is separated into three sections: An
+Introduction to Pure-Data \, An introduction to GridFlow and intermediate
+PD and GridFlow.;
+#X obj 448 236 cnv 15 15 15 empty empty empty 20 12 0 14 -262144 -66577
+0;
+#X text 451 236 2 Introduction to GridFlow;
+#X obj 8 395 cnv 15 15 15 empty empty empty 20 12 0 14 -262144 -66577
+0;
+#X obj 449 395 cnv 15 15 15 empty empty empty 20 12 0 14 -262144 -66577
+0;
+#X obj 7 236 cnv 15 15 15 empty empty empty 20 12 0 14 -262144 -66577
+0;
+#X text 452 395 4 Intermediate GridFlow;
+#X text 10 236 1 Introduction to Pure-Data;
+#X text 11 395 3 Intermediate Pure-Data;
diff --git a/externals/gridflow/doc/tutorials/PD-Lecture.pd b/externals/gridflow/doc/tutorials/PD-Lecture.pd
new file mode 100755
index 00000000..e2f269c5
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/PD-Lecture.pd
@@ -0,0 +1,64 @@
+#N canvas 116 102 890 501 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 457 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 459 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#X text 12 13 Welcome to Pure-Data...;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 46 What is Pure-Data (aka PD)?;
+#X text 28 74 Pure-Data is an open-source patching environment for
+multi-media (audio+image). Pure-Data is a programming language where
+you create relationships by connecting visual boxes (rather than typing
+complex commands). This lecture is separated into three sections: An
+Introduction to Pure-Data \, An introduction to Gem and intermediate
+PD and Gem.;
+#X obj 8 176 cnv 15 430 120 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 22 198 pddp_open pure-data-1;
+#X obj 22 221 pddp_open pure-data-2;
+#X obj 22 244 pddp_open pure-data-3;
+#X obj 22 267 pddp_open pure-data-4;
+#X text 197 198 Pure-Data Introduction;
+#X text 197 221 GUI Objects for Interaction;
+#X text 197 244 Creating your first patch;
+#X text 197 267 Control: metro \, random & counter;
+#X obj 8 306 cnv 15 430 145 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 176 Introduction to Pure-Data;
+#X text 13 306 Introduction to Gem (Graphics Environment for Multimedia)
+;
+#X obj 22 328 pddp_open gem-1;
+#X obj 22 351 pddp_open gem-2;
+#X obj 22 374 pddp_open gem-3;
+#X obj 22 397 pddp_open gem-4;
+#X obj 22 421 pddp_open gem-5;
+#X text 197 328 Gem Introduction;
+#X text 197 351 What are gemchains?;
+#X text 197 374 translate \, rotate and scale;
+#X text 197 397 Texturing using pix objects;
+#X text 197 421 Video & Free Exploration;
+#X obj 448 46 cnv 15 430 145 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 46 Intermediate Pure-Data;
+#X obj 462 68 pddp_open pure-data-5;
+#X obj 462 91 pddp_open pure-data-6;
+#X text 637 91 The powerful message object;
+#X obj 462 114 pddp_open pure-data-7;
+#X text 637 114 More about lists;
+#X text 637 137 Nesting collections of objects;
+#X text 637 68 Connectionless communications;
+#X obj 462 137 pddp_open pure-data-8;
+#X text 637 161 Using GUI's in abstractions;
+#X obj 462 161 pddp_open pure-data-9;
+#X obj 448 200 cnv 15 430 95 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 637 222 Grouping Gem entities;
+#X text 637 245 Gem render order;
+#X text 453 200 Intermediate Gem;
+#X obj 462 222 pddp_open gem-6;
+#X obj 462 245 pddp_open gem-7;
+#X obj 462 268 pddp_open gem-8;
+#X text 637 268 Video Tracking & Pixel Operations;
diff --git a/externals/gridflow/doc/tutorials/colors.pd b/externals/gridflow/doc/tutorials/colors.pd
new file mode 100755
index 00000000..39582d52
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/colors.pd
@@ -0,0 +1,12 @@
+#N canvas 50 148 450 206 10;
+#X obj -10 -171 #pack 3;
+#X obj 46 -203 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -241291
+-1 -1 0 1;
+#X obj 46 -223 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -241291
+-1 -1 0 1;
+#X obj 46 -243 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -241291
+-1 -1 0 1;
+#X obj -6 -132 #color;
+#X connect 1 0 0 2;
+#X connect 2 0 0 1;
+#X connect 3 0 0 0;
diff --git a/externals/gridflow/doc/tutorials/d_gf_2_0-Intro_to_images_open_image.pd b/externals/gridflow/doc/tutorials/d_gf_2_0-Intro_to_images_open_image.pd
new file mode 100644
index 00000000..a95ac185
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/d_gf_2_0-Intro_to_images_open_image.pd
@@ -0,0 +1,62 @@
+#N canvas 0 0 887 417 10;
+#X obj 4 278 cnv 15 868 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 12 285 GridFlow 0.8.0;
+#X obj 5 -67 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 5 -106 cnv 15 868 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 5 -106 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -99 2 Introduction to Images;
+#X text 556 86 <--- click here;
+#N canvas 0 0 450 300 META 0;
+#X restore 126 285 pd META;
+#X obj 452 191 #out window;
+#X msg 452 84 open b001.jpg;
+#X obj 473 107 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X text 13 84 step 3: Add a [bang<.;
+#X text 13 105 step 4: Create a [#out window].;
+#X text 13 63 step 2: Create [#in] object.;
+#X text 14 27 step 1: create message box [open< with the file name
+and extension you want to open.;
+#X text 506 110 <--- then click here;
+#X obj 447 -67 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 450 -67 1.2 How to create a grid.;
+#X obj 447 -67 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 8 -68 2.1 Opening an image.;
+#X text 456 -66 2.1 Patch example.;
+#X obj 452 130 cnv 15 22 15 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 452 129 #in;
+#X text 12 150 Tip: In order for GridFlow to be able to find your images
+you have to specify the correct path.;
+#X obj 14 151 cnv 15 25 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 12 -33 One of the first things you need to know when working
+with GridFlow is how to open an image. GridFlow accepts several image
+formats (.jpg \, .png \, .tiff etc.).;
+#X text 12 150 Tip: In order for GridFlow to be able to find your images
+you have to specify the correct path. Gridflow has an "images" folder
+\, put them there to access them by filename only.;
+#X obj 451 38 cnv 15 25 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 450 38 Tip: Sometimes the display window opens behind the patch
+\, try moving the patch if the display seems to be missing.;
+#X text 447 -45 To view the image you must initialize the patch. This
+is done in "run mode" by clicking on the message box \, and then on
+the bang. The image will be displayed in a display window \, off to
+the side of the patch.;
+#X text 476 216 In order to close the parent window displaying your
+image \, the [#out window] object must be deleted.;
+#X obj 512 133 cnv 15 25 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 489 132 <--Tip: remember \, as with the rest of PD \, you can
+obtain information regarding specific objects by right-clicking on
+it. Try this for [#in].;
+#X connect 9 0 22 0;
+#X connect 10 0 22 0;
+#X connect 22 0 8 0;
diff --git a/externals/gridflow/doc/tutorials/d_gf_2_2_1-image-modification-1-numop-all-in-one2.pd b/externals/gridflow/doc/tutorials/d_gf_2_2_1-image-modification-1-numop-all-in-one2.pd
new file mode 100644
index 00000000..ddf83eb1
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/d_gf_2_2_1-image-modification-1-numop-all-in-one2.pd
@@ -0,0 +1,127 @@
+#N canvas 53 0 670 470 10;
+#X obj 20 -34 cnv 15 130 150 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 70 2 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 35 41 #in;
+#X msg 35 -28 open b001.jpg;
+#X obj 35 91 # +;
+#X obj 21 231 cnv 15 185 150 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 29 313 #in;
+#X msg 29 239 open b001.jpg;
+#X obj 96 323 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 4300 1;
+#X obj 29 349 # + \$1;
+#X obj 54 287 metro 33.3;
+#X obj 54 265 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 82 64 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 82 42 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 83 86 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X msg 82 64 67;
+#X msg 82 42 2;
+#X msg 83 86 199;
+#X floatatom 93 349 5 0 0 0 - - -;
+#X text 21 -501 Numeric Operators (numop): transform an image or video
+by applying a mathematical operation to each pixel value in the grid.
+;
+#X obj 21 -522 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 23 -678 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 18 606 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 27 614 GridFlow 0.8.0;
+#X obj 339 -267 cnv 15 130 150 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 404 -228 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 358 -199 #in;
+#X msg 358 -260 open b001.jpg;
+#X obj 378 -171 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 20 -352 cnv 15 50 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 23 -86 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 26 -87 Example #2 demonstrates how to send the numop an argument
+using a message box. This method allows you to send the numop several
+different arguments.;
+#X text 35 -671 2.4 Image manipulation;
+#X text 57 -523 2.4.1 Numop;
+#X text 25 -445 To transform a grid (in this case an image) using numop
+\, it must first be given an argument (a number value). That value
+will be applied by numop to every value in the grid. The following
+examples show you the three methods that can be used to give the numop
+an argument.;
+#X obj 35 121 s to_out_window;
+#X obj 358 -142 s to_out_window;
+#X obj 29 382 s to_out_window;
+#X obj 246 546 r to_out_window;
+#X msg 498 547 close;
+#X msg 393 544 open window;
+#X obj 30 -294 cnv 15 200 180 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 161 -215 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 199 -318 display;
+#X msg 79 -282 1 2 3 4 5 6 7 8 9;
+#X obj 79 -253 #import (3 3);
+#X obj 179 -479 display;
+#X obj 140 -215 # + 42;
+#X obj 358 -171 # + 42;
+#X text 337 -288 Here is an example with an image.;
+#X text 19 -352 Example 1: shows how values in a grid are altered when
+an argument is placed directly into the numeric operator object.;
+#X text 157 63 1 click on the argument;
+#X text 124 6 2 click on the bang to see the updated image;
+#X text 94 8 <--;
+#X text 116 42 <--;
+#X text 116 65 <--;
+#X text 116 87 <--;
+#X text 194 -221 <-- argument in this case is 42;
+#X obj 353 581 #out window;
+#X text 22 433 In all these examples the [# +] numop is used. All the
+numeric operators can be found in the numeric operator help patch (right
+click on the [# +] and select help to view them). If you want to see
+what effects other numops can do \, try replacing the [# +] numop with
+another one (either cut and paste a different numop from the help file
+or create the object in the current canvas.;
+#X obj 20 181 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 26 179 Example #3 using the slider and metro.;
+#X text 467 -617 split into 3 patches using ben's switch arrange canvases
+and colors;
+#X text 24 -635 GridFlow performs high level grid processing \; in
+other words its main function is the manipulation of images and video.
+The numeric operators is one of the most common ways to modify an image.
+;
+#X connect 1 0 2 0;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 4 0 35 0;
+#X connect 6 0 9 0;
+#X connect 7 0 6 0;
+#X connect 8 0 9 1;
+#X connect 8 0 18 0;
+#X connect 9 0 37 0;
+#X connect 10 0 6 0;
+#X connect 11 0 10 0;
+#X connect 15 0 4 1;
+#X connect 16 0 4 1;
+#X connect 17 0 4 1;
+#X connect 25 0 26 0;
+#X connect 26 0 48 0;
+#X connect 27 0 26 0;
+#X connect 38 0 58 0;
+#X connect 39 0 58 0;
+#X connect 40 0 58 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 45 0 47 0;
+#X connect 47 0 43 0;
+#X connect 48 0 36 0;
diff --git a/externals/gridflow/doc/tutorials/d_gf_2_2_2.pd b/externals/gridflow/doc/tutorials/d_gf_2_2_2.pd
new file mode 100644
index 00000000..a918d620
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/d_gf_2_2_2.pd
@@ -0,0 +1,68 @@
+#N canvas 38 0 687 415 10;
+#X obj 31 -223 cnv 15 243 358 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 39 -141 #in;
+#X msg 39 -215 open b001.jpg;
+#X obj 79 -132 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 39 -18 # + \$1;
+#X obj 62 -189 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+;
+#X obj 69 76 #clip;
+#X obj 28 -322 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 62 -167 metro 33.3;
+#X obj 94 -99 #color;
+#X obj 23 -678 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 36 168 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 44 175 GridFlow 0.8.0;
+#X obj 39 108 #out window;
+#X text 35 -671 2.2 Image manipulation \, colour wrapping;
+#X obj 12 -518 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 18 -519 Example #1 colour wrapping;
+#X msg 74 -491 240 0 0;
+#X obj 179 -368 display;
+#X obj 74 -457 # + 20;
+#X obj 178 -423 #cast uint8;
+#X obj 23 -368 display;
+#X text 274 -429 <-- This transforms the grid into 8 bit values \,
+that corresponds to the way that images are usually shown in images
+and video;
+#X text 42 -323 Example #2 clipping the values;
+#X text 10 -545 Tip: Refer to glossary for more information on colour.
+;
+#X text 215 -132 <-- add value to all channels at once;
+#X obj 39 37 shunt;
+#X obj 69 11 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X text 93 12 <-- switch to see clip's effect;
+#X text 96 38 <-- directs the flow of data;
+#X text 7 -643 When an image is represented as a grid every pixel value
+will vary between 0 and 255 Color wrapping occurs when the result of
+the operation on the pixel value would be higher than 255 Values above
+255 are counted from 0 For example: if a pixel has a red value of 240
+and 20 is added to it \, you get 5 instead of displaying 260 (240 +
+20 - 255 = 5);
+#X text 450 -583 aks matju to fix bug in [display]'s display;
+#X text 32 -301 The [#clip] object is used with numops in order to
+set an lower and upper range to pixel values in order to eliminate
+color wrapping (those nifty 60s effects).;
+#X text 288 -70 <-- drag to add value to specific channel;
+#X text 163 -206 remember to load the image and strat the metro;
+#X connect 1 0 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 1;
+#X connect 4 0 26 0;
+#X connect 5 0 8 0;
+#X connect 6 0 13 0;
+#X connect 8 0 1 0;
+#X connect 9 0 4 1;
+#X connect 17 0 19 0;
+#X connect 19 0 20 0;
+#X connect 19 0 21 0;
+#X connect 20 0 18 0;
+#X connect 26 0 13 0;
+#X connect 26 1 6 0;
+#X connect 27 0 26 1;
diff --git a/externals/gridflow/doc/tutorials/gf_1_0-Introduction_to_grids.pd b/externals/gridflow/doc/tutorials/gf_1_0-Introduction_to_grids.pd
new file mode 100755
index 00000000..fb78a496
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/gf_1_0-Introduction_to_grids.pd
@@ -0,0 +1,98 @@
+#N canvas 0 207 762 514 10;
+#X obj 470 287 display;
+#X obj 7 6 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 7 -29 cnv 15 970 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 7 -29 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 12 661 cnv 15 970 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 20 668 GridFlow 0.8.0;
+#X text 10 6 1.1 What is a grid?;
+#X text 12 -22 1 Introduction to Grids;
+#X text 10 333 GridFlow can create a grid from a list of numbers. The
+[#import] object permits you to set the desired amount of rows and
+columns. A message box permits you to tell the grid which numbers to
+display.;
+#X msg 473 429 3 3 # 6 1 3 6 3 324 6 3 4;
+#X msg 550 169 reset;
+#X msg 494 475 3 3 # 1 0 0 0;
+#X obj 474 572 display;
+#X obj 9 307 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 12 307 1.2 How to create a grid.;
+#X obj 9 307 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 13 307 1.2 How to create a grid using the [#import] object.
+;
+#X text 10 427 1 - Create a list of numbers using a message box. The
+numbers must be seperated by a space. The list can have as many numbers
+as you want but only the amount defined by [#import] will be displayed.
+As you click on the message box the numbers will appear in the grid.
+The numbers are positioned in the grid from left to right and from
+the top to the bottom.;
+#X text 12 605 3 - Connect the objects to a [display] object or a [print]
+object to see the resulting grid. You don't have to "see" the grid
+in order to manipulate it.;
+#X text 558 306 display object;
+#N canvas 0 0 450 300 META 0;
+#X restore 921 616 pd META;
+#X obj 457 6 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 460 6 1.2 How to create a grid.;
+#X obj 457 6 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 663 43 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X obj 469 238 cnv 15 92 15 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 469 237 #import (3 3);
+#X obj 473 520 cnv 15 37 15 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 473 519 # + 0;
+#X text 8 267 The following examples illustrate how grids are interpreted
+and represented in GridFlow.;
+#X text 3 402 Steps for creating a grid:;
+#X text 11 537 2 - Create the [#import] object and indicate the parameters
+you want as grid dimensions. By indicating 3 3 in brackets following
+[#import] \, you are creating a grid that has 3 rows and 3 columns.
+This 3 by 3 grid will display 9 numbers.;
+#X text 518 516 works like the [#import] object but allows you to put
+your grid parameters and values into one message box;
+#X text 10 29 A grid is composed of rows and columns that contain numeric
+data. For instance \, a checkerboard is a grid that consists in a series
+of rows and columns containing information: a dark square or a light
+square.;
+#X text 10 91 Computers interpret images as three-dimentional grids:
+the rows (height) and columns (width) contain pixel positions. There
+are usually three channels (depth) of rows and columns. Channels are
+the colours that make up an image. Each channel is a single colour
+\, usually red \, green and blue (RGB). Videos are also interpreted
+as grids since they are a series of still images.;
+#X text 9 194 Because GridFlow uses grids \, images and videos are
+represented as such. GridFlow objects that accept or produce grids
+are identified by the number sign "#" (think of that symbol as a mini
+grid). From now on we will refer to images and videos as grids.;
+#X msg 469 44 1 2 3 4 5 6 7 8 9;
+#X msg 537 107 1 2 3 4;
+#X text 466 6 1.2 Patch example.;
+#X text 471 405 Other objects can create grids...;
+#X text 601 42 <-- step 1: click here to view the numbers from the
+list in a grid.;
+#X text 601 104 <-- click here three times to see how import only outputs
+a grid once it recieves the number of values iassociated with its dimensions
+;
+#X text 602 169 <-- resets the grid to only display the numbers from
+the list;
+#X obj 634 236 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X text 572 236 <-- step 2: This object creates a grid that is 3 rows
+by 3 columns;
+#X connect 9 0 28 0;
+#X connect 10 0 26 0;
+#X connect 11 0 28 0;
+#X connect 26 0 0 0;
+#X connect 28 0 12 0;
+#X connect 36 0 26 0;
+#X connect 37 0 26 0;
diff --git a/externals/gridflow/doc/tutorials/gf_2-2-3-resize-image_dec_2005.pd b/externals/gridflow/doc/tutorials/gf_2-2-3-resize-image_dec_2005.pd
new file mode 100644
index 00000000..02cf9166
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/gf_2-2-3-resize-image_dec_2005.pd
@@ -0,0 +1,60 @@
+#N canvas 127 0 672 603 10;
+#X obj 22 160 metro 10;
+#X obj 22 118 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X floatatom 80 298 5 1 4 0 - - -;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 26 478 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 34 485 GridFlow 0.8.0;
+#X obj 22 438 #out window;
+#X obj 59 248 #in;
+#X msg 59 225 load bluemarble.jpg;
+#X obj 80 387 #pack 2;
+#X floatatom 124 369 5 1 4 0 - - -;
+#X obj 22 272 #store;
+#X text 21 -67 2.4 Image manipulation;
+#X text 46 -37 2.4.1 Resizing an image;
+#X obj 22 272 #store;
+#X obj 59 202 loadbang;
+#N canvas 0 0 450 300 META 0;
+#X restore 154 484 pd META;
+#X obj 274 226 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X obj 23 414 cnv 15 63 15 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 113 118 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X text 49 117 <-- step #2 : start the metro;
+#X obj 22 413 #scale_by;
+#X obj 468 344 cnv 15 15 15 empty empty empty 20 12 0 14 -259603 -66577
+0;
+#X obj 165 379 cnv 15 152 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 167 365 changing this number permits you to change the image's
+horizontal parameters.;
+#X text 404 344 <-- step #3 : change the parameters;
+#X text 11 -10 [#scale_by] resizes grids by multiplying its parameters
+(width and height). To resize an image proportionatily a specific scaleing
+size must appylied \, ex: [#scale_by 4].;
+#X text 11 31 [# pack] lets you resize grids by altering the vertical
+and horizontal parameters.;
+#X text 88 157 the metro refreshes the display window so you don't
+have to reload the grid every time it's altered.;
+#X text 210 225 <-- step #1 : load the image;
+#X text 132 295 changing this number changes the grid's vertical parameters.
+(a slider can be connected to [#pack] instead of a number box.;
+#X connect 0 0 12 0;
+#X connect 0 0 15 0;
+#X connect 1 0 0 0;
+#X connect 2 0 10 0;
+#X connect 8 0 12 1;
+#X connect 8 0 15 1;
+#X connect 9 0 8 0;
+#X connect 10 0 22 1;
+#X connect 11 0 10 1;
+#X connect 15 0 22 0;
+#X connect 16 0 9 0;
diff --git a/externals/gridflow/doc/tutorials/gf_2-2-4-greyscale_dec_2005.pd b/externals/gridflow/doc/tutorials/gf_2-2-4-greyscale_dec_2005.pd
new file mode 100644
index 00000000..cbb11af1
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/gf_2-2-4-greyscale_dec_2005.pd
@@ -0,0 +1,27 @@
+#N canvas 183 58 542 460 10;
+#X obj 21 207 #rgb_to_greyscale;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 320 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 16 327 GridFlow 0.8.0;
+#X obj 21 178 #in;
+#X text 21 -67 2.4 Image manipulation;
+#X text 48 -37 2.4.2 Greyscale;
+#N canvas 0 0 450 300 META 0;
+#X restore 147 327 pd META;
+#X text 149 242 This patch and other image modifications can be can
+be found in the gridflow help files.;
+#X text 159 102 insert your own images to convert it to greyscale.
+click on the message to load image.;
+#X text 19 4 To convert an image to greyscale use [#rgb_to_greyscale].
+It transforms colour information into a black to white gradient.;
+#X obj 33 157 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 21 135 open bluemarble.jpg;
+#X obj 21 282 #out window;
+#X connect 5 0 0 0;
+#X connect 12 0 5 0;
+#X connect 13 0 5 0;
diff --git a/externals/gridflow/doc/tutorials/gf_2_0-Intro_to_images_open_image.pd b/externals/gridflow/doc/tutorials/gf_2_0-Intro_to_images_open_image.pd
new file mode 100755
index 00000000..ea6aa98d
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/gf_2_0-Intro_to_images_open_image.pd
@@ -0,0 +1,62 @@
+#N canvas 0 0 894 417 10;
+#X obj 4 278 cnv 15 868 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 12 285 GridFlow 0.8.0;
+#X obj 5 -67 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 5 -106 cnv 15 868 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 5 -106 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -99 2 Introduction to Images;
+#X text 556 86 <--- click here;
+#N canvas 0 0 450 300 META 0;
+#X restore 126 285 pd META;
+#X obj 452 191 #out window;
+#X msg 452 84 open b001.jpg;
+#X obj 473 107 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X text 13 84 step 3: Add a [bang<.;
+#X text 13 105 step 4: Create a [#out window].;
+#X text 13 63 step 2: Create [#in] object.;
+#X text 14 27 step 1: create message box [open< with the file name
+and extension you want to open.;
+#X text 506 110 <--- then click here;
+#X obj 447 -67 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 450 -67 1.2 How to create a grid.;
+#X obj 447 -67 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 8 -68 2.1 Opening an image.;
+#X text 456 -66 2.1 Patch example.;
+#X obj 452 130 cnv 15 22 15 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 452 129 #in;
+#X text 12 150 Tip: In order for GridFlow to be able to find your images
+you have to specify the correct path.;
+#X obj 14 151 cnv 15 25 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 12 -33 One of the first things you need to know when working
+with GridFlow is how to open an image. GridFlow accepts several image
+formats (.jpg \, .png \, .tiff etc.).;
+#X text 12 150 Tip: In order for GridFlow to be able to find your images
+you have to specify the correct path. Gridflow has an "images" folder
+\, put them there to access them by filename only.;
+#X obj 451 38 cnv 15 25 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 450 38 Tip: Sometimes the display window opens behind the patch
+\, try moving the patch if the display seems to be missing.;
+#X text 447 -45 To view the image you must initialize the patch. This
+is done in "run mode" by clicking on the message box \, and then on
+the bang. The image will be displayed in a display window \, off to
+the side of the patch.;
+#X text 476 216 In order to close the parent window displaying your
+image \, the [#out window] object must be deleted.;
+#X obj 512 133 cnv 15 25 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 489 132 <--Tip: remember \, as with the rest of PD \, you can
+obtain information regarding specific objects by right-clicking on
+it. Try this for [#in].;
+#X connect 9 0 22 0;
+#X connect 10 0 22 0;
+#X connect 22 0 8 0;
diff --git a/externals/gridflow/doc/tutorials/gf_2_2_1-image-modification-1-numop-all-in-one2.pd b/externals/gridflow/doc/tutorials/gf_2_2_1-image-modification-1-numop-all-in-one2.pd
new file mode 100755
index 00000000..cc1d1902
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/gf_2_2_1-image-modification-1-numop-all-in-one2.pd
@@ -0,0 +1,127 @@
+#N canvas 53 0 670 470 10;
+#X obj 20 -34 cnv 15 130 150 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 70 2 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 35 41 #in;
+#X msg 35 -28 open b001.jpg;
+#X obj 35 91 # +;
+#X obj 21 231 cnv 15 185 150 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 29 313 #in;
+#X msg 29 239 open b001.jpg;
+#X obj 96 323 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 4300 1;
+#X obj 29 349 # + \$1;
+#X obj 54 287 metro 33.3;
+#X obj 54 265 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 82 64 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 82 42 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 83 86 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X msg 82 64 67;
+#X msg 82 42 2;
+#X msg 83 86 199;
+#X floatatom 93 349 5 0 0 0 - - -;
+#X text 21 -501 Numeric Operators (numop): transform an image or video
+by applying a mathematical operation to each pixel value in the grid.
+;
+#X obj 21 -522 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 23 -678 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 18 606 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 27 614 GridFlow 0.8.0;
+#X obj 339 -267 cnv 15 130 150 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 404 -228 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 358 -199 #in;
+#X msg 358 -260 open b001.jpg;
+#X obj 378 -171 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 20 -352 cnv 15 50 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 23 -86 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 26 -87 Example #2 demonstrates how to send the numop an argument
+using a message box. This method allows you to send the numop several
+different arguments.;
+#X text 35 -671 2.4 Image manipulation;
+#X text 57 -523 2.4.1 Numop;
+#X text 25 -445 To transform a grid (in this case an image) using numop
+\, it must first be given an argument (a number value). That value
+will be applied by numop to every value in the grid. The following
+examples show you the three methods that can be used to give the numop
+an argument.;
+#X obj 35 121 s to_out_window;
+#X obj 358 -142 s to_out_window;
+#X obj 29 382 s to_out_window;
+#X obj 246 546 r to_out_window;
+#X msg 498 547 close;
+#X msg 393 544 open window;
+#X obj 30 -294 cnv 15 200 180 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 161 -215 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 199 -318 display;
+#X msg 79 -282 1 2 3 4 5 6 7 8 9;
+#X obj 79 -253 #import (3 3);
+#X obj 179 -479 display;
+#X obj 140 -215 # + 42;
+#X obj 358 -171 # + 42;
+#X text 337 -288 Here is an example with an image.;
+#X text 19 -352 Example 1: shows how values in a grid are altered when
+an argument is placed directly into the numeric operator object.;
+#X text 157 63 1 click on the argument;
+#X text 124 6 2 click on the bang to see the updated image;
+#X text 94 8 <--;
+#X text 116 42 <--;
+#X text 116 65 <--;
+#X text 116 87 <--;
+#X text 194 -221 <-- argument in this case is 42;
+#X obj 353 581 #out window;
+#X text 22 433 In all these examples the [# +] numop is used. All the
+numeric operators can be found in the numeric operator help patch (right
+click on the [# +] and select help to view them). If you want to see
+what effects other numops can do \, try replacing the [# +] numop with
+another one (either cut and paste a different numop from the help file
+or create the object in the current canvas.;
+#X obj 20 181 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 26 179 Example #3 using the slider and metro.;
+#X text 467 -617 split into 3 patches using ben's switch arrange canvases
+and colors;
+#X text 24 -635 GridFlow performs high level grid processing \; in
+other words its main function is the manipulation of images and video.
+There are several ways to modify images \, one of the most common is
+the numeric operators.;
+#X connect 1 0 2 0;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 4 0 35 0;
+#X connect 6 0 9 0;
+#X connect 7 0 6 0;
+#X connect 8 0 9 1;
+#X connect 8 0 18 0;
+#X connect 9 0 37 0;
+#X connect 10 0 6 0;
+#X connect 11 0 10 0;
+#X connect 15 0 4 1;
+#X connect 16 0 4 1;
+#X connect 17 0 4 1;
+#X connect 25 0 26 0;
+#X connect 26 0 48 0;
+#X connect 27 0 26 0;
+#X connect 38 0 58 0;
+#X connect 39 0 58 0;
+#X connect 40 0 58 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 45 0 47 0;
+#X connect 47 0 43 0;
+#X connect 48 0 36 0;
diff --git a/externals/gridflow/doc/tutorials/gf_2_2_2.pd b/externals/gridflow/doc/tutorials/gf_2_2_2.pd
new file mode 100644
index 00000000..2728c61c
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/gf_2_2_2.pd
@@ -0,0 +1,68 @@
+#N canvas 38 0 687 415 10;
+#X obj 31 -223 cnv 15 243 358 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 39 -141 #in;
+#X msg 39 -215 open b001.jpg;
+#X obj 79 -132 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 39 -18 # + \$1;
+#X obj 62 -189 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+;
+#X obj 69 76 #clip;
+#X obj 28 -322 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 62 -167 metro 33.3;
+#X obj 94 -99 #color;
+#X obj 23 -678 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 36 168 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 44 175 GridFlow 0.8.0;
+#X obj 39 108 #out window;
+#X text 35 -671 2.2 Image manipulation \, colour wrapping;
+#X obj 12 -518 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 18 -519 Example #1 colour wrapping;
+#X msg 74 -491 240 0 0;
+#X obj 179 -368 display;
+#X obj 74 -457 # + 20;
+#X obj 178 -423 #cast uint8;
+#X obj 23 -368 display;
+#X text 274 -429 <-- This transforms the grid into 8 bit values \,
+that corresponds to the way that images are usually shown in images
+and video;
+#X text 42 -323 Example #2 clipping the values;
+#X text 10 -545 Tip: Refer to glossary for more information on colour.
+;
+#X text 215 -132 <-- add value to all channels at once;
+#X obj 39 37 shunt;
+#X obj 69 11 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X text 93 12 <-- switch to see clip's effect;
+#X text 96 38 <-- directs the flow of data;
+#X text 7 -643 When an image is represented as a grid every pixel value
+will vary between 0 and 255 Color wrapping occurs when the result of
+the operation on the pixel value would be higher than 255 Values above
+255 are counted from 0 For example: if a pixel has a red value of 240
+and 20 is added to it \, you get 5 instead of displaying 260 (240 +
+20 - 255 = 5);
+#X text 451 -583 aks matju to fix bug in [display]'s display;
+#X text 32 -301 The [#clip] object is used with numops in order to
+set an lower and upper range to pixel values in order to eliminate
+color wrapping (those nifty 60s effects).;
+#X text 288 -70 <-- drag to add value to specific channel;
+#X text 163 -206 remember to load the image and strat the metro;
+#X connect 1 0 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 1;
+#X connect 4 0 26 0;
+#X connect 5 0 8 0;
+#X connect 6 0 13 0;
+#X connect 8 0 1 0;
+#X connect 9 0 4 1;
+#X connect 17 0 19 0;
+#X connect 19 0 20 0;
+#X connect 19 0 21 0;
+#X connect 20 0 18 0;
+#X connect 26 0 13 0;
+#X connect 26 1 6 0;
+#X connect 27 0 26 1;
diff --git a/externals/gridflow/doc/tutorials/grid-intro.pd b/externals/gridflow/doc/tutorials/grid-intro.pd
new file mode 100755
index 00000000..e3aa53b8
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/grid-intro.pd
@@ -0,0 +1,10 @@
+#N canvas 0 0 476 213 10;
+#X text 29 30 GridFlow is a plug-in for PureData that introduces the
+frid (#) data type into the PD environment. GridFlow allows you to
+work with live video \, still images and video files in a rel-time
+environment.;
+#X text 32 97 This section deals with the particular objects related
+to GridFlow. GridFlow uses the usual PD "control" objects \, as well
+as a set of GridFlow specific objects. Before we get into the tutorials
+we will explain the grid "#" \, the most important concept in GridFlow.
+;
diff --git a/externals/gridflow/doc/tutorials/probably_not_good_2-3-0-1-image-modification-1-numop-all-in-one.pd b/externals/gridflow/doc/tutorials/probably_not_good_2-3-0-1-image-modification-1-numop-all-in-one.pd
new file mode 100755
index 00000000..a743e82d
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/probably_not_good_2-3-0-1-image-modification-1-numop-all-in-one.pd
@@ -0,0 +1,123 @@
+#N canvas 0 0 977 630 10;
+#X obj 17 -114 #out window;
+#X obj 43 -174 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 17 -143 #in;
+#X msg 17 -205 open b001.jpg;
+#X obj 507 -245 cnv 15 185 150 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 529 -205 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 515 -166 #in;
+#X msg 515 -238 open b001.jpg;
+#X obj 555 -167 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 515 -110 s slider;
+#X obj 515 -138 # + 1;
+#X text 11 -499 Numeric Operators (numop): transform an image or video
+by applying a mathematical operation to each pixel value in the grid.
+;
+#X text 12 -445 To transform a grid (in this case an image) using numop
+\, it must first be given an argument (a number value) in order to
+affect a pixel value. The examples here show you the three methods
+that can be used to give the numop an argument.;
+#X obj 3 -643 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 3 -678 cnv 15 970 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 10 -618 GridFlow performs high level grid processing \; in
+other words its main function is the manipulation of images and video.
+There are several ways to madify images in GridFlow \, some are very
+basic while others are more advanced (and are saved for the intermediate
+tutorials.) In this section we will introduce some very basic functions
+of the numeric operator \, one of the most common methods used for
+image transformation.;
+#X obj 155 -220 cnv 15 130 150 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 220 -181 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 174 -152 #in;
+#X msg 174 -213 open b001.jpg;
+#X obj 199 -124 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 174 -124 # + 109;
+#X obj 174 -95 s argument;
+#X text 235 -125 <--- argument in this case is 109;
+#X obj 13 -273 + 1;
+#X floatatom 13 -297 5 0 0 0 - - -;
+#X floatatom 13 -249 5 0 0 0 - - -;
+#X text 54 -282 this is a basic numop. GridFlow has its own set of
+numops that are applied to grids \, 3 dimensions \, on each channel.
+;
+#X obj 14 -357 cnv 15 70 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 11 -672 2.4 Image manipulation;
+#X text 11 -644 2.4.3 Numop;
+#X obj 500 -559 cnv 15 130 150 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 550 -523 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 515 -484 #in;
+#X msg 515 -553 open b001.jpg;
+#X obj 515 -434 # +;
+#X obj 515 -404 s message;
+#X obj 562 -461 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 562 -483 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X obj 563 -439 cnv 15 25 17 empty empty empty 20 12 0 14 -241291 -66577
+0;
+#X msg 562 -461 67;
+#X msg 562 -483 2;
+#X msg 563 -439 199;
+#X text 596 -461 <--- messages used as arguments;
+#X text 596 -486 <---;
+#X text 596 -438 <---;
+#X obj 764 -116 r argument;
+#X obj 891 -91 #out window;
+#X obj 842 -115 r message;
+#X obj 911 -115 r slider;
+#X obj 3 -67 cnv 15 970 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 14 -57 GridFlow 0.8.0;
+#N canvas 0 0 450 300 META 0;
+#X restore 919 -60 pd META;
+#X text 13 -357 Example #1;
+#X text 12 -338 Shows you how to put an argument directly into the
+numeric operator object.;
+#X obj 507 -320 cnv 15 70 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X obj 497 -629 cnv 15 70 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#X text 496 -628 Example #2;
+#X text 506 -320 Example #3;
+#X text 497 -608 Demonstrates how to send the numop an argument using
+a message box. This method allows you to send the numop several different
+arguments.;
+#X text 507 -299 Introduces the use of the slider as a method to give
+the numop an argument. The slider allows you to easily scroll through
+a series of values.;
+#X connect 1 0 2 0;
+#X connect 2 0 0 0;
+#X connect 3 0 2 0;
+#X connect 5 0 6 0;
+#X connect 6 0 10 0;
+#X connect 7 0 6 0;
+#X connect 8 0 10 1;
+#X connect 10 0 9 0;
+#X connect 17 0 18 0;
+#X connect 18 0 21 0;
+#X connect 19 0 18 0;
+#X connect 21 0 22 0;
+#X connect 24 0 26 0;
+#X connect 25 0 24 0;
+#X connect 32 0 33 0;
+#X connect 33 0 35 0;
+#X connect 34 0 33 0;
+#X connect 35 0 36 0;
+#X connect 40 0 35 1;
+#X connect 41 0 35 1;
+#X connect 42 0 35 1;
+#X connect 46 0 47 0;
+#X connect 48 0 47 0;
+#X connect 49 0 47 0;
diff --git a/externals/gridflow/doc/tutorials/probably_not_good_2-3-0-2.pd b/externals/gridflow/doc/tutorials/probably_not_good_2-3-0-2.pd
new file mode 100644
index 00000000..18625731
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/probably_not_good_2-3-0-2.pd
@@ -0,0 +1,61 @@
+#N canvas 58 0 665 421 10;
+#X obj 29 -473 cnv 15 185 190 empty empty empty 20 12 0 14 -228992
+-66577 0;
+#X obj 37 -391 #in;
+#X msg 37 -465 open b001.jpg;
+#X obj 77 -382 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 37 -359 # + \$1;
+#X obj 60 -439 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+;
+#X obj 37 -315 #clip;
+#X obj 27 -634 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 60 -417 metro 33.3;
+#X obj 278 -430 #pack 3;
+#X obj 326 -455 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 326 -475 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 326 -495 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 286 -391 #color;
+#X msg 269 -301 255 0 0;
+#X text 336 -304 donner une liste changer couleurs;
+#X obj 234 -245 #scale_by (8 8);
+#X msg 235 -265 2 2 3 # 255 0 0 0 255 0 0 0 255 191 191 191;
+#X obj 37 -273 s to_out_window;
+#X text 29 -633 Example #4 the [#clip] object is used with numops in
+order to set constraints on pixels to eliminate color wrapping. Colour
+wrapping occurs when the individual pixel values in a grid exceed 255
+which results in of colour. GridFlow reads colours as values from 0
+(black) to 255 (white). Refer to glossary for more information on colour.
+;
+#X obj 23 -678 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 35 -671 2.4 Image manipulation;
+#X obj 25 -102 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 34 -94 GridFlow 0.8.0;
+#X obj 253 -162 r to_out_window;
+#X msg 505 -161 close;
+#X msg 400 -164 open window;
+#X obj 360 -127 #out window;
+#X connect 1 0 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 4 1;
+#X connect 4 0 6 0;
+#X connect 5 0 8 0;
+#X connect 6 0 18 0;
+#X connect 8 0 1 0;
+#X connect 9 0 4 1;
+#X connect 10 0 9 2;
+#X connect 11 0 9 1;
+#X connect 12 0 9 0;
+#X connect 13 0 4 1;
+#X connect 14 0 4 1;
+#X connect 16 0 4 1;
+#X connect 17 0 16 0;
+#X connect 24 0 27 0;
+#X connect 25 0 27 0;
+#X connect 26 0 27 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-1.pd b/externals/gridflow/doc/tutorials/pure-data-1.pd
new file mode 100755
index 00000000..7be2a91a
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-1.pd
@@ -0,0 +1,71 @@
+#N canvas 221 110 894 498 10;
+#N canvas 0 22 450 300 this 0;
+#X obj 192 128 inlet;
+#X obj 192 171 outlet;
+#X text 8 7 If you're looking at this you're just going to confuse
+yourself!;
+#X connect 0 0 1 0;
+#X restore 499 380 pd this is an object;
+#X text 509 358 <- This is a connection;
+#X msg 499 319 10;
+#X text 13 348 Objects are like filters \, they change the way messages
+flow through them.;
+#X text 13 153 You can think of a patch as plumbing. The way water
+flows through the plumbing of your house \, messages flow through the
+connections in your patch. Objects change the flow of the messages
+to allow different things to happen. Messages always go into objects
+at the top \, called the inlet \, and always come out at the bottom
+\, called the outlet. In PD messages flow from top to bottom.;
+#X text 458 236 This is a very simple example of a patch \, the message
+"10" can be sent through the "pd this is an object" and can be seen
+being passed out the outlet.;
+#X floatatom 499 416 5 0 0 0 - - -;
+#X text 539 415 <- This number box shows the float message;
+#X text 553 334 and watch the output!;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 252 You can work with PD in two ways \, the first is in
+"edit mode". Edit-mode is where you create your patch by adding objects
+and the connections between them. "Run mode" is when you're done with
+the construction of your patch \, and you wish to send messages through
+it. In run-mode your cursor is an arrow (as it is right now since we
+are in run-mode) \, in edit-mode your cursor is a pointing hand.;
+#X text 458 136 Messages are what allow objects to communicate with
+one and other. Messages can change the way an object acts \, and/or
+express the work the object is doing. Messages come in different types.
+They can contain words \, numbers and groups of these. The main types
+of messages we will be dealing with are floats (numbers). You can click
+on a message \, when in run-mode \, to send it through your patch.
+;
+#X obj 448 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 448 290 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 8 447 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 449 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#X text 12 20 DESCRIPTION: What is a patch? An object? A message?;
+#N canvas 0 22 466 316 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: metaphor object message GUI introduction;
+#X restore 16 453 pd META;
+#X text 457 67 GUI objects allow you to interact with your PD patch
+as it is running. They allow you to change what your patch is doing
+without reconnecting the objects. The simplest GUI object is the "Message"
+that simply contains a message you want to send in your patch.;
+#X text 453 290 A patch that connects a GUI to an object to a second
+GUI.;
+#X text 531 320 <- This GUI sends a float message (click on it);
+#X text 13 66 When working with PD you are dealing primarily with objects
+\, GUI (Graphical User Interface) objects \, connections and messages.
+These are the building blocks of PD programming. When you connect objects
+\, GUI objects \, and messages you are creating a "patch". Patching
+is making something complex out of smaller building blocks.;
+#X text 13 46 The "patch" \, "objects" and "connections";
+#X text 453 46 "GUI objects" and "messages";
+#X text 12 8 1 Introduction to Pure-Data & its Metaphors;
+#X connect 0 0 6 0;
+#X connect 2 0 0 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-2.pd b/externals/gridflow/doc/tutorials/pure-data-2.pd
new file mode 100755
index 00000000..151af26f
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-2.pd
@@ -0,0 +1,73 @@
+#N canvas 197 100 899 548 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 448 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 8 497 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 499 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 470 320 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: GUI slider toggle number message introduction
+;
+#X restore 16 503 pd META;
+#X text 12 20 DESCRIPTION: Message \, slider \, toggle \, bang and
+number;
+#X msg 93 145 hello world;
+#X obj 93 168 print;
+#X text 181 146 <- Click on this message;
+#X text 18 74 Messages control the behavior of objects and it is the
+objects that change what a patch does. The first object we're going
+to learn is "print". All "print" does is print out the messages you
+send it to the terminal:;
+#X text 19 197 TIP: If you forget what an object does you can always
+double-click (on a mac) or right-click (on a PC) and then choose "help".
+;
+#X text 19 250 In this tutorial we will use two different types of
+objects: "objects" (of which "print" is an example) and GUI objects
+\, (of which "message" is an example). GUI objects allow you to interact
+with your patch \, control PD and change parameters of objects. We
+are going to learn four types of GUI objects (but there are many more):
+Slider \, Toggle \, Bang \, and Number.;
+#X obj 76 355 hsl 300 30 0 127 0 0 empty empty This_is_a_HSlider_(Horizontal)
+10 15 1 10 -262144 -1 -1 0 1;
+#X obj 73 393 print;
+#X text 21 421 This "hslider" is connected to the print object. This
+way we can see what messages the "hslider" sends. Try clicking and
+dragging in the Slider. You can change the scale (and other properties)
+of some GUI Objects by double-clicking (mac) or right-clicking (pc)
+and choosing "properties".;
+#X text 13 46 The "message" and "hslider" GUI Objects:;
+#X text 453 46 "toggle" \, "bang" \, "number";
+#X obj 519 176 tgl 30 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 629 176 bng 30 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 629 210 print Bang;
+#X obj 519 210 print Toggle;
+#X obj 739 210 print Number;
+#X floatatom 739 192 5 0 0 0 - - -;
+#X text 466 76 "slider" \, "toggle" and "number" all send messages
+made up of floats (numbers). "bang" is a special case and it only sends
+the message "bang". Below we're using an argument to the print object
+that tags each message sent to the terminal. This way when we have
+multiple "print" objects in one patch we can differenciate thier output.
+;
+#X text 465 268 "toggle" sends the message "1" or "0" \, "bang" always
+sends "bang" and if you click and drag on the "number" you can see
+it acts a lot like a Slider. With "number" you can also click once
+\, and then type a number to send.;
+#X text 467 335 TIP: You can send floating point numbers by holding
+down the SHIFT key as you click and drag on the "number".;
+#X text 467 375 There are other types of GUI objects not covered here.
+See the guis-about.pd PDDP patch:;
+#X text 12 8 2 PD Introduction - Some Useful GUI Objects in Pure-Data
+;
+#X connect 7 0 8 0;
+#X connect 13 0 14 0;
+#X connect 18 0 21 0;
+#X connect 19 0 20 0;
+#X connect 23 0 22 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-3.pd b/externals/gridflow/doc/tutorials/pure-data-3.pd
new file mode 100755
index 00000000..729b2dc7
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-3.pd
@@ -0,0 +1,70 @@
+#N canvas 261 121 900 544 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 448 366 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 8 497 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 499 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 474 324 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: patch first connecting placing place connect
+;
+#X restore 16 503 pd META;
+#X text 12 20 DESCRIPTION: Using PD to create your first patch;
+#X text 13 46 Adding Objects:;
+#X text 19 75 In order to create a patch you need to first place objects
+and GUI objects \, and second make connections between these objects.
+To place an object you need to be in "edit-mode". You should now be
+in run mode \, so please go to the "Edit" pull-down menu and choose
+"Edit mode" at the bottom. You should see your cursor change from an
+arrow to a pointing hand.;
+#X text 19 175 SHORTCUT: You can press "Control" and "e" simultaneously
+in order to toggle (switch) between edit and Run modes.;
+#X obj 448 386 cnv 15 430 100 empty empty empty 20 12 0 14 -233017
+-66577 0;
+#X floatatom 506 406 5 0 0 0 - - -;
+#X text 19 355 SHORTCUT: You can press "Control" and "3" simultaneously
+in order to place a number. All shortcuts are listed next to the items
+in the "Put" menu.;
+#X text 453 366 Patch work area:;
+#X text 19 215 Once you are in "edit-mode" you are now free to place
+objects. To place an object go to the "Put" pull-down menu and choose
+"Number". Once you have chosen this menu item you will see that a "number"
+gui is attached to your mouse pointer. In order to place the number
+into the patch move your pointer to the grey area to the right (in
+the "Patch work area" -> Click once to release it from your mouse.
+Note that the number is coloured blue. The blue colour shows that an
+item in your patch is selected. To unselect any item simply click once
+on the blank (white) space between items.;
+#X obj 520 440 print;
+#X obj 448 156 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 156 Connecting Objects:;
+#X text 19 411 Next we're going to place the familar "print" object
+beneath the "number" GUI. Press "Control" and "1" to place an object
+box. Again the object gets attached to your mouse and again click once
+to place it in the patch area somewhere under the "number".;
+#X text 459 41 While the number box is still selected (coloured blue)
+you can see a flashing cursor. Type the word "print" into the object
+box. The object will retain a dashed line while you type. In order
+to create the object you simply need to unselect \, by clicking somewhere
+outside the object. Note that once you have clicked to create the object
+the dashed line turns solid and an inlet (small rectangle) gets drawn
+around the word "print". The objects have now been created!;
+#X text 459 185 All connections between objects in PD are created from
+outlet to inlet (top to bottom). To start making a connection move
+your hand-pointer over the outlet of the "number" gui. When over the
+outlet your pointer will change to a circle. When you see the circle
+press and hold the mouse button. As you drag (holding the mouse button
+down) the pointer you see a line being drawn from the outlet to your
+pointer. To attach this connection to another object drag your mouse
+to an inlet of another object. The pointer will again change to a circle
+and at this point you can release the mouse button. Once released the
+objects are now connected! To play with your patch go back into run-mode
+and click and drag on the number-box while watching the terminal.;
+#X text 12 8 3 PD Introduction - Creating your first patch;
+#X connect 11 0 15 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-4.pd b/externals/gridflow/doc/tutorials/pure-data-4.pd
new file mode 100755
index 00000000..4d38f41d
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-4.pd
@@ -0,0 +1,87 @@
+#N canvas 183 61 890 531 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 96 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 8 487 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 489 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 478 328 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: metro counter random;
+#X restore 16 493 pd META;
+#X text 12 20 DESCRIPTION: Learning "metro" \, "counter" & "random"
+;
+#X text 13 96 Using the "metro" object:;
+#X text 21 47 In this section we will learn three new objects \, "metro"
+\, "counter" \, and "random". Metro sends a bang at regular intervals
+\, just like a metronome.;
+#X obj 164 142 metro 250;
+#X obj 164 123 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 164 163 bng 15 100 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 222 123 5 0 0 0 - - -;
+#X text 21 187 You can turn a Metro on and off by sending it a "1"
+or "0" message. Because a toggle sends 0/1 messages \, we can simply
+connect it directly. Metro also accepts an argument (words or numbers
+wirtten after the object name). This argument is how fast the metro
+should send out bangs (in milliseconds). You can always change the
+speed of the metro by sending it number messages through the rightmost
+inlet.;
+#X obj 8 306 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 306 Using the "random" object:;
+#X text 21 277 For more info see the metro-help.pd patch.;
+#X obj 168 385 bng 15 100 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 168 425 print;
+#X obj 168 404 random 100;
+#X floatatom 233 385 5 0 0 0 - - -;
+#X text 20 327 The Random object returns a number between 0 and the
+(number) argument when it receives a bang message in the leftmost inlet.
+You can also change the upper limit by sending a message to the rightmost
+inlet.;
+#X obj 448 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 46 Using the "random" object:;
+#X obj 559 154 bng 15 100 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 590 154 3 1 3 0 - - -;
+#X floatatom 621 174 3 0 0 0 - - -;
+#X floatatom 652 194 3 0 0 0 - - -;
+#X obj 652 234 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X floatatom 559 234 8 0 0 0 - - -;
+#X obj 559 213 counter 0 10 1;
+#X text 21 447 For more info see the random-help.pd patch.;
+#X text 461 77 "counter" is simply an object that counts. It can count
+up \, count down and count up and then down. Where it starts and where
+it stops are all definable. This is the counter that in included with
+Gem \, it is not compatible with other counter objects.;
+#X text 461 274 The first argument for counter is the lower limit (number
+to start counting at). The second is the upper limit to count to. The
+third argument is the direction in which to count. "1" means forward
+\, "2" means backward and "3" means forward and then backward. You
+can also use the three rightmost inlets to change the behaviour of
+counter. The rightmost inlet is the upper limit \, the second right-most
+the lower limit \, and the third right-most as the direction. The rightmost
+outlet sends out a bang message when the counter loops.;
+#X text 681 193 Rightmost inlet;
+#X text 651 173 Second Rightmost inlet;
+#X text 621 153 Third Rightmost inlet;
+#X text 461 407 For more info see the counter-help.pd patch.;
+#X text 12 8 4 Introduction to PD - More objects;
+#X connect 8 0 10 0;
+#X connect 9 0 8 0;
+#X connect 11 0 8 1;
+#X connect 16 0 18 0;
+#X connect 18 0 17 0;
+#X connect 19 0 18 1;
+#X connect 23 0 29 0;
+#X connect 24 0 29 1;
+#X connect 25 0 29 2;
+#X connect 26 0 29 3;
+#X connect 29 0 28 0;
+#X connect 29 1 27 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-5.pd b/externals/gridflow/doc/tutorials/pure-data-5.pd
new file mode 100755
index 00000000..dc357bb1
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-5.pd
@@ -0,0 +1,108 @@
+#N canvas -235 0 891 673 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 8 627 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 629 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 482 332 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: send receive netsend netreceive cordless communication
+network TCP/IP UDP internet;
+#X restore 16 633 pd META;
+#X obj 448 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 12 20 DESCRIPTION: Communicating between objects w/out connections
+;
+#X text 13 46 "send" & "receive";
+#X obj 86 223 send invisible-link;
+#X obj 86 248 receive invisible-link;
+#X floatatom 86 273 5 0 0 0 - - -;
+#X msg 86 198 10;
+#X floatatom 266 273 5 0 0 0 - - -;
+#X floatatom 266 203 5 0 0 0 - - -;
+#X obj 266 223 s invisible-link2;
+#X obj 266 248 r invisible-link2;
+#X obj 102 483 r send-from-number;
+#X floatatom 102 508 5 0 0 0 - - -;
+#X floatatom 102 462 5 0 0 0 - - send-from-number;
+#X floatatom 242 462 5 0 0 0 - - -;
+#X obj 242 483 s send-to-number2;
+#X floatatom 242 508 5 0 0 0 - send-to-number2 -;
+#X text 19 385 Note: Many GUI objects have built-in send and receive
+objects. The tag names are specified in the GUI properties. Remeber
+to get the GUI properties Right-Click or Control-Click on the GUI object
+and select "Properties".;
+#X text 453 46 "netsend" & "netreceive";
+#X text 19 575 For more info see: send-help.pd \, receive-help.pd \,
+netsend-help.pd and netreceive-help.pd;
+#X text 459 75 While "send" and "receive" allow you to send messages
+without connecting objects with patch-cords "netsend" and "netreceive"
+do the same but communicate between objects using TCP/IP the internet
+protocol. This means that you can send messages from a patch running
+on one machine to a second patch running on a second machine on the
+same network \, or even over the internet.;
+#X text 19 545 You can also send messages using UDP rather than TCP/IP.
+See "more info" below for details.;
+#X obj 589 292 netreceive 8001;
+#X text 459 185 The first argument of "netreceive" is the port the
+netrecive should listen on. "netsend" can connect to this port from
+other machines. "netreceive" has two outlets. The first outlet sends
+out the messages it receives over network \, and the second argument
+send a "1" when netsend is connected and "0" when netsend disconnects.
+;
+#X obj 589 318 print;
+#X obj 689 318 tgl 16 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X obj 503 563 netsend;
+#X text 459 355 "netsend" is controlled using three messages: "connect"
+\, "disconnect" and "send". "connect" has two arguments \, the host
+or IP and the port number you wish to connect to. There needs to be
+a "netreceive" listening on the port you connect to. "disconnect" drops
+the current connection. "send" sends any arguments to the "netreceive"
+over the network. The single outlet of "netsend" prints "1" when a
+connection is made and "0" when the connection is lost.;
+#X obj 503 586 tgl 16 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X msg 503 486 connect localhost 8001;
+#X msg 516 511 disconnect;
+#X msg 525 537 send hello from the internet;
+#X text 602 510 Close connection;
+#X text 673 486 Connect to this machine;
+#X text 733 536 Send message;
+#X text 19 75 In some cases you will want to send messages without
+connecting objects. You may be sending one message to many different
+places that would make connections too laborious. "send" and "receive"
+both have a single argument. This argument is the tag name for the
+communication. "send" will always send any messages it gets in it inlet
+to any number of "receive" objects in a patch with the same tag name.
+"s" and "r" can be used in the place of "send" and "receive".;
+#X obj 86 336 s broadcast;
+#X floatatom 86 317 5 0 0 0 - - -;
+#X obj 176 316 r broadcast;
+#X floatatom 176 339 5 0 0 0 - - -;
+#X obj 266 316 r broadcast;
+#X floatatom 266 339 5 0 0 0 - - -;
+#X text 12 8 5 Intermediate Pure-Data - send and receive;
+#X msg 585 598 send \$1;
+#X floatatom 584 567 5 0 0 0 - - -;
+#X text 651 596 send variables to another computer;
+#X connect 9 0 10 0;
+#X connect 11 0 8 0;
+#X connect 13 0 14 0;
+#X connect 15 0 12 0;
+#X connect 16 0 17 0;
+#X connect 19 0 20 0;
+#X connect 27 0 29 0;
+#X connect 27 1 30 0;
+#X connect 31 0 33 0;
+#X connect 34 0 31 0;
+#X connect 35 0 31 0;
+#X connect 36 0 31 0;
+#X connect 42 0 41 0;
+#X connect 43 0 44 0;
+#X connect 45 0 46 0;
+#X connect 48 0 31 0;
+#X connect 49 0 48 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-6.pd b/externals/gridflow/doc/tutorials/pure-data-6.pd
new file mode 100755
index 00000000..01e6dcd7
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-6.pd
@@ -0,0 +1,92 @@
+#N canvas 304 98 891 675 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 627 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 629 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 486 336 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: message comma semicolon dollersign receive
+list;
+#X restore 16 633 pd META;
+#X text 12 20 DESCRIPTION: Advanced uses for the message object;
+#X text 19 45 In Pure-Data there are two distinct concepts with the
+name "message". Messages are the data that gets send in PD from object
+to object. There is also the Messsage object that contains a message
+you want to send. The message object is the first GUI object we covered
+in this tutorial. The message is not the only way to send messages
+in a patch \, since all GUI objects also send messages. So what makes
+the message object different? The message object can sent messages
+of any type \, where a number for example can only send float (number)
+messages. There are a number of powerful features in the message object.
+We are familar with the "usual" way of using the message object:;
+#X msg 163 208 hello;
+#X msg 212 208 bye;
+#X obj 196 238 print messages;
+#X text 459 556 Note: It is a very common mistake to confuse the message
+object with an object box. The object box is framed in a rectangle.
+The message object has a notch removed from the right edge.;
+#X obj 106 385 print messages;
+#X msg 106 358 hello \, bye;
+#X text 19 305 You can send multiple messages in succession from a
+single message box by using a comma " \, " between the messages. The
+messages get send from left to right.;
+#X obj 8 276 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X obj 8 416 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 416 Semicolon in message boxes;
+#X text 13 276 Comma in message boxes;
+#X text 19 445 Just like you can specify receive tags directly in GUI
+objects you can also use a message box to send a message directly to
+a particular "receive".;
+#X obj 34 536 r myreceive;
+#X floatatom 34 560 5 0 0 0 - - -;
+#X text 189 360 Click to send both messages;
+#X text 136 502 send "10" to receive tag "myreceive";
+#X text 19 585 For more info see: message-help.pd 04.messages.pd 10.more.messages.pd
+;
+#X msg 34 498 \; myreceive 10;
+#X obj 448 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 46 Dollarsign in message boxes;
+#X msg 534 175 \$1 \$1 \$1;
+#X msg 534 154 10;
+#X text 459 75 In messages there are placeholders that start with "$".
+These placeholders are variables that get replaced with messages you
+send to the message box. In the example below we have a single message
+"10". Each "$1" in the message box gets replaced with the message "10".
+;
+#X text 601 175 \$1 placeholder gets replaced;
+#X text 570 154 message sent to message box;
+#X msg 534 304 list 1 2;
+#X text 600 304 a list with items "1" and "2";
+#X msg 534 325 \$2 \$1;
+#X text 584 325 \$1 becomes "1" and \$2 becomes "2";
+#X obj 534 347 print reverse-list;
+#X text 459 235 The "$1" placeholder refers to the first element of
+the list the message box gets from its inlet. We can use this to use
+a message box to reverse the order of elements (called atoms) in a
+list.;
+#X text 459 385 In this case the list "1 2" has two elements (called
+atoms) when this list gets sent to the inlet of a message box its atoms
+are available to the message box through the $ variables. \$1 gets
+replaced with the first element \, \$2 the second and so on.;
+#X obj 534 197 print repeated-message;
+#X obj 480 511 print complex-message;
+#X msg 480 468 list Fred Marcus;
+#X text 607 468 a list with two symbol atoms;
+#X msg 480 489 Hi \$1. \, Ya know \$2?;
+#X text 623 489 Becomes: "Hi Fred \, Ya know Marcus?";
+#X text 12 8 6 Intermediate Pure-Data - Using the message object;
+#X connect 6 0 8 0;
+#X connect 7 0 8 0;
+#X connect 11 0 10 0;
+#X connect 18 0 19 0;
+#X connect 26 0 38 0;
+#X connect 27 0 26 0;
+#X connect 31 0 33 0;
+#X connect 33 0 35 0;
+#X connect 40 0 42 0;
+#X connect 42 0 39 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-7.pd b/externals/gridflow/doc/tutorials/pure-data-7.pd
new file mode 100755
index 00000000..0d8360ec
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-7.pd
@@ -0,0 +1,106 @@
+#N canvas 280 89 936 678 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 627 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 629 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 482 332 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: send receive netsend netreceive cordless communication
+network TCP/IP UDP internet;
+#X restore 16 633 pd META;
+#X obj 8 266 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 266 "pack" object;
+#X msg 96 543 2;
+#X msg 45 521 1;
+#X obj 45 588 print mylist;
+#X text 12 20 DESCRIPTION: Using pack \, unpack and route with lists
+;
+#X text 19 75 In the Pure-Data introduction we discussed the three
+different types of data in PD. These are floats (numbers) \, symbols
+(words) and lists (groups of floats and words). Floats and symbols
+are known as atoms. Atoms are single elements \, they do not contain
+spaces or other special characters. Atoms can be grouped into lists.
+;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 46 What is a list?;
+#X msg 145 216 list one two three;
+#X obj 145 239 print this is a list;
+#X text 19 155 Lists can be created in a number of ways \, but we are
+going to cover the two most common ways of creating lists. The most
+simple way to create a list is to type the list into a message box
+starting with the word (symbol) "list":;
+#X text 19 295 The "pack" object is the second most common way to create
+a list. "pack" allows you to take individual atoms and combine them
+into a single list. "pack" accepts a number of arguments. Each argument
+defines the type of atom in the resulting list. The "f" argument creates
+an inlet that accepts float atoms. The "s" argument creates an inlet
+accepts symbol atoms. The number of arguments is the same as the number
+of elements in the resultant list.;
+#X text 19 405 "pack" is the first object we are going to learn that
+has a "cold" inlet. Some control objects in PD have "hot" and "cold"
+inlets. When you send a message to a "cold" inlet the object does not
+generate any output (it does not send any messages). When "hot" inlets
+get messages then the object does generate output. The leftmost inlet
+is always the "hot" inlet and all other inlets are "cold" or in some
+cases all inlets are "hot";
+#X text 75 521 sets the first atom "1" and then sends the list;
+#X text 132 543 sets the second atom "2";
+#X obj 45 566 pack f f;
+#X text 459 45 Note that if you do not set the second and onwards atoms
+via thier "cold" inlets and you generate the list by setting the first
+atom via the "hot" inlet then all float atoms will be set to "0" and
+all symbol atoms will be set to "symbol" in the resultant list.;
+#X obj 448 126 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 126 "unpack" object;
+#X obj 596 241 unpack f f f;
+#X msg 596 219 list 1 2 3;
+#X floatatom 596 294 5 0 0 0 - - -;
+#X floatatom 635 277 5 0 0 0 - - -;
+#X floatatom 675 262 5 0 0 0 - - -;
+#X text 639 293 First Atom;
+#X text 678 277 Second Atom;
+#X text 718 261 Third Atom;
+#X text 459 156 The "unpack" object is very similar to the "pack" object
+except it works in reverse. "unpack" takes a list and splits it up
+into a number of atoms. It uses the same arguments as "pack" but generates
+outlets rather than inlets.;
+#X obj 448 319 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 319 "route" object;
+#X text 459 349 The "route" object sorts lists based on the first atom
+of the list. It as a number of float or symbol arguments. For each
+argument "route" creates one outlet. "route" also creates one additional
+rightmost outlet for rejections. For each list route gets it compares
+the first atom to all its arguments. If the first atom matches one
+of the arguments it the rest of the list \, without the first atom
+\, gets send through the outlet corresponding to that argument. If
+the first atom of the list does not match any arguments the entire
+list \, including the first atom \, gets sent out the rejection outlet.
+;
+#X msg 688 493 rejection 1;
+#X obj 685 553 print rejection;
+#X msg 538 493 o1 2;
+#X msg 613 493 o2 3;
+#X obj 613 531 route o1 o2;
+#X obj 613 593 print o1;
+#X obj 649 573 print o2;
+#X text 12 8 7 Intermediate Pure-Data - Working with lists;
+#X connect 6 0 20 1;
+#X connect 7 0 20 0;
+#X connect 13 0 14 0;
+#X connect 20 0 8 0;
+#X connect 24 0 26 0;
+#X connect 24 1 27 0;
+#X connect 24 2 28 0;
+#X connect 25 0 24 0;
+#X connect 36 0 40 0;
+#X connect 38 0 40 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 40 1 42 0;
+#X connect 40 2 37 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-8.pd b/externals/gridflow/doc/tutorials/pure-data-8.pd
new file mode 100755
index 00000000..aa95c087
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-8.pd
@@ -0,0 +1,89 @@
+#N canvas 238 94 891 621 10;
+#X obj 8 6 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 577 cnv 15 870 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 668 579 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 482 332 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: send receive netsend netreceive cordless communication
+network TCP/IP UDP internet;
+#X restore 16 583 pd META;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 12 20 DESCRIPTION: nested patches using abstractions & subpatches
+;
+#X text 13 46 What is an abstraction?;
+#X text 23 76 Since objects are very simple in Pure-Data doing complex
+tasks often leads to very complex patches. Often it is useful to use
+the same bit of patching you do for one project for another. Pure-Data
+has a facility to "nest" \, that is to take a number of objects in
+a collection and place them into a group that looks like a single object.
+This is also handy to make a complex patch look simple and clear by
+hiding the nitty-gritty details. There are two types of these collections
+\, the subpatch and the abstraction.;
+#X obj 8 216 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 13 216 The subpatch;
+#X text 23 246 Subpatches are collections of objects that get "hidden"
+inside a container that looks like a normal PD object. Subpatches are
+created by creating an object box \, and typing the word "pd" followed
+by whatever you want to describe the contents of the subpatch. Subpatches
+are saved at the same time as the "parent" patch. Here is a subpatch:
+;
+#N canvas 0 22 460 310 subpatch 0;
+#X obj 30 34 inlet;
+#X obj 30 77 outlet;
+#X text 99 35 This is inside the subpatch.;
+#X connect 0 0 1 0;
+#X restore 178 359 pd subpatch;
+#X floatatom 178 336 5 0 0 0 - - -;
+#X floatatom 178 387 5 0 0 0 - - -;
+#X text 23 416 To open a subpatch simply click once on the subpatch
+in run-mode or control-click (or right-click) and select open in edit-mode.
+Both subpatches and abstractions communicate with the parent patch
+through special objects called "inlet" and "outlet" for each "inlet"
+in a subpatch or abstraction an inlet is created on the subpatch. This
+example has one inlet and one outlet.;
+#X obj 448 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 46 The abstraction;
+#X text 463 76 Abstractions are very similar to subpatches. They are
+collections of objects that are "hidden" inside PD objects \, and they
+both use "inlet" and "outlet" objects to communicate with the parent
+patch. The difference between subpatches and abstractions is that abstractions
+are saved in a separate file from the parent. This means when you save
+the parent patch containing abstractions the abstractions are not saved.
+The abstractions are saved as separate files so that they can be used
+in multiple patches. A second feature that exists in abstractions and
+not in subpatches is the ability to use arguments. "send" and "receive"
+can be used inside abstractions to send data without connections (patch-cords).
+;
+#X obj 682 253 r output;
+#X obj 682 277 print;
+#X obj 564 253 abstraction 1 2;
+#X text 463 316 To create an abstraction all you need to do is create
+a new PD patch ("File" -> "New"). Create the contents of the abstraction
+and then save it in the same directory as the patch you want to use
+it in. In this case the abstraction is saved as "abstraction.pd". Once
+saved you can easily embed the abstraction simply by typing its name
+\, without the .pd extension \, into an object box.;
+#X obj 448 416 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 453 416 Dollarsign in object boxes;
+#X text 463 446 If you open the above example you will see that the
+familiar "pack" object has a number of "$" arguments. The "$" arguments
+in a object box differ entirely from the "$" used in message objects.
+When you use a "$" in an object box inside an abstraction the values
+get replaced with the arguments to that abstraction. In the case above
+the "pack" object's first argument "$1" gets replaced with the first
+argument of the abstraction "1" "$2" gets replaced with the second
+argument "2".;
+#X text 23 536 For more info see: 12.PART2.subpatch.pd 14.dollersign.pd
+;
+#X text 12 8 8 Intermediate Pure-Data - Using abstractions and subpacthes
+;
+#X connect 11 0 13 0;
+#X connect 12 0 11 0;
+#X connect 18 0 19 0;
diff --git a/externals/gridflow/doc/tutorials/pure-data-9.pd b/externals/gridflow/doc/tutorials/pure-data-9.pd
new file mode 100755
index 00000000..e5188ee0
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/pure-data-9.pd
@@ -0,0 +1,43 @@
+#N canvas 291 108 450 562 10;
+#X obj 8 6 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 8 517 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 228 519 Copyright Ben Bogart 2005 \; (See COPYING.TXT for details)
+;
+#N canvas 0 22 486 336 META 0;
+#X text 12 5 CATEGORY: tutorial;
+#X text 12 15 KEYWORDS: GOP graph parent abstraction nesting ui interface
+;
+#X restore 16 523 pd META;
+#X obj 8 46 cnv 15 430 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text 12 20 DESCRIPTION: Using Graph on Parent abstractions;
+#X text 13 46 What is Graph on Parent?;
+#X text 13 76 Graph on Parent is a feature of PD that allows you to
+show the GUI objects contained in an abstraction on the parent patch.
+This means that you can create abstractions that not only include a
+collection of objects but can also include a user interface. To use
+graph on parent you simply need to create an abstraction the usual
+way but before saving it you need should Control-Click (Right-Click)
+on the background (white area) in the abstraction and choose "properties".
+From the properties menu check the "graph on parent" option. Now when
+you save the patch and embed it in a second patch all GUI objects will
+be visible.;
+#X obj 154 250 gop_abstraction;
+#X text 13 331 In this simple example there is only one GUI object
+\, a slider. Inside the abstraction the slider is connected to an inlet
+and an outlet. If you move the slider you can see the result in the
+outlet. If you set a value in the inlet with the number GUI you can
+see the position of the slider change.;
+#X floatatom 154 231 5 0 0 0 - - -;
+#X floatatom 154 297 5 0 0 0 - - -;
+#X text 13 421 Note you can change the size of the abstractions bounding
+box by Control-Click (Right-Click) on the abstraction and choose "properties".
+The size of the bounding-box is specified by the "screen width" and
+"screen height".;
+#X text 13 487 For more info see:;
+#X text 12 8 9 Intermediate Pure-Data - Using GUI's in abstractions
+;
+#X connect 8 0 11 0;
+#X connect 10 0 8 0;
diff --git a/externals/gridflow/doc/tutorials/randomly-select-an-image.pd b/externals/gridflow/doc/tutorials/randomly-select-an-image.pd
new file mode 100755
index 00000000..5817aa32
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/randomly-select-an-image.pd
@@ -0,0 +1,53 @@
+#N canvas 417 0 446 428 10;
+#X text 6 15 You can open multiple images in the same window. To do
+so you connect the outputs from the images to the inlet of the out
+window.;
+#X obj 136 295 #out window;
+#X obj 65 198 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 28 232 #in;
+#X msg 28 160 open b001.jpg;
+#X obj 188 197 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 151 231 #in;
+#X msg 151 159 open r001.jpg;
+#X obj 301 196 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 264 230 #in;
+#X msg 264 158 open g001.jpg;
+#X obj 7 -37 cnv 15 430 15 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 10 -37 What is a grid?;
+#X obj 8 320 cnv 15 430 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text 16 327 GridFlow 0.8.0;
+#X obj 7 -72 cnv 15 430 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 12 -73 2 Images;
+#X text 14 -59 Description: opening multiple images from one window.
+;
+#X obj 56 115 random 3;
+#X floatatom 195 81 5 0 0 0 - - -;
+#X obj 3 55 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1;
+#X obj 163 112 sel 0;
+#X obj 226 127 sel 1;
+#X obj 304 115 sel 2;
+#X obj 55 92 metro 1000;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 3 0;
+#X connect 5 0 6 0;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 8 0 9 0;
+#X connect 9 0 1 0;
+#X connect 10 0 9 0;
+#X connect 18 0 19 0;
+#X connect 19 0 21 0;
+#X connect 19 0 22 0;
+#X connect 19 0 23 0;
+#X connect 20 0 24 0;
+#X connect 21 0 2 0;
+#X connect 22 0 5 0;
+#X connect 23 0 8 0;
+#X connect 24 0 18 0;
diff --git a/externals/gridflow/doc/tutorials/title-page-pd-gf-in-one.pd b/externals/gridflow/doc/tutorials/title-page-pd-gf-in-one.pd
new file mode 100755
index 00000000..18798314
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/title-page-pd-gf-in-one.pd
@@ -0,0 +1,129 @@
+#N canvas 18 0 762 514 10;
+#X obj 102 -15 cnv 15 430 50 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 102 66 cnv 1 430 430 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 102 98 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 102 73 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 108 66 cnv 1 2 430 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 516 67 cnv 1 2 430 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 102 158 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 102 182 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 152 114 1.1 What is a grid?;
+#X obj 142 456 cnv 15 300 30 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 154 461 Stephanie Brodeur & Darsha Hewitt 2005;
+#X obj 102 36 cnv 15 430 30 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 214 -6 cnv 15 100 17 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 214 -6 GridFlow 0.8.0;
+#X obj 102 -15 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X obj 102 34 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X obj 315 8 cnv 15 63 17 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 314 8 Tutorials;
+#X obj 102 65 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X obj 102 495 cnv 1 430 1 empty empty empty 20 12 0 14 -66577 -66577
+0;
+#X text 140 79 1;
+#X obj 158 78 Introduction to Grids;
+#X text 152 130 1.2 How to create grid.;
+#X text 152 192 2.1 How does GridFlow understand images?;
+#X text 141 164 2;
+#X obj 162 161 Introduction to Images;
+#X text 152 211 2.2 Opening an image.;
+#X text 152 230 2.3 Different options on how to open an image.;
+#X text 178 247 2.3.1 Opening different images in one window.;
+#X text 178 264 2.3.2 Opening images using send and receive.;
+#X obj 102 356 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X obj 102 380 cnv 1 430 2 empty empty empty 20 12 0 14 -228992 -66577
+0;
+#X text 141 362 3;
+#X obj 162 359 Introduction to Video;
+#X text 178 300 2.4.1 Resizing an image.;
+#X text 151 284 2.4 Image manipulation.;
+#X text 178 315 2.4.2 Greyscale.;
+#X text 178 330 2.4.3 numop.;
+#X text 149 394 4 Introduction to live feed;
+#X text 150 422 5 Putting it all together;
+#X obj -401 -18 cnv 15 455 30 empty empty empty 20 12 0 14 -233017
+-66577 0;
+#X obj -398 898 cnv 15 870 30 empty empty empty 20 12 0 14 -233017
+-66577 0;
+#X text -393 898 Copyright Ben Bogart 2005 \; (See COPYING.TXT for
+details);
+#X text -397 -11 Welcome to Pure-Data...;
+#X obj -401 22 cnv 15 455 15 empty empty empty 20 12 0 14 -179884 -66577
+0;
+#X text -396 22 What is Pure-Data (aka PD)?;
+#X text -381 50 Pure-Data is an open-source patching environment for
+multi-media (audio+image). Pure-Data is a programming language where
+you create relationships by connecting visual boxes (rather than typing
+complex commands). This lecture is separated into three sections: An
+Introduction to Pure-Data \, An introduction to Gem and intermediate
+PD and Gem.;
+#X obj -381 152 cnv 15 430 120 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X obj -367 174 pddp_open pure-data-1;
+#X obj -367 197 pddp_open pure-data-2;
+#X obj -367 220 pddp_open pure-data-3;
+#X obj -367 243 pddp_open pure-data-4;
+#X text -192 174 Pure-Data Introduction;
+#X text -192 197 GUI Objects for Interaction;
+#X text -192 220 Creating your first patch;
+#X text -192 243 Control: metro \, random & counter;
+#X obj -382 376 cnv 15 430 145 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X obj -378 580 cnv 15 430 145 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X obj -364 602 pddp_open pure-data-5;
+#X obj -364 625 pddp_open pure-data-6;
+#X text -189 625 The powerful message object;
+#X obj -364 648 pddp_open pure-data-7;
+#X text -189 648 More about lists;
+#X text -189 671 Nesting collections of objects;
+#X text -189 602 Connectionless communications;
+#X obj -364 671 pddp_open pure-data-8;
+#X text -189 695 Using GUI's in abstractions;
+#X obj -364 695 pddp_open pure-data-9;
+#X obj -378 787 cnv 15 430 95 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X text -194 422 Introduction to Images;
+#X text -194 468 Introduction to Live Feeds;
+#X obj -401 308 cnv 15 455 15 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X text -189 837 Putting it all together;
+#X text -190 808 Interfacing with sensors;
+#X text -194 399 Introduction to Grids;
+#X text -384 331 GridFlow is a multidimentional dataflow processing
+library for PureData and Ruby \, designed for interactive multimedia.
+;
+#X text -377 376 2 Introduction to GridFlow;
+#X text -376 152 1 Introduction to Pure-Data;
+#X text -373 580 3 Intermediate Pure-Data;
+#X text -373 787 4 Intermediate GridFlow;
+#X obj -401 542 cnv 15 455 15 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X text -396 542 What is GridFLow?;
+#X obj -400 751 cnv 15 455 15 empty empty empty 20 12 0 14 -179884
+-66577 0;
+#X text -395 751 What is GridFLow?;
+#X obj -283 400 GridFlow-1;
+#X obj -283 423 GridFlow-2;
+#X obj -283 446 GridFlow-3;
+#X obj -283 469 GridFlow-4;
+#X obj -281 809 GridFlow-6;
+#X obj -281 832 GridFlow-7;
+#X text -395 308 What is GridFlow?;
+#X text -194 445 Introduction to Video;
diff --git a/externals/gridflow/doc/tutorials/txt-for-resize-image.pd b/externals/gridflow/doc/tutorials/txt-for-resize-image.pd
new file mode 100755
index 00000000..f991ba07
--- /dev/null
+++ b/externals/gridflow/doc/tutorials/txt-for-resize-image.pd
@@ -0,0 +1,3 @@
+#N canvas 0 0 450 300 10;
+#X text 48 29 How to resize an image:;
+#X text 39 70 # scale 640 480 pour les images;
diff --git a/externals/gridflow/examples/bounce.pd b/externals/gridflow/examples/bounce.pd
new file mode 100644
index 00000000..46421cad
--- /dev/null
+++ b/externals/gridflow/examples/bounce.pd
@@ -0,0 +1,32 @@
+#N canvas 0 0 450 300 10;
+#X obj 34 284 #out window;
+#X floatatom 48 71 5 0 0 0 - - -;
+#X obj 34 16 metro 30;
+#X obj 6 19 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1;
+#X obj 34 42 f;
+#X obj 95 34 + 1;
+#X msg 34 265 set_geometry \$1 \$2 200 200;
+#X obj 34 93 t f f;
+#X obj 34 246 pack 0 0;
+#X obj 64 136 expr $f1-int($f1);
+#X obj 64 156 expr 2*if($f1>=.5 \, $f1 \, (1-$f1));
+#X obj 64 176 expr $f1*400;
+#X obj 64 115 / 200;
+#X obj 95 53 % 1000;
+#X obj 34 206 expr 400-200*abs(sin($f1/3.1416/5));
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 4 0 5 0;
+#X connect 4 0 1 0;
+#X connect 4 0 7 0;
+#X connect 5 0 13 0;
+#X connect 6 0 0 0;
+#X connect 7 0 14 0;
+#X connect 7 1 12 0;
+#X connect 8 0 6 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 8 1;
+#X connect 12 0 9 0;
+#X connect 13 0 4 1;
+#X connect 14 0 8 0;
diff --git a/externals/gridflow/examples/doodle.pd b/externals/gridflow/examples/doodle.pd
new file mode 100644
index 00000000..8ec75c39
--- /dev/null
+++ b/externals/gridflow/examples/doodle.pd
@@ -0,0 +1,31 @@
+#N canvas 0 0 450 427 10;
+#X obj 22 22 metro 33.3667;
+#X obj 1 22 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1;
+#X obj 143 74 t b l;
+#X obj 282 93 loadbang;
+#X msg 182 74 put_at ( \$1 \$2 0 );
+#X msg 284 120 0 192 255;
+#X obj 22 114 #store (64 64 3 #);
+#X obj 22 133 #scale_by 8;
+#X obj 22 152 #out window;
+#X obj 22 171 #mouse;
+#X obj 22 190 # / 8;
+#X obj 22 209 #export_list;
+#X obj 143 93 #store;
+#X obj 232 154 #color;
+#X connect 0 0 6 0;
+#X connect 1 0 0 0;
+#X connect 2 0 12 0;
+#X connect 2 1 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 1;
+#X connect 5 0 13 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 9 1 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 2 0;
+#X connect 12 0 6 1;
+#X connect 13 0 12 1;
diff --git a/externals/gridflow/examples/heat.pd b/externals/gridflow/examples/heat.pd
new file mode 100644
index 00000000..743fc4e6
--- /dev/null
+++ b/externals/gridflow/examples/heat.pd
@@ -0,0 +1,173 @@
+#N canvas 59 155 741 486 10;
+#X obj 228 23 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 199 246 450 453 heat 1;
+#X obj 129 23 inlet mask;
+#X obj 22 42 t a a;
+#X obj 22 224 # +;
+#X obj 22 23 inlet heatmap;
+#X obj 24 394 outlet heatmap;
+#X obj 241 154 #greyscale_to_rgb;
+#X obj 241 175 #out window;
+#X obj 22 80 #store;
+#X obj 22 61 #finished;
+#X obj 52 167 # + 128;
+#X obj 52 186 # >> 8;
+#X obj 52 134 # *;
+#X obj 52 103 #convolve (3 3 # 0 1 0 1 -4 1);
+#X obj 52 205 # + 2;
+#X obj 52 225 # >> 4;
+#X connect 0 0 11 1;
+#X connect 1 0 8 0;
+#X connect 1 1 7 1;
+#X connect 1 1 12 0;
+#X connect 2 0 4 0;
+#X connect 3 0 1 0;
+#X connect 5 0 6 0;
+#X connect 7 0 2 0;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 10 0 13 0;
+#X connect 11 0 9 0;
+#X connect 12 0 11 0;
+#X connect 13 0 14 0;
+#X connect 14 0 2 1;
+#X restore 27 81 pd heat;
+#X obj 27 61 #store;
+#X obj 94 42 loadbang;
+#X obj 27 16 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X obj 27 363 #out window;
+#X obj 227 157 #greyscale_to_rgb;
+#X obj 227 138 # >> 2;
+#X obj 48 23 s metro;
+#X obj 27 382 #mouse \, ...;
+#X obj 120 382 # >> 1;
+#X obj 27 344 #scale_by 2;
+#X msg 94 61 240 320 1 # 0;
+#N canvas 205 52 520 286 finger 0;
+#X obj 28 62 shunt 2;
+#X msg 289 71 4 2 # 0 0 0 1 1 1 1 0;
+#X obj 289 90 # * 8;
+#X obj 289 109 # - 4;
+#X obj 289 128 # +;
+#X obj 28 23 inlet;
+#X obj 28 142 outlet;
+#X obj 289 14 inlet position;
+#X obj 72 23 inlet button;
+#X obj 289 33 #export_list;
+#X obj 289 52 t b a;
+#X obj 72 81 #draw_polygon + (4000);
+#X connect 0 0 6 0;
+#X connect 0 1 11 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 2;
+#X connect 5 0 0 0;
+#X connect 7 0 9 0;
+#X connect 8 0 0 1;
+#X connect 9 0 10 0;
+#X connect 10 0 1 0;
+#X connect 10 1 4 1;
+#X connect 11 0 6 0;
+#X restore 27 163 pd finger;
+#X obj 15 436 fps detailed;
+#X obj 16 456 display;
+#X obj 27 119 shunt 2;
+#X obj 90 104 f;
+#X obj 115 104 + 1;
+#X obj 27 100 t a b;
+#X obj 140 123 ==;
+#X obj 140 104 % 4;
+#N canvas 340 133 341 379 render 0;
+#X obj 12 285 # +;
+#X obj 26 23 inlet heatmap;
+#X obj 12 323 outlet rgb;
+#X obj 123 23 inlet mask;
+#X obj 26 53 t a a;
+#X obj 26 80 #inner (1 3 # 2 4 6) \, op >>;
+#X obj 82 161 t a a;
+#X obj 88 189 # -;
+#X obj 88 227 # + 128;
+#X obj 12 304 #clip;
+#X obj 88 208 # << 6;
+#X obj 26 108 shunt 2;
+#X obj 79 109 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X connect 0 0 9 0;
+#X connect 1 0 4 0;
+#X connect 3 0 0 1;
+#X connect 4 0 5 0;
+#X connect 5 0 11 0;
+#X connect 6 0 7 1;
+#X connect 6 1 7 0;
+#X connect 7 0 10 0;
+#X connect 8 0 0 0;
+#X connect 9 0 2 0;
+#X connect 10 0 8 0;
+#X connect 11 0 0 0;
+#X connect 11 1 6 0;
+#X connect 12 0 11 1;
+#X restore 28 271 pd render;
+#X obj 295 232 #fold +;
+#X obj 295 251 #fold +;
+#X obj 295 289 #fold +;
+#X obj 245 23 loadbang;
+#X obj 227 100 # max;
+#X obj 227 81 # << 1;
+#X obj 227 119 # min 256;
+#X obj 227 62 # - 40;
+#X obj 295 270 # / 320;
+#X obj 295 308 # / 240;
+#X obj 295 327 #export;
+#X floatatom 294 356 5 0 0 0 - - -;
+#X obj 27 42 metro 12;
+#X text 542 3 heat propagation simulation;
+#X text 396 43 use a greyscale image here;
+#X text 493 17 Copyright 2005 by Mathieu Bouchard;
+#X obj 227 43 #in ../images/pmask.png;
+#X text 396 57 as a heat conduction map;
+#X connect 0 0 39 0;
+#X connect 1 0 19 0;
+#X connect 2 0 1 0;
+#X connect 3 0 12 0;
+#X connect 4 0 35 0;
+#X connect 5 0 9 0;
+#X connect 5 0 14 0;
+#X connect 6 0 22 1;
+#X connect 7 0 6 0;
+#X connect 9 0 10 0;
+#X connect 9 1 10 0;
+#X connect 9 4 13 1;
+#X connect 10 0 13 2;
+#X connect 11 0 5 0;
+#X connect 12 0 2 1;
+#X connect 13 0 2 1;
+#X connect 13 0 22 0;
+#X connect 14 0 15 0;
+#X connect 16 0 2 1;
+#X connect 16 1 13 0;
+#X connect 17 0 18 0;
+#X connect 18 0 21 0;
+#X connect 19 0 16 0;
+#X connect 19 1 17 0;
+#X connect 20 0 16 1;
+#X connect 21 0 17 1;
+#X connect 21 0 20 0;
+#X connect 22 0 11 0;
+#X connect 23 0 24 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 39 0;
+#X connect 27 0 29 0;
+#X connect 28 0 27 0;
+#X connect 29 0 1 1;
+#X connect 29 0 7 0;
+#X connect 30 0 28 0;
+#X connect 31 0 25 0;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
+#X connect 35 0 2 0;
+#X connect 35 0 8 0;
+#X connect 39 0 30 0;
diff --git a/externals/gridflow/examples/markov.pd b/externals/gridflow/examples/markov.pd
new file mode 100644
index 00000000..d6bbe262
--- /dev/null
+++ b/externals/gridflow/examples/markov.pd
@@ -0,0 +1,133 @@
+#N canvas 238 57 825 641 10;
+#X obj 70 203 dac~;
+#X obj 71 141 osc~;
+#X obj 71 103 mtof;
+#X obj 71 122 t f b;
+#X obj 105 142 line~;
+#X obj 70 160 *~;
+#X obj 74 86 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 6700 1;
+#X obj 70 179 *~ 0.1;
+#X obj 33 6 key;
+#X obj 409 139 messageprepend set;
+#X obj 497 110 t l;
+#X msg 409 89 list \$1;
+#X obj 409 109 listprepend;
+#X msg 481 84 list;
+#X obj 97 7 loadbang;
+#X obj 34 29 listfind;
+#X obj 34 48 sel -1;
+#X obj 71 67 + 60;
+#X msg 114 28 list 113 50 119 51 101 114 53 116 54 121 55 117 105 57
+111 48 112 91 61 93 127;
+#X obj 409 69 key;
+#X msg 111 123 0.7 \, 0 400;
+#X floatatom 105 68 5 0 0 0 - - -;
+#X msg 200 180 list \$1;
+#X obj 275 199 listsublist 0 2;
+#X obj 200 199 listappend;
+#X obj 483 388 display;
+#X msg 270 264 1;
+#X msg 305 240 put_at ( \$2 \$1 );
+#X obj 166 319 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 75 309 f;
+#X obj 39 410 #store;
+#X obj 97 393 #fold +;
+#X obj 96 417 display;
+#X obj 275 219 t l l l;
+#X msg 184 279 bang;
+#X obj 8 387 #finished;
+#X floatatom 99 311 5 0 0 0 - - -;
+#X obj 90 288 t f;
+#X obj 17 262 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X msg 192 299 list \$1;
+#X obj 46 366 t a a;
+#X obj 39 502 #scan +;
+#X obj 200 157 spigot;
+#X obj 82 440 # rand;
+#X obj 80 472 display;
+#X obj 38 546 # <;
+#X obj 50 595 #fold +;
+#X obj 280 512 display;
+#X obj 132 596 #export;
+#X obj 248 157 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 104 329 + 60;
+#X obj 148 368 spigot;
+#X obj 199 367 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 17 286 metro 100;
+#X obj 50 617 display;
+#X obj 67 568 display;
+#X obj 90 537 display;
+#X obj 191 322 #store (17 17 #) \, op +;
+#X text 536 12 This will be an example of Markov Chains;
+#X text 536 27 But it's not too clean yet;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 3 1 20 0;
+#X connect 4 0 5 1;
+#X connect 5 0 7 0;
+#X connect 6 0 2 0;
+#X connect 7 0 0 0;
+#X connect 7 0 0 1;
+#X connect 8 0 15 0;
+#X connect 10 0 12 1;
+#X connect 11 0 12 0;
+#X connect 12 0 10 0;
+#X connect 12 0 9 0;
+#X connect 13 0 12 1;
+#X connect 14 0 18 0;
+#X connect 15 0 16 0;
+#X connect 16 1 17 0;
+#X connect 16 1 42 0;
+#X connect 17 0 6 0;
+#X connect 17 0 21 0;
+#X connect 18 0 15 1;
+#X connect 19 0 11 0;
+#X connect 20 0 4 0;
+#X connect 22 0 24 0;
+#X connect 23 0 24 1;
+#X connect 23 0 33 0;
+#X connect 24 0 23 0;
+#X connect 26 0 57 1;
+#X connect 27 0 57 1;
+#X connect 28 0 57 0;
+#X connect 29 0 39 0;
+#X connect 30 0 41 0;
+#X connect 30 0 47 0;
+#X connect 31 0 32 0;
+#X connect 31 0 43 0;
+#X connect 33 0 34 0;
+#X connect 33 1 26 0;
+#X connect 33 2 27 0;
+#X connect 34 0 57 0;
+#X connect 35 0 30 0;
+#X connect 36 0 50 0;
+#X connect 37 0 29 1;
+#X connect 37 0 36 0;
+#X connect 38 0 53 0;
+#X connect 39 0 57 0;
+#X connect 40 0 35 0;
+#X connect 40 1 30 1;
+#X connect 40 1 31 0;
+#X connect 41 0 45 0;
+#X connect 41 0 56 0;
+#X connect 42 0 22 0;
+#X connect 43 0 44 0;
+#X connect 43 0 45 1;
+#X connect 45 0 46 0;
+#X connect 45 0 55 0;
+#X connect 46 0 48 0;
+#X connect 46 0 54 0;
+#X connect 48 0 37 0;
+#X connect 49 0 42 1;
+#X connect 50 0 6 0;
+#X connect 51 0 40 0;
+#X connect 52 0 51 1;
+#X connect 53 0 29 0;
+#X connect 57 0 25 0;
+#X connect 57 0 51 0;
diff --git a/externals/gridflow/examples/mechanics.pd b/externals/gridflow/examples/mechanics.pd
new file mode 100644
index 00000000..944dcb7c
--- /dev/null
+++ b/externals/gridflow/examples/mechanics.pd
@@ -0,0 +1,121 @@
+#N canvas 491 20 624 716 10;
+#X obj 188 65 # rand;
+#X obj 81 97 #store;
+#X obj 188 8 loadbang;
+#X obj 134 120 #transpose;
+#X obj 64 8 tgl 17 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 81 171 #inner \, op sq- \, fold +;
+#X msg 139 56 1;
+#X msg 100 56 0;
+#X obj 81 120 shunt 2;
+#X obj 81 29 t b b b b;
+#X obj 27 244 #transpose 1 3;
+#X obj 27 282 #fold +;
+#X obj 27 357 # inv*;
+#X obj 159 424 # +;
+#X msg 188 27 bang;
+#X obj 12 648 #out window;
+#X obj 12 29 t b b;
+#X obj 12 667 fps detailed;
+#X obj 190 471 # inv+;
+#X obj 279 235 # + 1;
+#X obj 279 216 # * -2;
+#X obj 185 424 # *;
+#X msg 261 76 7 2 # 0;
+#X obj 12 574 # min 255;
+#X obj 81 8 metro 40;
+#X obj 350 598 #dim;
+#X msg 350 636 \$1;
+#X msg 349 674 \$1 2;
+#X obj 350 617 #export_list;
+#X obj 287 500 t a a;
+#X obj 350 655 * 6;
+#X obj 27 225 #outer sq-;
+#X msg 188 46 7 2 # 5760 7680;
+#X obj 240 521 # / 16;
+#X obj 27 322 # >> 8;
+#X obj 46 496 display;
+#X obj 190 452 # >> 8;
+#X obj 74 357 # << 8;
+#X obj 27 263 # * (2 2 # 1 0 0 1);
+#X obj 81 190 #outer ignore (2 #);
+#X obj 279 178 # abs- (2880 3840);
+#X obj 279 197 # >= (2880 3840);
+#X obj 290 460 # min (36000 48000);
+#X obj 290 479 # max (0 0);
+#X obj 240 541 #inner (2 6 2 # 1 0 1 0 1 0 1 0 1 0 0 0 0 1 0 1 0 1
+0 1 0 1 0 0);
+#X obj 240 573 # + (6 2 # -8 -8 -8 8 8 8 8 -8 -8 -8 180 240);
+#X obj 12 555 # *>>8 (232 242 252);
+#X obj 12 536 #draw_polygon + \, color (3 # 130);
+#X obj 12 517 #store (360 480 3 # 0);
+#X obj 28 376 #fold + \, seed (2 #);
+#X obj 231 613 #redim (42 2);
+#X text 310 8 This was supposed to be some kind of;
+#X text 310 24 Newtonian physics simulation;
+#X text 310 42 But it doesn't quite work;
+#X connect 0 0 1 1;
+#X connect 1 0 8 0;
+#X connect 2 0 14 0;
+#X connect 3 0 5 1;
+#X connect 3 0 31 1;
+#X connect 4 0 24 0;
+#X connect 5 0 39 0;
+#X connect 6 0 8 1;
+#X connect 7 0 8 1;
+#X connect 8 0 5 0;
+#X connect 8 0 31 0;
+#X connect 8 1 3 0;
+#X connect 8 1 18 1;
+#X connect 8 1 40 0;
+#X connect 9 0 16 0;
+#X connect 9 1 7 0;
+#X connect 9 2 1 0;
+#X connect 9 3 6 0;
+#X connect 10 0 38 0;
+#X connect 11 0 34 0;
+#X connect 12 0 49 0;
+#X connect 13 0 21 1;
+#X connect 13 0 36 0;
+#X connect 14 0 32 0;
+#X connect 14 0 22 0;
+#X connect 15 0 17 0;
+#X connect 16 0 48 0;
+#X connect 16 1 1 0;
+#X connect 18 0 29 0;
+#X connect 19 0 21 0;
+#X connect 20 0 19 0;
+#X connect 21 0 13 1;
+#X connect 22 0 13 1;
+#X connect 22 0 21 1;
+#X connect 23 0 15 0;
+#X connect 23 0 48 1;
+#X connect 24 0 9 0;
+#X connect 25 0 28 0;
+#X connect 26 0 30 0;
+#X connect 27 0 50 1;
+#X connect 28 0 26 0;
+#X connect 29 0 1 1;
+#X connect 29 0 33 0;
+#X connect 29 1 25 0;
+#X connect 30 0 27 0;
+#X connect 31 0 10 0;
+#X connect 32 0 0 0;
+#X connect 33 0 44 0;
+#X connect 34 0 12 0;
+#X connect 36 0 18 0;
+#X connect 36 0 35 0;
+#X connect 37 0 12 1;
+#X connect 38 0 11 0;
+#X connect 39 0 37 0;
+#X connect 40 0 41 0;
+#X connect 41 0 20 0;
+#X connect 42 0 43 0;
+#X connect 43 0 29 0;
+#X connect 44 0 45 0;
+#X connect 45 0 50 0;
+#X connect 46 0 23 0;
+#X connect 47 0 46 0;
+#X connect 48 0 47 0;
+#X connect 49 0 13 0;
+#X connect 50 0 47 2;
diff --git a/externals/gridflow/extra/jmax_format.rb b/externals/gridflow/extra/jmax_format.rb
index c1b93ce5..8fba0a73 100644
--- a/externals/gridflow/extra/jmax_format.rb
+++ b/externals/gridflow/extra/jmax_format.rb
@@ -1,5 +1,5 @@
 =begin
-	$Id: jmax_format.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: jmax_format.rb,v 1.2 2006-03-15 04:40:47 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
diff --git a/externals/gridflow/extra/puredata_format.rb b/externals/gridflow/extra/puredata_format.rb
index 508f545e..eaf32962 100644
--- a/externals/gridflow/extra/puredata_format.rb
+++ b/externals/gridflow/extra/puredata_format.rb
@@ -1,5 +1,5 @@
 =begin
-	$Id: puredata_format.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: puredata_format.rb,v 1.2 2006-03-15 04:40:47 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
diff --git a/externals/gridflow/extra/server_1_grid.rb b/externals/gridflow/extra/server_1_grid.rb
index f1f4a9fc..fcc847f2 100644
--- a/externals/gridflow/extra/server_1_grid.rb
+++ b/externals/gridflow/extra/server_1_grid.rb
@@ -1,4 +1,4 @@
-# $Id: server_1_grid.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+# $Id: server_1_grid.rb,v 1.2 2006-03-15 04:40:47 matju Exp $
 
 require "socket"
 require "smpte" # in this folder
diff --git a/externals/gridflow/extra/server_1_ppm.rb b/externals/gridflow/extra/server_1_ppm.rb
index dad6d3f7..5f2ec52e 100644
--- a/externals/gridflow/extra/server_1_ppm.rb
+++ b/externals/gridflow/extra/server_1_ppm.rb
@@ -1,4 +1,4 @@
-# $Id: server_1_ppm.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+# $Id: server_1_ppm.rb,v 1.2 2006-03-15 04:40:47 matju Exp $
 
 require "socket"
 
diff --git a/externals/gridflow/extra/smpte.rb b/externals/gridflow/extra/smpte.rb
index c14c936e..6b568de2 100644
--- a/externals/gridflow/extra/smpte.rb
+++ b/externals/gridflow/extra/smpte.rb
@@ -1,5 +1,5 @@
 # Copyright 2001 by Mathieu Bouchard
-# $Id: smpte.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+# $Id: smpte.rb,v 1.2 2006-03-15 04:40:47 matju Exp $
 
 # The standard SMPTE color test pattern.
 # AS SEEN ON TV !!! (but this is a cheap plastic imitation)
diff --git a/externals/gridflow/format/aalib.c b/externals/gridflow/format/aalib.c
index f014a632..cf029dfe 100644
--- a/externals/gridflow/format/aalib.c
+++ b/externals/gridflow/format/aalib.c
@@ -1,5 +1,5 @@
 /*
-	$Id: aalib.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: aalib.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
diff --git a/externals/gridflow/format/dc1394.c b/externals/gridflow/format/dc1394.c
index 1632bef7..5349c231 100644
--- a/externals/gridflow/format/dc1394.c
+++ b/externals/gridflow/format/dc1394.c
@@ -1,5 +1,5 @@
 /*
-	$Id: dc1394.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: dc1394.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/format/jpeg.c b/externals/gridflow/format/jpeg.c
index e59d8e06..4363be52 100644
--- a/externals/gridflow/format/jpeg.c
+++ b/externals/gridflow/format/jpeg.c
@@ -1,5 +1,5 @@
 /*
-	$Id: jpeg.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: jpeg.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
@@ -42,6 +42,7 @@ struct FormatJPEG : Format {
 	int fd;
 	FILE *f;
 	\decl Ruby frame ();
+	\decl void quality (short quality);
 	\decl void initialize (Symbol mode, Symbol source, String filename);
 	\grin 0 int
 };
@@ -108,6 +109,13 @@ static bool gfeof(FILE *f) {
 	return Qnil;
 }
 
+\def void quality (short quality) {
+	quality = min(max((int)quality,0),100);
+	// should the last arg ("baseline") be set to true ?
+	// and what is it for? is it for accuracy of the DC component?
+	jpeg_set_quality(&cjpeg,quality,false);
+}
+
 \def void initialize (Symbol mode, Symbol source, String filename) {
 	rb_call_super(argc,argv);
 	if (source!=SYM(file)) RAISE("usage: jpeg file <filename>");
@@ -121,7 +129,7 @@ static bool gfeof(FILE *f) {
 
 \classinfo {
 	IEVAL(rself,
-	"install '#in:jpeg',1,1;@mode=6;"
+	"install '#io:jpeg',1,1;@mode=6;"
 	"include GridFlow::EventIO; suffixes_are'jpeg','jpg'");
 }
 \end class FormatJPEG
diff --git a/externals/gridflow/format/main.rb b/externals/gridflow/format/main.rb
index 6e31be75..1cac124f 100644
--- a/externals/gridflow/format/main.rb
+++ b/externals/gridflow/format/main.rb
@@ -1,5 +1,5 @@
 =begin
-	$Id: main.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: main.rb,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
@@ -237,7 +237,7 @@ GridObject.subclass("#in",1,2) {
 	def _0_set frame; check_file_open; @format.seek frame end
 	def _0_reset; check_file_open; @format.seek 0; end
 	def _1_grid(*a) send_out 0,:grid,*a end
-	def _0_load name; _0_open name; _0_bang; _0_close end
+	def _0_load(*a); _0_open(*a); _0_bang; _0_close end
 }
 
 GridObject.subclass("#out",1,1) {
@@ -350,8 +350,7 @@ module EventIO
 		else
 			r.close
 			STDOUT.reopen w
-			STDIN.reopen @stream
-			@stream = File.open filename, "r"
+			STDIN.reopen filename, "r"
 			exec "gzip", "-dc"
 		end
 	end
@@ -364,8 +363,7 @@ module EventIO
 		else
 			w.close
 			STDIN.reopen r
-			STDOUT.reopen @stream
-			@stream = File.open filename, "w"
+			STDOUT.reopen filename, "w"
 			exec "gzip", "-c"
 		end
 	end
@@ -375,7 +373,7 @@ module EventIO
 			when :in; "r"
 			when :out; "w"
 			else raise "bad mode" end
-		close
+		@stream.close if @stream
 		case source
 		when :file
 			filename = args[0].to_s
@@ -721,6 +719,27 @@ Format.subclass("#io:ppm",1,1) {
 	end
 	def _0_rgrid_flow(data) @stream.write @bp.pack(data) end
 	def _0_rgrid_end; @stream.flush end
+	self
+}.subclass("#io:tk",1,1) {
+	install_rgrid 0
+	def initialize(mode)
+		if mode!=:out then raise "only #out" end
+		super(mode,:file,"/tmp/tk-#{$$}-#{object_id}.ppm")
+		GridFlow.gui "toplevel .#{object_id}\n"
+		GridFlow.gui "wm title . GridFlow/Tk\n"
+		GridFlow.gui "image create photo #{object_id} -width 320 -height 240\n"
+		GridFlow.gui "pack [label .#{object_id}.im -image #{object_id}]\n"
+	end
+	def _0_rgrid_end
+		super
+		@stream.seek 0,IO::SEEK_SET
+		GridFlow.gui "image create photo #{object_id} -file /tmp/tk-#{$$}-#{object_id}.ppm\n"
+	end
+	def delete
+		GridFlow.gui "destroy .#{object_id}\n"
+		GridFlow.gui "image delete #{object_id}\n"
+	end
+	alias close delete
 }
 
 Format.subclass("#io:targa",1,1) {
diff --git a/externals/gridflow/format/mpeg3.c b/externals/gridflow/format/mpeg3.c
index d6820ccd..c2b85192 100644
--- a/externals/gridflow/format/mpeg3.c
+++ b/externals/gridflow/format/mpeg3.c
@@ -1,5 +1,5 @@
 /*
-	$Id: mpeg3.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: mpeg3.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
@@ -88,7 +88,7 @@ struct FormatMPEG3 : Format {
 }
 
 \classinfo {
-	IEVAL(rself,"install '#in:mpeg',1,1;@flags=4;"
+	IEVAL(rself,"install '#io:mpeg',1,1;@flags=4;"
 	"@comment='Motion Picture Expert Group Format"
 	" (using HeroineWarrior\\'s)';suffixes_are'mpg,mpeg'");
 }
diff --git a/externals/gridflow/format/opengl.c b/externals/gridflow/format/opengl.c
new file mode 100644
index 00000000..39979f68
--- /dev/null
+++ b/externals/gridflow/format/opengl.c
@@ -0,0 +1,181 @@
+/*
+	$Id: opengl.c,v 1.1 2006-03-15 04:54:54 matju Exp $
+
+	GridFlow
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
+
+	This program is free software; you can redistribute it and/or
+	modify it under the terms of the GNU General Public License
+	as published by the Free Software Foundation; either version 2
+	of the License, or (at your option) any later version.
+
+	See file ../COPYING for further informations on licensing terms.
+
+	This program is distributed in the hope that it will be useful,
+	but WITHOUT ANY WARRANTY; without even the implied warranty of
+	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+	GNU General Public License for more details.
+
+	You should have received a copy of the GNU General Public License
+	along with this program; if not, write to the Free Software
+	Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+*/
+
+#include "../base/grid.h.fcs"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+#include <sys/time.h>
+#include <signal.h>
+#ifdef MACOSX
+#include <OpenGL/gl.h>
+#include <OpenGL/glu.h>
+#else
+#include <GL/gl.h>
+#include <GL/glu.h>
+#include <GL/glut.h>
+#endif
+#include <setjmp.h>
+
+static bool in_use = false;
+
+\class FormatOpenGL < Format
+struct FormatOpenGL : Format {
+	int window;
+	GLuint gltex;
+	P<BitPacking> bit_packing;
+	P<Dim> dim;
+	Pt<uint8> buf;
+	\decl void call ();
+	\decl void initialize (Symbol mode);
+	\decl void close ();
+	\decl void resize_window (int sx, int sy);
+	\grin 0
+};
+
+static jmp_buf hack;
+static void my_idle () { longjmp(hack,1); }
+
+\def void call () {
+	int32 sy = dim->get(0);
+	int32 sx = dim->get(1);
+	glEnable(GL_TEXTURE_2D);
+	if (!gltex) {
+	}
+	glTexSubImage2D(GL_TEXTURE_2D,0,0,0,sx,sy,GL_RGBA,GL_UNSIGNED_BYTE,buf);
+	glBindTexture(GL_TEXTURE_2D, gltex);
+	glBegin(GL_QUADS);
+	glColor3f(1.f,1.f,1.f);
+	glTexCoord2f(0.f,0.f); glVertex2f(0.f,0.f);
+	glTexCoord2f(1.f,0.f); glVertex2f( sx,0.f);
+	glTexCoord2f(1.f,1.f); glVertex2f( sx, sy);
+	glTexCoord2f(0.f,1.f); glVertex2f(0.f, sy);
+	glEnd();
+
+	//Here comes some (un)fair amount of arm-twisting
+	//This is for processing queued events and then "returning".
+	glutIdleFunc(my_idle);
+	if(!setjmp(hack)) glutMainLoop();
+	//done
+
+	IEVAL(rself,"@clock.delay 100");
+}
+
+\def void resize_window (int sx, int sy) {L
+	dim = new Dim(sy,sx,3);
+	char foo[666];
+	sprintf(foo,"GridFlow/GL (%d,%d,3)",sy,sx);
+	if ((unsigned)window==0xDeadBeef) {
+		glutInitWindowSize(sx,sy);
+		window = glutCreateWindow(foo);
+	} else {
+		glutReshapeWindow(sx,sy);
+	}
+	if (buf) delete buf.p;
+	buf = ARRAY_NEW(uint8,sy*sx*4);
+	glViewport(0,0,sx,sy);
+	glMatrixMode(GL_PROJECTION);
+	glLoadIdentity();
+	glOrtho(0,sx,sy,0,-99999,99999);
+	glMatrixMode(GL_MODELVIEW);
+	glLoadIdentity();
+
+	if (gltex) glDeleteTextures(1, (GLuint*)&gltex);
+	glGenTextures(1, (GLuint*)&gltex);
+	glBindTexture(GL_TEXTURE_2D,gltex);
+	glPixelStorei(GL_UNPACK_ALIGNMENT,1);
+	glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_S,GL_CLAMP);
+	glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_T,GL_CLAMP);
+	glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MIN_FILTER,GL_LINEAR);
+	glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_MAG_FILTER,GL_LINEAR);
+	glTexEnvf(GL_TEXTURE_ENV,GL_TEXTURE_ENV_MODE,GL_MODULATE);
+	glTexImage2D(GL_TEXTURE_2D,0,GL_RGBA,sx,sy,0,GL_RGBA,GL_UNSIGNED_BYTE,NULL);
+
+}
+
+GRID_INLET(FormatOpenGL,0) {
+	if (in->dim->n != 3)
+		RAISE("expecting 3 dimensions: rows,columns,channels");
+	if (in->dim->get(2) != 3)
+		RAISE("expecting 3 channels: red,green,blue (got %d)",in->dim->get(2));
+	int sxc = in->dim->prod(1);
+	int sx = in->dim->get(1), osx = dim->get(1);
+	int sy = in->dim->get(0), osy = dim->get(0);
+	in->set_factor(sxc);
+	if (sx!=osx || sy!=osy) resize_window(0,0,sx,sy);
+} GRID_FLOW {
+	int sxc = in->dim->prod(1);
+	int sx = in->dim->get(1);
+	int bypl = 4*sx;
+	int y = in->dex / sxc;
+	assert((in->dex % sxc) == 0);
+	assert((n       % sxc) == 0);
+	for (; n>0; y++, data+=sxc, n-=sxc) bit_packing->pack(sx, data, buf+y*bypl);
+	} GRID_FINISH {
+} GRID_END
+
+\def void close () {
+	IEVAL(rself,"@clock.unset");
+	if (gltex) glDeleteTextures(1, (GLuint*)&gltex);
+	if (buf) delete buf.p;
+	in_use=false;
+	if ((unsigned)window!=0xDeadBeef) {
+		glutDestroyWindow(window);
+		window=0xDeadBeef;
+	}
+}
+
+\def void initialize (Symbol mode) {
+	rb_call_super(argc,argv);
+	if (in_use) RAISE("only one #io:opengl object at a time; sorry");
+	in_use=true;
+	if (mode!=SYM(out)) RAISE("write-only, sorry");
+	gltex = 0;
+	glEnable(GL_TEXTURE_2D);
+	glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_FASTEST); 
+	glClearColor(0.0f, 0.0f, 0.0f, 1.0f);
+	glClear(GL_COLOR_BUFFER_BIT);
+	glDisable(GL_ALPHA_TEST);
+	glDisable(GL_CULL_FACE);         
+	glDisable(GL_DITHER);
+	glDisable(GL_DEPTH_TEST);
+	glDisable(GL_LIGHTING);
+	window = 0xDeadBeef;
+	int dummy = 0;
+	glutInit(&dummy,0);
+	glutInitDisplayMode(GLUT_RGBA);
+	resize_window(0,0,320,240);
+	uint32 mask[3] = {0xff000000,0x00ff0000,0x0000ff00};
+	bit_packing = new BitPacking(4,4,3,mask);
+	IEVAL(rself,"@clock = Clock.new self; @clock.delay 0");
+	gfpost("@clock = Clock.new self");
+}
+
+\classinfo {
+	IEVAL(rself,"install '#io:opengl',1,1;@comment='Silicon Graphics OpenGL'");
+}
+\end class FormatOpenGL
+void startup_opengl () {
+	\startall
+}
\ No newline at end of file
diff --git a/externals/gridflow/format/png.c b/externals/gridflow/format/png.c
index 69a0254e..5db0c254 100644
--- a/externals/gridflow/format/png.c
+++ b/externals/gridflow/format/png.c
@@ -1,5 +1,5 @@
 /*
-	$Id: png.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: png.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/format/quartz.m b/externals/gridflow/format/quartz.m
index d7f2863a..9cb00078 100644
--- a/externals/gridflow/format/quartz.m
+++ b/externals/gridflow/format/quartz.m
@@ -1,5 +1,5 @@
 /*
-	$Id: quartz.m,v 1.1 2005-10-04 02:15:31 matju Exp $
+	$Id: quartz.m,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
diff --git a/externals/gridflow/format/quicktimeapple.c b/externals/gridflow/format/quicktimeapple.c
index 0664322e..2a485424 100644
--- a/externals/gridflow/format/quicktimeapple.c
+++ b/externals/gridflow/format/quicktimeapple.c
@@ -1,5 +1,5 @@
 /*
-	$Id: quicktimeapple.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: quicktimeapple.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/format/quicktimehw.c b/externals/gridflow/format/quicktimehw.c
index 4ae77209..58f415a0 100644
--- a/externals/gridflow/format/quicktimehw.c
+++ b/externals/gridflow/format/quicktimehw.c
@@ -1,8 +1,8 @@
 /*
-	$Id: quicktimehw.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: quicktimehw.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005,2006 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -21,18 +21,11 @@
 	Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */
 
+#define QUICKTIMEHW_INCLUDE_HERE
 #include "../base/grid.h.fcs"
 #include <stdlib.h>
 #include <string.h>
 #include <errno.h>
-#include <quicktime/quicktime.h>
-#include <quicktime/colormodels.h>
-
-#include <quicktime/lqt_version.h>
-#ifdef LQT_VERSION
-#include <quicktime/lqt.h>
-#include <quicktime/lqt_codecinfo.h>
-#endif
 
 \class FormatQuickTimeHW < Format
 struct FormatQuickTimeHW : Format {
@@ -218,6 +211,8 @@ GRID_INLET(FormatQuickTimeHW,0) {
 \end ruby
 );
 
+//#define L fprintf(stderr,"%s:%d in %s\n",__FILE__,__LINE__,__PRETTY_FUNCTION__);
+
 #ifdef LQT_VERSION
 	lqt_registry_init();
 	int n = lqt_get_num_video_codecs();
@@ -225,6 +220,10 @@ GRID_INLET(FormatQuickTimeHW,0) {
 	Ruby fourccs = rb_hash_new();
 	for (int i=0; i<n; i++) {
 		const lqt_codec_info_t *s = lqt_get_video_codec_info(i);
+		if (!s->name) {
+			fprintf(stderr,"[#in quicktime]: skipping codec with null name!\n");
+			continue;
+		}
 		Ruby name = rb_str_new2(s->name);
 		Ruby f = rb_ary_new2(s->num_fourccs);
 		for (int j=0; j<s->num_fourccs; j++) {
diff --git a/externals/gridflow/format/sdl.c b/externals/gridflow/format/sdl.c
index 628f71ee..32ba64a5 100644
--- a/externals/gridflow/format/sdl.c
+++ b/externals/gridflow/format/sdl.c
@@ -1,5 +1,5 @@
 /*
-	$Id: sdl.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: sdl.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/format/videodev.c b/externals/gridflow/format/videodev.c
index e907eaa9..0f458408 100644
--- a/externals/gridflow/format/videodev.c
+++ b/externals/gridflow/format/videodev.c
@@ -1,5 +1,5 @@
 /*
-	$Id: videodev.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: videodev.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003,2004 by Mathieu Bouchard
diff --git a/externals/gridflow/format/x11.c b/externals/gridflow/format/x11.c
index 62041f06..9237a6b6 100644
--- a/externals/gridflow/format/x11.c
+++ b/externals/gridflow/format/x11.c
@@ -1,8 +1,8 @@
 /*
-	$Id: x11.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: x11.c,v 1.2 2006-03-15 04:37:46 matju Exp $
 
 	GridFlow
-	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
 
 	This program is free software; you can redistribute it and/or
 	modify it under the terms of the GNU General Public License
@@ -19,8 +19,9 @@
 	You should have received a copy of the GNU General Public License
 	along with this program; if not, write to the Free Software
 	Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-*/
 
+	Note: some of the code was adapted from PDP's (the XVideo stuff).
+*/
 #include "../base/grid.h.fcs"
 #include <ctype.h>
 #include <stdio.h>
@@ -28,66 +29,67 @@
 #include <string.h>
 #include <errno.h>
 #include <sys/time.h>
-
 #include <X11/Xlib.h>
 #include <X11/Xutil.h>
 #include <X11/StringDefs.h>
-
-/* X11 Error Handler type */
-typedef int (*XEH)(Display *, XErrorEvent *);
-
 #ifdef HAVE_X11_SHARED_MEMORY
 #include <sys/ipc.h>
 #include <sys/shm.h>
 #include <X11/extensions/XShm.h>
 #endif
+#ifdef HAVE_X11_XVIDEO
+#include <X11/extensions/Xv.h>
+#include <X11/extensions/Xvlib.h>
+#endif
+
+#undef L
+#define L gfpost("%s:%d in %s",__FILE__,__LINE__,__PRETTY_FUNCTION__);
+
+/* X11 Error Handler type */
+typedef int (*XEH)(Display *, XErrorEvent *);
 
 \class FormatX11 < Format
 struct FormatX11 : Format {
-	template <class T> void frame_by_type (T bogus);
 /* at the Display/Screen level */
 	Display *display; /* connection to xserver */
 	Visual *visual;   /* screen properties */
 	Window root_window;
 	Colormap colormap; /* for 256-color mode */
-	long black,white; /* color numbers in default colormap */
 	short depth;
-	bool use_shm;	   /* should use shared memory? */
+	int transfer;	   /* 0=plain 1=xshm 2=xvideo */
 	bool use_stripes;  /* use alternate conversion in 256-color mode */
-	
 /* at the Window level */
-	int autodraw;        /* how much to send to the display at once */
 	Window window;       /* X11 window number */
 	Window parent;       /* X11 window number of the parent */
 	GC imagegc;          /* X11 graphics context (like java.awt.Graphics) */
 	XImage *ximage;      /* X11 image descriptor */
-	char *name;          /* window name (for use by window manager) */
 	Pt<uint8> image;     /* the real data (that XImage binds to) */
 	bool is_owner;
-	int pos_x, pos_y;
-
+	int32 pos[2];
 	P<BitPacking> bit_packing;
 	P<Dim> dim;
 	bool lock_size;
 	bool override_redirect;
-
 #ifdef HAVE_X11_SHARED_MEMORY
 	XShmSegmentInfo *shm_info; /* to share memory with X11/Unix */
 #endif
-
-	Atom wmProtocolsAtom;
-	Atom wmDeleteAtom;
-
-	FormatX11 () : use_stripes(false), 
-	autodraw(1), window(0), ximage(0), name(0), image(Pt<uint8>()), is_owner(true),
+#ifdef HAVE_X11_XVIDEO
+    int xv_format;
+    int xv_port;
+    XvImage *xvi;
+    unsigned char *data;
+    int last_encoding;
+#endif
+	FormatX11 () : transfer(0), use_stripes(false), 
+	window(0), ximage(0), image(Pt<uint8>()), is_owner(true),
 	dim(0), lock_size(false), override_redirect(false)
 #ifdef HAVE_X11_SHARED_MEMORY
 		, shm_info(0)
 #endif
 	{}
-
+	template <class T> void frame_by_type (T bogus);
 	void show_section(int x, int y, int sx, int sy);
-	void set_wm_hints (int sx, int sy);
+	void set_wm_hints ();
 	void dealloc_image ();
 	bool alloc_image (int sx, int sy);
 	void resize_window (int sx, int sy);
@@ -95,56 +97,68 @@ struct FormatX11 : Format {
 	void report_pointer(int y, int x, int state);
 	void prepare_colormap();
 	Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, int level=0);
-
 	\decl void initialize (...);
 	\decl void frame ();
 	\decl void close ();
 	\decl void call ();
 	\decl void _0_out_size (int sy, int sx);
-	\decl void _0_draw ();
-	\decl void _0_autodraw (int autodraw);
 	\decl void _0_setcursor (int shape);
 	\decl void _0_hidecursor ();
 	\decl void _0_set_geometry (int y, int x, int sy, int sx);
 	\decl void _0_fall_thru (int flag);
+	\decl void _0_transfer (Symbol s);
+	\decl void _0_title (String s=Qnil);
 	\grin 0 int
 };
 
 /* ---------------------------------------------------------------- */
 
+static const char *xfers[3] = {"plain","xshm","xvideo"};
+
 void FormatX11::show_section(int x, int y, int sx, int sy) {
-	if (y>dim->get(0)||x>dim->get(1)) return;
-	if (y+sy>dim->get(0)) sy=dim->get(0)-y;
-	if (x+sx>dim->get(1)) sx=dim->get(1)-x;
+	int zy=dim->get(0), zx=dim->get(1);
+	if (y>zy||x>zx) return;
+	if (y+sy>zy) sy=zy-y;
+	if (x+sx>zx) sx=zx-x;
+	switch (transfer) {
+	case 0: XPutImage(display,window,imagegc,ximage,x,y,x,y,sx,sy);
+		XFlush(display);
+	break;
 #ifdef HAVE_X11_SHARED_MEMORY
-	if (use_shm) {
-		XSync(display,False);
+	case 1:	XSync(display,False);
 		XShmPutImage(display,window,imagegc,ximage,x,y,x,y,sx,sy,False);
-		/* should completion events be waited for? looks like a bug */
-	} else
+		XFlush(display);
+		//XPutImage( display,window,imagegc,ximage,x,y,x,y,sx,sy);
+		// should completion events be waited for? looks like a bug
+		break;
 #endif
-		XPutImage(display,window,imagegc,ximage,x,y,x,y,sx,sy);
-	XFlush(display);
+#ifdef HAVE_X11_XVIDEO
+	case 2:
+	break;
+#endif
+	default: RAISE("transfer mode '%s' not available", xfers[transfer]);
+	}
 }
 
 /* window manager hints, defines the window as non-resizable */
-void FormatX11::set_wm_hints (int sx, int sy) {
+void FormatX11::set_wm_hints () {
+	Ruby title = rb_ivar_get(rself,SI(@title));
 	if (!is_owner) return;
-	XWMHints wmhints;
-	XTextProperty window_name, icon_name;
-	XSizeHints hints;
-	// enable recommended, maximum and minimum size
-	hints.flags=PSize|PMaxSize|PMinSize;
-	// set those
-	hints.min_width  = hints.max_width  = hints.width  = sx;
-	hints.min_height = hints.max_height = hints.height = sy;
-
-	wmhints.input = True;
-	wmhints.flags = InputHint;
-	XStringListToTextProperty((char **)&name, 1, &window_name);
-	XStringListToTextProperty((char **)&name, 1, &icon_name);
-	XSetWMProperties(display, window,
-		&window_name, &icon_name, NULL, 0, &hints, &wmhints, NULL);
+	XWMHints wmh;
+	char buf[256],*bufp=buf;
+	if (title==Qnil) {
+		sprintf(buf,"GridFlow (%d,%d,%d)",dim->get(0),dim->get(1),dim->get(2));
+	} else {
+		sprintf(buf,"%.255s",rb_str_ptr(title));
+	}
+	XTextProperty wtitle; XStringListToTextProperty((char **)&bufp, 1, &wtitle);
+	XSizeHints sh;
+	sh.flags=PSize|PMaxSize|PMinSize;
+	sh.min_width  = sh.max_width  = sh.width  = dim->get(1);
+	sh.min_height = sh.max_height = sh.height = dim->get(0);
+	wmh.input = True;
+	wmh.flags = InputHint;
+	XSetWMProperties(display,window,&wtitle,&wtitle,0,0,&sh,&wmh,0);
 }
 
 void FormatX11::report_pointer(int y, int x, int state) {
@@ -202,30 +216,16 @@ void FormatX11::report_pointer(int y, int x, int state) {
 			return;
 		}break;
 		case ConfigureNotify:break; // as if we cared
-		case ClientMessage:{
-			// tnx to vektor&walken
-			/*
-			if (e.xclient.message_type==wmProtocolsAtom
-			&& e.xclient.format==32
-			&& (Atom)(e.xclient.data.l[0])==wmDeleteAtom) {
-				gfpost("This window is being closed, so this handler will close too!");
-				rb_funcall(rself,SI(close),0);
-				return;
-			}
-			*/
-		}break;
 		}
 	}
 	IEVAL(rself,"@clock.delay 20");
 }
 
 \def void frame () {
-	XGetSubImage(display, window,
-		0, 0, dim->get(1), dim->get(0),
+	XGetSubImage(display, window, 0, 0, dim->get(1), dim->get(0),
 		(unsigned)-1, ZPixmap, ximage, 0, 0);
 	GridOutlet out(this,0,dim,NumberTypeE_find(rb_ivar_get(rself,SI(@cast))));
-	int sy=dim->get(0), sx=dim->get(1);
-	int bs=dim->prod(1);
+	int sy=dim->get(0), sx=dim->get(1), bs=dim->prod(1);
 	STACK_ARRAY(uint8,b2,bs);
 	for(int y=0; y<sy; y++) {
 		Pt<uint8> b1 = Pt<uint8>(image,ximage->bytes_per_line*dim->get(0))
@@ -238,86 +238,129 @@ void FormatX11::report_pointer(int y, int x, int state) {
 /* loathe Xlib's error handlers */
 static FormatX11 *current_x11;
 static int FormatX11_error_handler (Display *d, XErrorEvent *xee) {
-	gfpost("X11 reports Error: display=0x%08x",(int)d);
-	gfpost("serial=0x%08x error=0x%08x request=0x%08lx minor=0x%08x",
+	gfpost("XErrorEvent: type=0x%08x display=0x%08x xid=0x%08x",
+		xee->type, xee->display, xee->resourceid);
+	gfpost("... serial=0x%08x error=0x%08x request=0x%08lx minor=0x%08x",
 		xee->serial, xee->error_code, xee->request_code, xee->minor_code);
-	current_x11->use_shm = false;
-	return 42; /* it seems that the return value is ignored. */
-}
-
-void FormatX11::dealloc_image () {
-	if (!ximage) return;
-	if (use_shm) {
-	#ifdef HAVE_X11_SHARED_MEMORY
-		shmdt(ximage->data);
-		XShmDetach(display,shm_info);
-		if (shm_info) {delete shm_info; shm_info=0;}
-		//ximage->data = new char[1]; // bogus
-		//ximage->data = 0;
-		//XDestroyImage(ximage);
-		XFree(ximage);
-		ximage = 0;
-		image = Pt<uint8>();
-	#endif	
-	} else {
-		//XDestroyImage(ximage);
-		XFree(ximage);
-		ximage = 0;
-		image = Pt<uint8>();
+	if (current_x11->transfer==1) {
+		gfpost("(note: turning shm off)");
+		current_x11->transfer = 0;
 	}
+	return 42; /* it seems that the return value is ignored. */
 }
 
 bool FormatX11::alloc_image (int sx, int sy) {
-	dim = new Dim(sy, sx, 3);
+	dim = new Dim(sy,sx,3);
 	dealloc_image();
 	if (sx==0 || sy==0) return false;
+	current_x11 = this;
+	switch (transfer) {
+	case 0: {
+		ximage = XCreateImage(display,visual,depth,ZPixmap,0,0,sx,sy,8,0);
+		int size = ximage->bytes_per_line*ximage->height;
+		if (!ximage) RAISE("can't create image"); 
+		image = ARRAY_NEW(uint8,size);
+		ximage->data = (int8 *)image;
+	} break;
 #ifdef HAVE_X11_SHARED_MEMORY
-	if (use_shm) {
+	case 1: {
 		shm_info = new XShmSegmentInfo;
 		ximage = XShmCreateImage(display,visual,depth,ZPixmap,0,shm_info,sx,sy);
-		if (!ximage) {
-			gfpost("shm got disabled (1), retrying...");
-			return alloc_image(sx,sy);}
-		shm_info->shmid = shmget(IPC_PRIVATE,
-			ximage->bytes_per_line*ximage->height, IPC_CREAT|0777);
-		if(shm_info->shmid < 0)
-			RAISE("ERROR: shmget failed: %s",strerror(errno));
-		ximage->data = shm_info->shmaddr =
-			(char *)shmat(shm_info->shmid,0,0);
-		image = Pt<uint8>((uint8 *)ximage->data,
-			ximage->bytes_per_line*sy);
+                if (!ximage) {gfpost("shm got disabled, retrying..."); transfer=0;}
+		XSync(display,0);
+		if (transfer==0) return alloc_image(sx,sy);
+		int size = ximage->bytes_per_line*ximage->height;
+		gfpost("size = %d",size);
+		shm_info->shmid = shmget(IPC_PRIVATE,size,IPC_CREAT|0777);
+		if(shm_info->shmid < 0) RAISE("shmget() failed: %s",strerror(errno));
+		ximage->data = shm_info->shmaddr = (char *)shmat(shm_info->shmid,0,0);
+		if ((long)(shm_info->shmaddr) == -1) RAISE("shmat() failed: %s",strerror(errno));
+		gfpost("shmaddr=%p",shm_info->shmaddr);
+		image = Pt<uint8>((uint8 *)ximage->data,size);
 		shm_info->readOnly = False;
-		current_x11 = this;
-		//XSetErrorHandler(FormatX11_error_handler);
 		if (!XShmAttach(display, shm_info)) RAISE("ERROR: XShmAttach: big problem");
 		XSync(display,0); // make sure the server picks it up
-		//XSetErrorHandler(0);
-		/* yes, this can be done now. should cause auto-cleanup. */
+		// yes, this can be done now. should cause auto-cleanup.
 		shmctl(shm_info->shmid,IPC_RMID,0);
-		if (!use_shm) {
-			gfpost("shm got disabled (2), retrying...");
-			return alloc_image(sx,sy);}
-	} else
+		if (transfer==0) return alloc_image(sx,sy);
+	} break;
+#endif
+#ifdef HAVE_X11_XVIDEO
+	case 2: {
+	unsigned int ver, rel, req, ev, err, i, j, adaptors, formats;
+	XvAdaptorInfo *ai;
+	if (Success != XvQueryExtension(display,&ver,&rel,&req,&ev,&err)) RAISE("XvQueryExtension problem");
+	/* find + lock port */
+	if (Success != XvQueryAdaptors(display,DefaultRootWindow(display),&adaptors,&ai)) RAISE("XvQueryAdaptors problem");
+	for (i = 0; i < adaptors; i++) {
+		if (ai[i].type&XvInputMask && ai[i].type&XvImageMask) {
+			for (j=0; j<ai[i].num_ports; j++) {
+				if (Success != XvGrabPort(display,ai[i].base_id+j,CurrentTime)) RAISE("XvGrabPort problem");
+				xv_port = ai[i].base_id + j;
+				goto breakout;
+			}
+		}
+	}
+	breakout:
+	XFree(ai);
+	if (!xv_port) RAISE("no xv_port");
+/*	unsigned int encn;
+	XvEncodingInfo *enc;
+	XvQueryEncodings(display,xv_port,&encn,&enc);
+	for (i=0; i<encn; i++) gfpost("XvEncodingInfo: name='%s' encoding_id=0x%08x",enc[i].name,enc[i].encoding_id);*/
+	gfpost("pdp_xvideo: grabbed port %d on adaptor %d",xv_port,i);
+	size_t size = sx*sy*4;
+	data = new uint8[size];
+	for (i=0; i<size; i++) data[i]=0;
+	xvi = XvCreateImage(display,xv_port,0x51525762,(char *)data,sx,sy);
+	last_encoding=-1;
+	if (!xvi) RAISE("XvCreateImage problem");
+	} break;
 #endif
-	ximage = XCreateImage(display,visual,depth,ZPixmap,0,0,sx,sy,8,0);
-	if (!ximage) RAISE("can't create image"); 
-	image = ARRAY_NEW(uint8,ximage->bytes_per_line*sy);
-	ximage->data = (int8 *)image;
+	default: RAISE("transfer mode '%s' not available", xfers[transfer]);
+	}
 	int status = XInitImage(ximage);
 	if (status!=1) gfpost("XInitImage returned: %d", status);
 	return true;
+retry:
+	gfpost("shm got disabled, retrying...");
+	return alloc_image(sx,sy);
+}
+
+void FormatX11::dealloc_image () {
+	if (!ximage) return;
+	switch (transfer) {
+	case 0: XFree(ximage); ximage=0; image=Pt<uint8>(); break;
+#ifdef HAVE_X11_SHARED_MEMORY
+	case 1:
+		shmdt(ximage->data);
+		XShmDetach(display,shm_info);
+		if (shm_info) {delete shm_info; shm_info=0;}
+		XFree(ximage);
+		ximage = 0;
+		image = Pt<uint8>();
+	break;
+#endif
+#ifdef HAVE_X11_XVIDEO
+	case 2: {
+		if (data) delete[] data;
+		if (xvi) XFree(xvi);
+		xvi=0;
+		data=0;
+	}
+	break;
+#endif
+	default: RAISE("transfer mode '%s' not available",xfers[transfer]);
+	}
 }
 
 void FormatX11::resize_window (int sx, int sy) {
 	if (sy<16) sy=16; if (sy>4096) RAISE("height too big");
 	if (sx<16) sx=16; if (sx>4096) RAISE("width too big");
 	alloc_image(sx,sy);
-	if (name) delete name;
-	name = new char[64];
-	sprintf(name,"GridFlow (%d,%d,3)",sy,sx);
 	if (window) {
 		if (is_owner && !lock_size) {
-			set_wm_hints(sx,sy);
+			set_wm_hints();
 			XResizeWindow(display,window,sx,sy);
 		}
 	} else {
@@ -325,23 +368,13 @@ void FormatX11::resize_window (int sx, int sy) {
 		xswa.do_not_propagate_mask = 0; //?
 		xswa.override_redirect = override_redirect; //#!@#$
 		window = XCreateWindow(display,
-			parent, pos_x, pos_y, sx, sy, 0,
+			parent, pos[1], pos[0], sx, sy, 0,
 			CopyFromParent, InputOutput, CopyFromParent,
 			CWOverrideRedirect|CWDontPropagate, &xswa);
 		if(!window) RAISE("can't create window");
-		set_wm_hints(sx,sy);
-		if (is_owner) {
-			// fall_thru 0
-			XSelectInput(display, window,
-			  ExposureMask | StructureNotifyMask | PointerMotionMask |
-			  ButtonPressMask | ButtonReleaseMask | ButtonMotionMask |
-			  KeyPressMask | KeyReleaseMask);
-			XMapRaised(display, window);
-		} else {
-			// fall_thru 1
-			XSelectInput(display, window,
-			  ExposureMask | StructureNotifyMask);
-		}
+		set_wm_hints();
+		_0_fall_thru(0,0,is_owner);
+		if (is_owner) XMapRaised(display, window);
 		imagegc = XCreateGC(display, window, 0, NULL);
 		if (visual->c_class == PseudoColor) prepare_colormap(); 
 	}
@@ -380,9 +413,8 @@ GRID_INLET(FormatX11,0) {
 			bit_packing->pack(sx, data, image+y*bypl);
 		}
 	}
-	if (autodraw==2) show_section(0,oy,sx,y-oy);
 } GRID_FINISH {
-	if (autodraw==1) show_section(0,0,in->dim->get(1),in->dim->get(0));
+	show_section(0,0,in->dim->get(1),in->dim->get(0));
 } GRID_END
 
 \def void close () {
@@ -398,13 +430,6 @@ GRID_INLET(FormatX11,0) {
 }
 
 \def void _0_out_size (int sy, int sx) { resize_window(sx,sy); }
-\def void _0_draw () { show_section(0,0,dim->get(1),dim->get(0)); }
-
-\def void _0_autodraw (int autodraw) {
-	if (autodraw<0 || autodraw>2)
-		RAISE("autodraw=%d is out of range",autodraw);
-	this->autodraw = autodraw;
-}
 
 \def void _0_setcursor (int shape) {
 	shape = 2*(shape&63);
@@ -448,42 +473,32 @@ void FormatX11::prepare_colormap() {
 }
 
 void FormatX11::open_display(const char *disp_string) {
-	int screen_num;
-	Screen *screen;
-
-	// Open an X11 connection
 	display = XOpenDisplay(disp_string);
 	if(!display) RAISE("ERROR: opening X11 display: %s",strerror(errno));
-
 	// btw don't expect too much from Xlib error handling.
 	// Xlib, you are so free of the ravages of intelligence...
 	XSetErrorHandler(FormatX11_error_handler);
-
-	screen   = DefaultScreenOfDisplay(display);
-	screen_num = DefaultScreen(display);
+	Screen *screen = DefaultScreenOfDisplay(display);
+	int screen_num = DefaultScreen(display);
 	visual   = DefaultVisual(display, screen_num);
-	white    = XWhitePixel(display,screen_num);
-	black    = XBlackPixel(display,screen_num);
 	root_window = DefaultRootWindow(display);
 	depth    = DefaultDepthOfScreen(screen);
 	colormap = 0;
 
 	switch(visual->c_class) {
-	case TrueColor: case DirectColor: /* without colormap */
-	break;
-	case PseudoColor: /* with colormap */
-		if (depth!=8)
-			RAISE("ERROR: with colormap, only supported depth is 8 (got %d)",
-				depth);
-	break;
-	default: RAISE("ERROR: visual type not supported (got %d)",
-		visual->c_class);
+	// without colormap
+	case TrueColor: case DirectColor: break;
+	// with colormap
+	case PseudoColor: if (depth!=8) RAISE("ERROR: with colormap, only supported depth is 8 (got %d)", depth); break;
+	default: RAISE("ERROR: visual type not supported (got %d)", visual->c_class);
 	}
 
-#ifdef HAVE_X11_SHARED_MEMORY
-	use_shm = !! XShmQueryExtension(display);
+#if defined(HAVE_X11_XVIDEO)
+	transfer = 2;
+#elif defined(HAVE_X11_SHARED_MEMORY)
+	transfer = !! XShmQueryExtension(display);
 #else
-	use_shm = false;
+	transfer = 0;
 #endif
 }
 
@@ -514,55 +529,56 @@ Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, i
 }
 
 \def void _0_set_geometry (int y, int x, int sy, int sx) {
-	pos_x = x;
-	pos_y = y;
+	pos[0]=y; pos[1]=x;
 	XMoveWindow(display,window,x,y);
 	resize_window(sx,sy);
 	XFlush(display);
 }
 
 \def void _0_fall_thru (int flag) {
-	if (flag) {
-		gfpost("falling through!");
-		XSelectInput(display, window,
-			ExposureMask | StructureNotifyMask);
-	} else {
-		gfpost("NOT falling through!");
-		XSelectInput(display, window,
-			ExposureMask | StructureNotifyMask |
-			PointerMotionMask |
-			ButtonPressMask | ButtonReleaseMask | ButtonMotionMask);
-	}
+	int mask = ExposureMask | StructureNotifyMask;
+	if (flag) mask |= ExposureMask|StructureNotifyMask|PointerMotionMask|
+		ButtonPressMask|ButtonReleaseMask|ButtonMotionMask|
+		KeyPressMask|KeyReleaseMask;
+	XSelectInput(display, window, mask);
 	XFlush(display);
 }
 
+\def void _0_transfer (Symbol s) {
+	if (s==SYM(plain))       transfer=0;
+	else if (s==SYM(xshm))   transfer=1;
+	else if (s==SYM(xvideo)) transfer=2;
+	else RAISE("unknown transfer mode (possible: plain xshm xvideo)");
+}
+
+\def void _0_title (String s=Qnil) {
+	rb_ivar_set(rself,SI(@title),s);
+	set_wm_hints();
+}
+
 \def void initialize (...) {
 	int sy=240, sx=320; // defaults
 	rb_call_super(argc,argv);
+	rb_ivar_set(rself,SI(@title),Qnil);
 	argv++, argc--;
 	VALUE domain = argc<1 ? SYM(here) : argv[0];
 	int i;
+	char host[256];
 	if (domain==SYM(here)) {
 		open_display(0);
 		i=1;
 	} else if (domain==SYM(local)) {
 		if (argc<2) RAISE("open x11 local: not enough args");
-		char host[256];
-		int dispnum = NUM2INT(argv[1]);
-		sprintf(host,":%d",dispnum);
+		sprintf(host,":%ld",NUM2LONG(argv[1]));
 		open_display(host);
 		i=2;
 	} else if (domain==SYM(remote)) {
 		if (argc<3) RAISE("open x11 remote: not enough args");
-		char host[256];
-		strcpy(host,rb_sym_name(argv[1]));
-		int dispnum = NUM2INT(argv[2]);
-		sprintf(host+strlen(host),":%d",dispnum);
+		sprintf(host,"%s:%ld",rb_sym_name(argv[1]),NUM2LONG(argv[2]));
 		open_display(host);
 		i=3;
 	} else if (domain==SYM(display)) {
 		if (argc<2) RAISE("open x11 display: not enough args");
-		char host[256];
 		strcpy(host,rb_sym_name(argv[1]));
 		for (int k=0; host[k]; k++) if (host[k]=='%') host[k]==':';
 		gfpost("mode `display', DISPLAY=`%s'",host);
@@ -574,16 +590,12 @@ Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, i
 
 	for(;i<argc;i++) {
 		Ruby a=argv[i];
-		if (a==SYM(override_redirect)) {
-			override_redirect = true;
-		} else if (a==SYM(use_stripes)){
-			use_stripes = true;
-		} else {
-			break;
-		}
+		if (a==SYM(override_redirect)) override_redirect = true;
+		else if (a==SYM(use_stripes))  use_stripes = true;
+		else RAISE("argument '%s' not recognized",rb_sym_name(argv[i]));
 	}
 
-	pos_x=pos_y=0;
+	pos[1]=pos[0]=0;
 	parent = root_window;
 	if (i>=argc) {
 	} else {
@@ -594,7 +606,7 @@ Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, i
 		} else if (winspec==SYM(embed)) {
 			Ruby title_s = rb_funcall(argv[i+1],SI(to_s),0);
 			char *title = strdup(rb_str_ptr(title_s));
-			sy = sx = pos_y = pos_x = 0;
+			sy = sx = pos[0] = pos[1] = 0;
 			parent = search_window_tree(root_window,XInternAtom(display,"WM_NAME",0),title);
 			free(title);
 			if (parent == 0xDeadBeef) RAISE("Window not found.");
@@ -617,7 +629,7 @@ Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, i
 				window = INT(winspec);
 			}
 			is_owner = false;
-			sy = sx = pos_y = pos_x = 0;
+			sy = sx = pos[0] = pos[1] = 0;
 		}
 	}
 
@@ -625,8 +637,7 @@ Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, i
 	resize_window(sx,sy);
 
 	if (is_owner) {
-		wmProtocolsAtom = XInternAtom(display, "WM_PROTOCOLS", False);
-		wmDeleteAtom    = XInternAtom(display, "WM_DELETE_WINDOW", False);
+		Atom wmDeleteAtom = XInternAtom(display, "WM_DELETE_WINDOW", False);
 		XSetWMProtocols(display,window,&wmDeleteAtom,1);
 	}
 	
@@ -642,14 +653,17 @@ Window FormatX11::search_window_tree (Window xid, Atom key, const char *value, i
 		uint32 masks[3] = { 0x07, 0x38, 0xC0 };
 		bit_packing = new BitPacking(disp_is_le, bpp/8, 3, masks);
 	} break;
+	default: { RAISE("huh?"); }
 	}
 	IEVAL(rself,"@clock = Clock.new self; @clock.delay 0");
+	show_section(0,0,sx,sy);
 }
 
 \classinfo {
-	IEVAL(rself,"install '#io:x11',1,1;@mode=6;@comment='X Window System Version 11.5'");
+	IEVAL(rself,"install '#io:x11',1,1;@mode=6;@comment='X Window System Version 11.x'");
 }
 \end class FormatX11
 void startup_x11 () {
 	\startall
 }
+
diff --git a/externals/gridflow/optional/lti.rb b/externals/gridflow/optional/lti.rb
new file mode 100644
index 00000000..f46c4141
--- /dev/null
+++ b/externals/gridflow/optional/lti.rb
@@ -0,0 +1,5 @@
+include GridFlow
+
+FObject.subclass("lti",1,1) {
+  # huh
+}
diff --git a/externals/gridflow/optional/rblti/LICENSE b/externals/gridflow/optional/rblti/LICENSE
new file mode 100644
index 00000000..34bac119
--- /dev/null
+++ b/externals/gridflow/optional/rblti/LICENSE
@@ -0,0 +1,462 @@
+The GNU Lesser General Public License (LGPL)

+

+Copyright (C) 1991, 1999 Free Software Foundation, Inc. 59 Temple

+Place, Suite 330, Boston, MA 02111-1307 USA Everyone is permitted to

+copy and distribute verbatim copies of this license document, but

+changing it is not allowed.

+

+[This is the first released version of the Lesser GPL. It also counts

+as the successor of the GNU Library Public License, version 2, hence

+the version number 2.1.]

+

+Preamble

+

+The licenses for most software are designed to take away your freedom

+to share and change it. By contrast, the GNU General Public Licenses

+are intended to guarantee your freedom to share and change free

+software--to make sure the software is free for all its users.

+

+This license, the Lesser General Public License, applies to some

+specially designated software packages--typically libraries--of the

+Free Software Foundation and other authors who decide to use it. You

+can use it too, but we suggest you first think carefully about whether

+this license or the ordinary General Public License is the better

+strategy to use in any particular case, based on the explanations

+below.

+

+When we speak of free software, we are referring to freedom of use,

+not price. Our General Public Licenses are designed to make sure that

+you have the freedom to distribute copies of free software (and charge

+for this service if you wish); that you receive source code or can get

+it if you want it; that you can change the software and use pieces of

+it in new free programs; and that you are informed that you can do

+these things.

+

+To protect your rights, we need to make restrictions that forbid

+distributors to deny you these rights or to ask you to surrender these

+rights. These restrictions translate to certain responsibilities for

+you if you distribute copies of the library or if you modify it.

+

+For example, if you distribute copies of the library, whether gratis

+or for a fee, you must give the recipients all the rights that we gave

+you. You must make sure that they, too, receive or can get the source

+code. If you link other code with the library, you must provide

+complete object files to the recipients, so that they can relink them

+with the library after making changes to the library and recompiling

+it. And you must show them these terms so they know their rights.

+

+We protect your rights with a two-step method: (1) we copyright the

+library, and (2) we offer you this license, which gives you legal

+permission to copy, distribute and/or modify the library.

+

+To protect each distributor, we want to make it very clear that there

+is no warranty for the free library. Also, if the library is modified

+by someone else and passed on, the recipients should know that what

+they have is not the original version, so that the original author's

+reputation will not be affected by problems that might be introduced

+by others.

+

+Finally, software patents pose a constant threat to the existence of

+any free program. We wish to make sure that a company cannot

+effectively restrict the users of a free program by obtaining a

+restrictive license from a patent holder. Therefore, we insist that

+any patent license obtained for a version of the library must be

+consistent with the full freedom of use specified in this license.

+

+Most GNU software, including some libraries, is covered by the

+ordinary GNU General Public License. This license, the GNU Lesser

+General Public License, applies to certain designated libraries, and

+is quite different from the ordinary General Public License. We use

+this license for certain libraries in order to permit linking those

+libraries into non-free programs.

+

+When a program is linked with a library, whether statically or using a

+shared library, the combination of the two is legally speaking a

+combined work, a derivative of the original library. The ordinary

+General Public License therefore permits such linking only if the

+entire combination fits its criteria of freedom. The Lesser General

+Public License permits more lax criteria for linking other code with

+the library.

+

+We call this license the "Lesser" General Public License because it

+does Less to protect the user's freedom than the ordinary General

+Public License. It also provides other free software developers Less

+of an advantage over competing non-free programs. These disadvantages

+are the reason we use the ordinary General Public License for many

+libraries. However, the Lesser license provides advantages in certain

+special circumstances.

+

+For example, on rare occasions, there may be a special need to

+encourage the widest possible use of a certain library, so that it

+becomes a de-facto standard. To achieve this, non-free programs must

+be allowed to use the library. A more frequent case is that a free

+library does the same job as widely used non-free libraries. In this

+case, there is little to gain by limiting the free library to free

+software only, so we use the Lesser General Public License.

+

+In other cases, permission to use a particular library in non-free

+programs enables a greater number of people to use a large body of

+free software. For example, permission to use the GNU C Library in

+non-free programs enables many more people to use the whole GNU

+operating system, as well as its variant, the GNU/Linux operating

+system.

+

+Although the Lesser General Public License is Less protective of the

+users' freedom, it does ensure that the user of a program that is

+linked with the Library has the freedom and the wherewithal to run

+that program using a modified version of the Library.

+

+The precise terms and conditions for copying, distribution and

+modification follow. Pay close attention to the difference between a

+"work based on the library" and a "work that uses the library". The

+former contains code derived from the library, whereas the latter must

+be combined with the library in order to run.

+

+TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION

+

+0. This License Agreement applies to any software library or other

+   program which contains a notice placed by the copyright holder or

+   other authorized party saying it may be distributed under the terms

+   of this Lesser General Public License (also called "this

+   License"). Each licensee is addressed as "you".

+

+A "library" means a collection of software functions and/or data

+prepared so as to be conveniently linked with application programs

+(which use some of those functions and data) to form executables.

+

+The "Library", below, refers to any such software library or work

+which has been distributed under these terms. A "work based on the

+Library" means either the Library or any derivative work under

+copyright law: that is to say, a work containing the Library or a

+portion of it, either verbatim or with modifications and/or translated

+straightforwardly into another language. (Hereinafter, translation is

+included without limitation in the term "modification".)

+

+"Source code" for a work means the preferred form of the work for

+making modifications to it. For a library, complete source code means

+all the source code for all modules it contains, plus any associated

+interface definition files, plus the scripts used to control

+compilation and installation of the library.

+

+Activities other than copying, distribution and modification are not

+covered by this License; they are outside its scope. The act of

+running a program using the Library is not restricted, and output from

+such a program is covered only if its contents constitute a work based

+on the Library (independent of the use of the Library in a tool for

+writing it). Whether that is true depends on what the Library does and

+what the program that uses the Library does.

+

+1. You may copy and distribute verbatim copies of the Library's

+   complete source code as you receive it, in any medium, provided

+   that you conspicuously and appropriately publish on each copy an

+   appropriate copyright notice and disclaimer of warranty; keep

+   intact all the notices that refer to this License and to the

+   absence of any warranty; and distribute a copy of this License

+   along with the Library.

+

+You may charge a fee for the physical act of transferring a copy, and

+you may at your option offer warranty protection in exchange for a

+fee.

+

+2. You may modify your copy or copies of the Library or any portion of

+   it, thus forming a work based on the Library, and copy and

+   distribute such modifications or work under the terms of Section 1

+   above, provided that you also meet all of these conditions:

+

+ a) The modified work must itself be a software library.

+ b) You must cause the files modified to carry prominent notices

+    stating that you changed the files and the date of any change.

+ c) You must cause the whole of the work to be licensed at no charge

+    to all third parties under the terms of this License.

+ d) If a facility in the modified Library refers to a function or a

+    table of data to be supplied by an application program that uses

+    the facility, other than as an argument passed when the facility

+    is invoked, then you must make a good faith effort to ensure that,

+    in the event an application does not supply such function or

+    table, the facility still operates, and performs whatever part of

+    its purpose remains meaningful.

+

+(For example, a function in a library to compute square roots has a

+purpose that is entirely well-defined independent of the

+application. Therefore, Subsection 2d requires that any

+application-supplied function or table used by this function must be

+optional: if the application does not supply it, the square root

+function must still compute square roots.)

+

+These requirements apply to the modified work as a whole. If

+identifiable sections of that work are not derived from the Library,

+and can be reasonably considered independent and separate works in

+themselves, then this License, and its terms, do not apply to those

+sections when you distribute them as separate works. But when you

+distribute the same sections as part of a whole which is a work based

+on the Library, the distribution of the whole must be on the terms of

+this License, whose permissions for other licensees extend to the

+entire whole, and thus to each and every part regardless of who wrote

+it.

+

+Thus, it is not the intent of this section to claim rights or contest

+your rights to work written entirely by you; rather, the intent is to

+exercise the right to control the distribution of derivative or

+collective works based on the Library.

+

+In addition, mere aggregation of another work not based on the Library

+with the Library (or with a work based on the Library) on a volume of

+a storage or distribution medium does not bring the other work under

+the scope of this License.

+

+3. You may opt to apply the terms of the ordinary GNU General Public

+   License instead of this License to a given copy of the Library. To

+   do this, you must alter all the notices that refer to this License,

+   so that they refer to the ordinary GNU General Public License,

+   version 2, instead of to this License. (If a newer version than

+   version 2 of the ordinary GNU General Public License has appeared,

+   then you can specify that version instead if you wish.) Do not make

+   any other change in these notices.

+

+Once this change is made in a given copy, it is irreversible for that

+copy, so the ordinary GNU General Public License applies to all

+subsequent copies and derivative works made from that copy.

+

+This option is useful when you wish to copy part of the code of the

+Library into a program that is not a library.

+

+4. You may copy and distribute the Library (or a portion or derivative

+   of it, under Section 2) in object code or executable form under the

+   terms of Sections 1 and 2 above provided that you accompany it with

+   the complete corresponding machine-readable source code, which must

+   be distributed under the terms of Sections 1 and 2 above on a

+   medium customarily used for software interchange.

+

+If distribution of object code is made by offering access to copy from

+a designated place, then offering equivalent access to copy the source

+code from the same place satisfies the requirement to distribute the

+source code, even though third parties are not compelled to copy the

+source along with the object code.

+

+5. A program that contains no derivative of any portion of the

+   Library, but is designed to work with the Library by being compiled

+   or linked with it, is called a "work that uses the Library". Such a

+   work, in isolation, is not a derivative work of the Library, and

+   therefore falls outside the scope of this License.

+

+However, linking a "work that uses the Library" with the Library

+creates an executable that is a derivative of the Library (because it

+contains portions of the Library), rather than a "work that uses the

+library". The executable is therefore covered by this License. Section

+6 states terms for distribution of such executables.

+

+When a "work that uses the Library" uses material from a header file

+that is part of the Library, the object code for the work may be a

+derivative work of the Library even though the source code is

+not. Whether this is true is especially significant if the work can be

+linked without the Library, or if the work is itself a library. The

+threshold for this to be true is not precisely defined by law.

+

+If such an object file uses only numerical parameters, data structure

+layouts and accessors, and small macros and small inline functions

+(ten lines or less in length), then the use of the object file is

+unrestricted, regardless of whether it is legally a derivative

+work. (Executables containing this object code plus portions of the

+Library will still fall under Section 6.)

+

+Otherwise, if the work is a derivative of the Library, you may

+distribute the object code for the work under the terms of Section

+6. Any executables containing that work also fall under Section 6,

+whether or not they are linked directly with the Library itself.

+

+6. As an exception to the Sections above, you may also combine or link

+   a "work that uses the Library" with the Library to produce a work

+   containing portions of the Library, and distribute that work under

+   terms of your choice, provided that the terms permit modification

+   of the work for the customer's own use and reverse engineering for

+   debugging such modifications.

+

+You must give prominent notice with each copy of the work that the

+Library is used in it and that the Library and its use are covered by

+this License. You must supply a copy of this License. If the work

+during execution displays copyright notices, you must include the

+copyright notice for the Library among them, as well as a reference

+directing the user to the copy of this License. Also, you must do one

+of these things:

+

+a) Accompany the work with the complete corresponding machine-readable

+   source code for the Library including whatever changes were used in

+   the work (which must be distributed under Sections 1 and 2 above);

+   and, if the work is an executable linked with the Library, with the

+   complete machine-readable "work that uses the Library", as object

+   code and/or source code, so that the user can modify the Library

+   and then relink to produce a modified executable containing the

+   modified Library. (It is understood that the user who changes the

+   contents of definitions files in the Library will not necessarily

+   be able to recompile the application to use the modified

+   definitions.)

+

+b) Use a suitable shared library mechanism for linking with the

+   Library. A suitable mechanism is one that (1) uses at run time a

+   copy of the library already present on the user's computer system,

+   rather than copying library functions into the executable, and (2)

+   will operate properly with a modified version of the library, if

+   the user installs one, as long as the modified version is

+   interface-compatible with the version that the work was made with.

+

+c) Accompany the work with a written offer, valid for at least three

+   years, to give the same user the materials specified in Subsection

+   6a, above, for a charge no more than the cost of performing this

+   distribution.

+

+d) If distribution of the work is made by offering access to copy from

+   a designated place, offer equivalent access to copy the above

+   specified materials from the same place.

+

+e) Verify that the user has already received a copy of these materials

+   or that you have already sent this user a copy.

+

+For an executable, the required form of the "work that uses the

+Library" must include any data and utility programs needed for

+reproducing the executable from it. However, as a special exception,

+the materials to be distributed need not include anything that is

+normally distributed (in either source or binary form) with the major

+components (compiler, kernel, and so on) of the operating system on

+which the executable runs, unless that component itself accompanies

+the executable.

+

+It may happen that this requirement contradicts the license

+restrictions of other proprietary libraries that do not normally

+accompany the operating system. Such a contradiction means you cannot

+use both them and the Library together in an executable that you

+distribute.

+

+7. You may place library facilities that are a work based on the

+   Library side-by-side in a single library together with other

+   library facilities not covered by this License, and distribute such

+   a combined library, provided that the separate distribution of the

+   work based on the Library and of the other library facilities is

+   otherwise permitted, and provided that you do these two things:

+

+a) Accompany the combined library with a copy of the same work based

+   on the Library, uncombined with any other library facilities. This

+   must be distributed under the terms of the Sections above.

+

+b) Give prominent notice with the combined library of the fact that

+   part of it is a work based on the Library, and explaining where to

+   find the accompanying uncombined form of the same work.

+

+8. You may not copy, modify, sublicense, link with, or distribute the

+   Library except as expressly provided under this License. Any

+   attempt otherwise to copy, modify, sublicense, link with, or

+   distribute the Library is void, and will automatically terminate

+   your rights under this License. However, parties who have received

+   copies, or rights, from you under this License will not have their

+   licenses terminated so long as such parties remain in full

+   compliance.

+

+9. You are not required to accept this License, since you have not

+   signed it. However, nothing else grants you permission to modify or

+   distribute the Library or its derivative works. These actions are

+   prohibited by law if you do not accept this License. Therefore, by

+   modifying or distributing the Library (or any work based on the

+   Library), you indicate your acceptance of this License to do so,

+   and all its terms and conditions for copying, distributing or

+   modifying the Library or works based on it.

+

+10. Each time you redistribute the Library (or any work based on the

+    Library), the recipient automatically receives a license from the

+    original licensor to copy, distribute, link with or modify the

+    Library subject to these terms and conditions. You may not impose

+    any further restrictions on the recipients' exercise of the rights

+    granted herein. You are not responsible for enforcing compliance

+    by third parties with this License.

+

+11. If, as a consequence of a court judgment or allegation of patent

+    infringement or for any other reason (not limited to patent

+    issues), conditions are imposed on you (whether by court order,

+    agreement or otherwise) that contradict the conditions of this

+    License, they do not excuse you from the conditions of this

+    License. If you cannot distribute so as to satisfy simultaneously

+    your obligations under this License and any other pertinent

+    obligations, then as a consequence you may not distribute the

+    Library at all. For example, if a patent license would not permit

+    royalty-free redistribution of the Library by all those who

+    receive copies directly or indirectly through you, then the only

+    way you could satisfy both it and this License would be to refrain

+    entirely from distribution of the Library.

+

+If any portion of this section is held invalid or unenforceable under

+any particular circumstance, the balance of the section is intended to

+apply, and the section as a whole is intended to apply in other

+circumstances.

+

+It is not the purpose of this section to induce you to infringe any

+patents or other property right claims or to contest validity of any

+such claims; this section has the sole purpose of protecting the

+integrity of the free software distribution system which is

+implemented by public license practices. Many people have made

+generous contributions to the wide range of software distributed

+through that system in reliance on consistent application of that

+system; it is up to the author/donor to decide if he or she is willing

+to distribute software through any other system and a licensee cannot

+impose that choice.

+

+This section is intended to make thoroughly clear what is believed to

+be a consequence of the rest of this License.

+

+12. If the distribution and/or use of the Library is restricted in

+    certain countries either by patents or by copyrighted interfaces,

+    the original copyright holder who places the Library under this

+    License may add an explicit geographical distribution limitation

+    excluding those countries, so that distribution is permitted only

+    in or among countries not thus excluded. In such case, this

+    License incorporates the limitation as if written in the body of

+    this License.

+

+13. The Free Software Foundation may publish revised and/or new

+    versions of the Lesser General Public License from time to

+    time. Such new versions will be similar in spirit to the present

+    version, but may differ in detail to address new problems or

+    concerns.

+

+Each version is given a distinguishing version number. If the Library

+specifies a version number of this License which applies to it and

+"any later version", you have the option of following the terms and

+conditions either of that version or of any later version published by

+the Free Software Foundation. If the Library does not specify a

+license version number, you may choose any version ever published by

+the Free Software Foundation.

+

+14. If you wish to incorporate parts of the Library into other free

+    programs whose distribution conditions are incompatible with

+    these, write to the author to ask for permission. For software

+    which is copyrighted by the Free Software Foundation, write to the

+    Free Software Foundation; we sometimes make exceptions for

+    this. Our decision will be guided by the two goals of preserving

+    the free status of all derivatives of our free software and of

+    promoting the sharing and reuse of software generally.

+

+NO WARRANTY

+

+15. BECAUSE THE LIBRARY IS LICENSED FREE OF CHARGE, THERE IS NO

+    WARRANTY FOR THE LIBRARY, TO THE EXTENT PERMITTED BY APPLICABLE

+    LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS

+    AND/OR OTHER PARTIES PROVIDE THE LIBRARY "AS IS" WITHOUT WARRANTY

+    OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT

+    LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS

+    FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND

+    PERFORMANCE OF THE LIBRARY IS WITH YOU. SHOULD THE LIBRARY PROVE

+    DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR

+    OR CORRECTION.

+

+16. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN

+    WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY

+    MODIFY AND/OR REDISTRIBUTE THE LIBRARY AS PERMITTED ABOVE, BE

+    LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL,

+    INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR

+    INABILITY TO USE THE LIBRARY (INCLUDING BUT NOT LIMITED TO LOSS OF

+    DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU

+    OR THIRD PARTIES OR A FAILURE OF THE LIBRARY TO OPERATE WITH ANY

+    OTHER SOFTWARE), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN

+    ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.

+

+END OF TERMS AND CONDITIONS

+

+

+

diff --git a/externals/gridflow/optional/rblti/Makefile b/externals/gridflow/optional/rblti/Makefile
new file mode 100644
index 00000000..d50b1aa7
--- /dev/null
+++ b/externals/gridflow/optional/rblti/Makefile
@@ -0,0 +1,47 @@
+LTIPREFIX = /usr/local
+#LTIPREFIX = /home/matju
+LIBS = $(LTIPREFIX)/lib/ltilib/libltir.a -lpng -ljpeg
+INCS = -I$(LTIPREFIX)/include/ltilib -I/usr/share/swig1.3/std
+PINC = -I/usr/include/python
+RINC = -I`ruby -rrbconfig -e'h=Config::CONFIG;puts h["rubylibdir"]+"/"+h["arch"]'`
+
+default:: python
+
+python:: _pylti.so
+	python -c 'import pylti'
+	python testpylti.py fan.jpg
+
+_pylti.so: pylti_wrap.o Makefile
+	g++ -shared -o _pylti.so pylti_wrap.o $(LIBS)
+
+pylti_wrap.o: pylti_wrap.cxx
+	g++ $(PINC) -Ipatched $(INCS) -c pylti_wrap.cxx
+
+pylti_wrap.cxx: ./swig/pylti.i
+	swig -v -c++ -python -DHAVE_LIBJPEG -DHAVE_LIBPNG -I./generated -I./patched \
+		$(INCS) -w509,-312,-362,-389  -o ./pylti_wrap.cxx ./swig/pylti.i
+	#swig -c++ -python -DHAVE_LIBJPEG -DHAVE_LIBPNG -I./generated_python -I./patched \
+	#	$(INCS) -w509,-312,-362,-389 pylti.i
+
+ruby:: rblti.so
+	ruby -e 'require "rblti"'
+
+rblti.so: rblti_wrap.o Makefile
+	g++ -shared -o rblti.so rblti_wrap.o $(LIBS)
+
+rblti_wrap.o: rblti_wrap.cxx
+	g++ $(RINC) -Ipatched $(INCS) -c rblti_wrap.cxx
+
+rblti_wrap.s: rblti_wrap.cxx
+	g++ $(RINC) -Ipatched $(INCS) -S rblti_wrap.cxx
+
+rblti_wrap.cxx: rblti.i
+	swig -c++ -ruby -DHAVE_LIBJPEG -DHAVE_LIBPNG -I./generated -I./patched \
+		-fcompact -fvirtual $(INCS) -w509,-312,-362,-389,-801,-314 rblti.i
+
+clean::
+	rm -f \
+		pylti.so pylti_wrap.o pylti_wrap.cxx \
+		rblti.so rblti_wrap.o rblti_wrap.cxx
+
+
diff --git a/externals/gridflow/optional/rblti/gen_ltilib_classes.py b/externals/gridflow/optional/rblti/gen_ltilib_classes.py
new file mode 100644
index 00000000..09c2aee9
--- /dev/null
+++ b/externals/gridflow/optional/rblti/gen_ltilib_classes.py
@@ -0,0 +1,354 @@
+#!/usr/bin/env python

+#******************************************************************************

+# rblti, Copyright 2005 by Mathieu Bouchard and Heri Andria

+# pylti, Copyright 2005 by Michael Neuroth

+# a wrapper for ltilib using SWIG

+#******************************************************************************

+#

+# Tool to generate header files for SWIG to process the nested classes "parameters"

+#

+# 1) generate XML files for the ltilib with doxygen (tested with version 1.4.3) (use this switch in doc.cfg file: GENERATE_XML = YES)

+# 2) generate the new header files for SWIG with this python script

+

+from xml.dom import minidom

+import os

+import sys

+from distutils.text_file import TextFile

+str_version = '0.32'

+

+basedir=None

+# handle the settings: WORKAREA has to be defined !

+if len(sys.argv)>1:

+  basedir = sys.argv[1]

+else:

+  workarea = os.getenv('WORKAREA')

+  # is pylti not part of the ltilib ? Yes --> than we need a directory structure of WORKAREA_PATH/import/ltilib/xml

+  if workarea<>None:

+      basedir = workarea+os.sep+'import'+os.sep+'ltilib'+os.sep+'xml'+os.sep

+  # check if we are in misc directory of the ltilib distribution (ltilib/misc/pylti)

+  # very simple way: navigate up and navigate down again

+  else:

+      strCheckPath = '..'+os.sep+'..'+os.sep+'misc'+os.sep+'pylti'+'-'+str_version

+      try:

+          # try to read lti.i, this is a good indication of a pylti directory

+          aTestFile = TextFile(filename=strCheckPath+os.sep+'lti.i')

+          basedir = '..'+os.sep+'..'+os.sep+'xml'+os.sep        # move up ltipy and misc directory 

+      except IOError: pass

+

+output_dir = 'generated'

+#output_dir = 'generated_ruby'

+

+def f(x): return 'classlti_1_1'+x+'.xml'

+#def g(x): return 'lti::_'+x+'::_'+x+'_parameters'

+def g(x): return 'lti::_'+x+'::'+x+'_parameters'

+

+# list of tuples with ( xml-file-name, full-qualified-name of the base class )

+lst = [   (f('functor_1_1parameters'),               'lti::ioObject')

+        , (f('ioFunctor_1_1parameters'),             g('functor')) 

+        , (f('ioImage_1_1parameters'),               g('ioFunctor'))

+        , (f('usePalette_1_1parameters'),            g('functor'))

+        , (f('segmentation_1_1parameters'),          g('functor'))

+        , (f('regionGrowing_1_1parameters'),         g('segmentation'))

+        , (f('meanShiftSegmentation_1_1parameters'), g('segmentation'))

+        , (f('kMeansSegmentation_1_1parameters'),    g('segmentation'))

+        , (f('whiteningSegmentation_1_1parameters'), g('segmentation'))

+        , (f('csPresegmentation_1_1parameters'),     g('segmentation'))

+        , (f('colorQuantization_1_1parameters'),     g('functor'))

+        , (f('kMColorQuantization_1_1parameters'),   g('colorQuantization'))

+        , (f('viewerBase_1_1parameters'),            g('functor'))

+        , (f('externViewer_1_1parameters'),          g('viewerBase'))

+        , (f('objectsFromMask_1_1parameters'),       g('segmentation'))

+        , (f('objectsFromMask_1_1objectStruct'),     'lti::ioObject')

+        , (f('tree_1_1node'),                        'lti::ioObject')

+        , (f('featureExtractor_1_1parameters'),      g('functor'))

+        , (f('globalFeatureExtractor_1_1parameters'),g('featureExtractor'))

+        , (f('localFeatureExtractor_1_1parameters'), g('featureExtractor'))

+        , (f('geometricFeatures_1_1parameters'),     g('globalFeatureExtractor'))

+        , (f('localMoments_1_1parameters'),          g('localFeatureExtractor'))

+        , (f('chromaticityHistogram_1_1parameters'), g('globalFeatureExtractor'))

+        , (f('modifier_1_1parameters'),              g('functor'))

+        , (f('polygonApproximation_1_1parameters'),  g('modifier'))

+        , (f('transform_1_1parameters'),             g('functor'))

+        , (f('gradientFunctor_1_1parameters'),       g('transform'))

+        , (f('skeleton_1_1parameters'),              g('transform'))

+        , (f('colorContrastGradient_1_1parameters'), g('gradientFunctor'))

+        , (f('edgeDetector_1_1parameters'),          g('modifier'))

+        , (f('classicEdgeDetector_1_1parameters'),   g('edgeDetector'))

+        , (f('cannyEdges_1_1parameters'),            g('edgeDetector'))

+        , (f('filter_1_1parameters'),                g('modifier'))

+        , (f('convolution_1_1parameters'),           g('filter'))

+        , (f('morphology_1_1parameters'),            g('modifier'))

+        , (f('dilation_1_1parameters'),              g('morphology'))

+        , (f('erosion_1_1parameters'),               g('morphology'))

+        , (f('distanceTransform_1_1parameters'),     g('morphology'))

+        , (f('classifier_1_1parameters'),            'lti::ioObject')

+        , (f('classifier_1_1outputTemplate'),        'lti::ioObject')

+        , (f('classifier_1_1outputVector'),          'lti::ioObject')

+        , (f('decisionTree_1_1parameters'),          g('classifier'))

+        , (f('ioBMP_1_1parameters'),                 g('ioFunctor'))

+        , (f('ioPNG_1_1parameters'),                 g('ioFunctor'))

+        , (f('ioJPEG_1_1parameters'),                g('ioFunctor'))

+	, (f('distanceTransform_1_1sedMask'),        None)

+    ]

+

+# some constants

+nl = '\n'

+

+# Doku:

+#-------

+# 'memberdef'   ==> 'kind'=function

+#  --> 'name'

+#  --> 'type'               # Return Type

+#  --> 'param'             # Argumente

+#       --> 'type' 

+

+def WriteFile(name,txt):

+    f = open(name,'w')

+    f.write(txt)

+

+def GetAttribute(attribs,key):

+    for k,v in attribs:

+        if k==key:

+            return v

+

+def GetValue(elem):

+    #print elem,elem.firstChild,elem.nodeType

+    if elem.nodeType == elem.TEXT_NODE:

+        return elem.data

+    elif elem.nodeType == elem.ELEMENT_NODE:

+        if elem.firstChild <> None:

+            s = ''

+            for e in elem.childNodes:

+                s += GetValue(e) #+' '

+            return s

+        return ''

+    elif elem.nodeType == elem.ATTRIBUTE_NODE:

+        return 'xxxx'

+    elif elem.firstChild.nodeType == elem.TEXT_NODE:

+        return elem.firstChild.data

+    return '???'

+

+def GetValueForItem(node,itemname,bOnlyFirst=False):

+    s = ''

+    nodes = node.getElementsByTagName(itemname)

+    #print '>>>>>>>',nodes,itemname,len(nodes)

+    if bOnlyFirst:

+        s += GetValue( nodes[0] )

+    else:

+        for node in nodes:

+            s += GetValue( node )

+            s += ' '

+    return s

+

+def ProcessFunction(member,classname,newclassname,bIsConst=False,bIsPureVirtual=False,bIsHeader=True):

+    s = ''

+    arg = 'arg'

+    names = member.getElementsByTagName('name')

+    # es sollte immer nur einen Namen geben !

+    nameNode = names[0]

+    name = GetValue(nameNode)

+

+    s += GetValueForItem(member,'type',bOnlyFirst=True)

+    s += ' '

+    if not bIsHeader:

+        s += classname+'::'

+    s += GetValueForItem(member,'name')

+    s += '( '

+

+    # Behandlung des Constructors

+    bIsConstructor = (name == classname)

+

+    params = member.getElementsByTagName('param')

+    for i in range(len(params)):

+        if i>0:

+            s += ', '

+        s += GetValueForItem(params[i],'type')

+        s += ' '+arg+str(i)

+

+    s += ' )'

+    if bIsConst:

+        s += ' const'

+    if bIsPureVirtual:

+        s += ' = 0'

+

+    if not bIsHeader:

+        s += nl

+        s += '{'+nl

+        s += '    '+'pObj->'+name+'('

+        for i in range(len(params)):

+            if i>0:

+                s += ', '

+            s += arg+str(i)

+        s += ');'+nl

+        s += '}'

+    

+    s += ';'+nl

+

+    # dies ist fuer das manuelle name mangling notwendig !

+    s = s.replace(classname,newclassname)

+

+    return s

+

+def VerifyParameterType(sType):

+    """ 

+        Sonderbehandlung fuer den Typ, falls es ein parameters Typ ist,

+        notwendig, da der parameters Typ mit einem define umbenannt wird...

+        

+        Beispiel: gradientFunctor::parameters --> gradientFunctor_parameters

+    """

+    s = sType

+    elem = sType.split('::')

+    if len(elem)>1 and elem[-1]=='parameters':

+        s = 'lti_'+sType.replace('::','_')

+        print "FOUND:",s

+    return s

+    

+def ProcessAttribute(member):

+    s = ''

+    sType = GetValueForItem(member,'type',bOnlyFirst=True)    

+    sType = VerifyParameterType(sType)        

+    s += sType

+    s += ' '

+    s += GetValueForItem(member,'name')

+    s += GetValueForItem(member,'argsstring')

+    s += ';'

+    return s

+

+def ProcessEnum(member):

+    s = ''

+    s += 'enum '

+    name = GetValueForItem(member,'name',bOnlyFirst=True)

+    # Behandlung der unbenannten enums

+    if name[0]=='@':

+        name = ''

+    s += name

+    s += ' {'+nl

+    items = member.getElementsByTagName('enumvalue')

+    for i in range(len(items)):

+        e = items[i]

+        if i>0:

+            s += ','

+        s += GetValueForItem(e,'name')

+        val = GetValueForItem(e,'initializer')

+        if val<>None and len(val)>0:

+            s += ' = ' + val

+        s += nl 

+    s += '};'+nl

+    return s

+

+def ProcessMember(member,classname,newclassname,bIsHeader):

+    s = ''

+    attribs = member.attributes.items()

+    if GetAttribute(attribs,'prot')=='public':

+        if GetAttribute(attribs,'kind')=='function':

+            s = ProcessFunction(member, classname, newclassname, GetAttribute(attribs,'const')=='yes', GetAttribute(attribs,'virt')=='pure-virtual', bIsHeader ) #, GetAttribute(attribs,'virtual')=='virtual'

+        elif GetAttribute(attribs,'kind')=='variable':

+            s = ProcessAttribute(member)

+        elif GetAttribute(attribs,'kind')=='enum':

+            s = ProcessEnum(member)

+        else:

+            s = '/* not a function or attribute */'     

+    return s+'\n'

+

+def ProcessAllMembers(theclassname,thenewclassname,members,bIsHeader=True,indent=' '*4):

+    s = ''

+    for member in members:

+        s += indent+ProcessMember(member,theclassname,thenewclassname,bIsHeader)

+    return s

+

+def ProcessHeaderFile(classname,theclassname,thenewclassname,members,baseclassname=None):

+    s = ''

+    s += '#ifndef _'+thenewclassname+'_h'+nl

+    s += '#define _'+thenewclassname+'_h'+nl

+    s += nl

+    sClose = ''

+    names = classname.split('::')

+    sTypedef = 'typedef '

+    for n in range(len(names)):

+        if n<len(names)-1:

+            s += 'namespace '

+            sPre = ''

+            if n>0:

+                sPre += '_'

+            s += sPre+names[n]+' {'+nl

+            if n<len(names)-2:

+                sClose += '}'+nl            

+            sTypedef += sPre+names[n]+'::'            

+    s += 'class '+thenewclassname

+    if baseclassname<>None:

+        s += ' : public '+baseclassname

+    s += nl

+    s += '{'+nl

+    s += 'public:'+nl

+    s += ProcessAllMembers(theclassname,thenewclassname,members)

+    #s += 'private:'+nl

+    #s += '    /*pObj*/'+nl

+    s += '};'+nl

+    s += sClose

+#    s += sTypedef+thenewclassname+' '+thenewclassname[1:]+';'+nl    # erstes _ vom Klassennamen entfernen

+    s += sTypedef+thenewclassname+' '+thenewclassname+';'+nl

+    s += '}'

+    s += nl

+    s += '#endif'+nl

+    return s

+

+def ProcessCppFile(classname,theclassname,thenewclassname,members):

+    s = ''

+    s += nl

+    s += '#include "'+thenewclassname+'.h"'+nl

+    s += nl

+    s += ProcessAllMembers(theclassname,thenewclassname,members,bIsHeader=False,indent='')

+    s += nl

+    return s

+

+def ProcessClass(classname,theclassname,thenewclassname,members,baseclassname=None):

+    s = ''

+    s += ProcessHeaderFile(classname,theclassname,thenewclassname,members,baseclassname)

+    s += nl

+    #s += ProcessCppFile(classname,theclassname,thenewclassname,members)

+    return s

+

+def ProcessFile(filename,baseclassname,add_to_output=None):

+    dom = minidom.parse(filename)

+

+    #elem = dom.getElementsByTagName('compoundname')

+    members = dom.getElementsByTagName('memberdef')

+    

+    classitem = dom.getElementsByTagName('compoundname')

+    classname = GetValue(classitem[0])                      # lti::object

+    print "processing",classname,"...",

+

+    nameitems = classname.split('::')

+    

+    theclassname = nameitems[-1]                            # object

+    s = ''

+    for i in range(len(nameitems)):

+        # ignoriere das erste lti::

+        if i>0:

+#            s += '_'

+            if i>1: s += '_'  #to prevent class names starting with '_', Ruby hates that

+            s += nameitems[i]

+        

+    thenewclassname = s #classname.replace('::','_')           # lti_object

+    print thenewclassname

+    

+#    outputfilename = thenewclassname

+    outputfilename = '_'+thenewclassname

+    if add_to_output<>None:

+        outputfilename += add_to_output

+    outputfilename += '.h'

+

+    s = ProcessClass(classname,theclassname,thenewclassname,members,baseclassname)

+    

+    WriteFile(output_dir+os.sep+outputfilename,s)

+

+def ProcessAllFiles(lst):

+    for e in lst:

+        filename = basedir+e[0]

+        ProcessFile(filename,e[1])

+

+#-------------------------------------------------

+

+ProcessAllFiles(lst)

+

+    

diff --git a/externals/gridflow/optional/rblti/lti_manual.h b/externals/gridflow/optional/rblti/lti_manual.h
new file mode 100644
index 00000000..1228f3a8
--- /dev/null
+++ b/externals/gridflow/optional/rblti/lti_manual.h
@@ -0,0 +1,7 @@
+
+/*
+	Do not delete,
+
+	here you can add manual wraped functions and classes...
+
+*/
diff --git a/externals/gridflow/optional/rblti/rblti.i b/externals/gridflow/optional/rblti/rblti.i
new file mode 100644
index 00000000..0cb9686f
--- /dev/null
+++ b/externals/gridflow/optional/rblti/rblti.i
@@ -0,0 +1,775 @@
+//******************************************************************************
+// rblti, Copyright 2005 by Mathieu Bouchard and Heri Andria
+// pylti, Copyright 2005 by Michael Neuroth
+// a wrapper for ltilib using SWIG
+
+%module rblti
+%rename(inplace_add) operator +=;
+%rename(inplace_sub) operator -=;
+%rename(inplace_mul) operator *=;
+%rename(inplace_div) operator /=;
+%rename(not_equal)   operator !=;
+%include "std_list_ruby.i"
+%include "std_string.i"
+//%include "std_list.i"
+//%include "std_vector.i" 
+//%include "std_map.i"
+
+using namespace std;
+
+// sollte nach dem include der std_*.i Dateien stehen, ansonsten gibt swig einen Fehlercode zurueck !
+//%feature("autodoc","1")
+
+std::string _getStdString(std::string * pStr);
+bool _setStdString(std::string * pStr, const std::string & strValue);
+
+// for the access to c arrays
+%include "carrays.i"
+%array_functions(float,floatArray)
+%array_functions(double,doubleArray)
+%array_functions(int,intArray)
+%array_class(float,floatArr)
+%array_class(double,doubleArr)
+%array_class(int,intArr)
+
+//test:
+//namespace std {
+//    %template(sdmap) map<string,double>;		// TODO: does not work yet ...
+//}
+//namespace std {
+//    %template(vectordouble) vector<double>;
+//}
+
+// **************************************************************************
+// **************************************************************************
+// This part is for the c++ wrapper compile phase !
+// This code will be copied into the wrapper-code (generated from swig)
+%{
+#include <string>
+
+// TODO: to be removed, only for tests
+std::string _getStdString(std::string * pStr) {return *pStr;}
+bool _setStdString(std::string * pStr, const std::string & strValue) {
+    if(pStr) *pStr = strValue;
+    return !!pStr;
+}
+// </to-be-removed>
+
+#undef PACKAGE_NAME
+#undef PACKAGE_TARNAME
+#undef PACKAGE_STRING
+#undef PACKAGE_VERSION
+
+#include "ltiObject.h"
+//#include "ltiTypes.h"
+#include "ltiIoHandler.h"
+#include "ltiIoObject.h"
+#include "ltiMathObject.h"
+#include "ltiRGBPixel.h"
+#include "ltiPoint.h"
+#include "ltiPointList.h"
+#include "ltiPolygonPoints.h"
+#include "ltiGeometry.h"
+#include "ltiGenericVector.h"           // MODIFIED for SWIG !
+#include "ltiVector.h"
+#include "ltiArray.h"
+#include "ltiGenericMatrix.h"           // MODIFIED for SWIG !
+#include "ltiMatrix.h"                  // MODIFIED for SWIG !
+#include "ltiTree.h"
+#include "ltiHistogram.h"
+#include "ltiImage.h"
+#include "ltiContour.h"
+#include "ltiLinearKernels.h"
+#include "ltiGradientKernels.h"
+#include "ltiHessianKernels.h"
+#include "ltiLaplacianKernel.h"
+#include "ltiSecondDerivativeKernels.h"
+
+#include "ltiFunctor.h"
+// durch SWIG manipulierte typ parameters in functor wieder zurueck benennen
+#define _functor functor               // wegen Namenskonflikt mit schon deklarierter Klasse und dem Trick ueber den namespace um die Parameter-Klassen zu generieren (gen_ltilib_class.py)
+#define _functor_parameters parameters // sezte den aus dem XML generierten Parameter-Klassen-Namen wieder zurueck auf den urspruenglichen Namen
+// notwendig fuer die plain Methoden lti::write(...) und lti::read(...)
+namespace lti {typedef lti::functor::parameters functor_parameters;}
+#include "ltiModifier.h"
+#define _modifier modifier
+#define _modifier_parameters parameters
+namespace lti {typedef lti::modifier::parameters modifier_parameters;}
+#include "ltiFilter.h"
+#define _filter filter
+#define _filter_parameters parameters
+namespace lti {typedef lti::filter::parameters filter_parameters;}
+#include "ltiIOFunctor.h"
+#define _ioFunctor ioFunctor
+#define _ioFunctor_parameters parameters
+namespace lti {typedef lti::ioFunctor::parameters ioFunctor_parameters;}
+#include "ltiBMPFunctor.h"
+#define _ioBMP ioBMP
+#define _ioBMP_parameters parameters
+#define lti_ioBMP_parameters ioBMP_parameters      // TODO: PATCH !
+namespace lti {typedef lti::ioBMP::parameters ioBMP_parameters;}
+#include "ltiJPEGFunctor.h"
+#define _ioJPEG ioJPEG
+#define _ioJPEG_parameters parameters
+#define lti_ioJPEG_parameters ioJPEG_parameters      // TODO: PATCH !
+namespace lti {typedef lti::ioJPEG::parameters ioJPEG_parameters;}
+#include "ltiPNGFunctor.h"
+#define _ioPNG ioPNG
+#define _ioPNG_parameters parameters
+#define lti_ioPNG_parameters ioPNG_parameters     
+namespace lti {typedef lti::ioPNG::parameters ioPNG_parameters;}
+#include "ltiALLFunctor.h"
+#define _ioImage ioImage
+#define _ioImage_parameters parameters
+#define ioImage_parameters parameters                   // TODO: PATCH !
+namespace lti {typedef lti::ioImage::parameters ioImage_parameters;}
+#include "ltiViewerBase.h"
+#define _viewerBase viewerBase
+#define _viewerBase_parameters parameters
+namespace lti {typedef lti::viewerBase::parameters viewerBase_parameters;}
+#include "ltiExternViewer.h"
+#define _externViewer externViewer
+#define _externViewer_parameters parameters
+namespace lti {typedef lti::externViewer::parameters externViewer_parameters;}
+#include "ltiSplitImage.h"
+#include "ltiSplitImageTorgI.h"
+
+#include "ltiUsePalette.h"
+#define _usePalette usePalette
+#define _usePalette_parameters parameters
+namespace lti {typedef lti::usePalette::parameters usePalette_parameters;}
+#include "ltiTransform.h"
+#define _transform transform
+#define _transform_parameters parameters
+namespace lti {typedef lti::transform::parameters transform_parameters;}
+#include "ltiGradientFunctor.h"
+#define _gradientFunctor gradientFunctor
+#define _gradientFunctor_parameters parameters
+#define lti_gradientFunctor_parameters gradientFunctor_parameters      // TODO: PATCH !
+namespace lti {typedef lti::gradientFunctor::parameters gradientFunctor_parameters;}
+#include "ltiColorContrastGradient.h"
+#define _colorContrastGradient colorContrastGradient
+#define _colorContrastGradient_parameters parameters
+#define lti_colorContrastGradient_parameters colorContrastGradient_parameters      // TODO: PATCH !
+namespace lti {typedef lti::colorContrastGradient::parameters colorContrastGradient_parameters;}
+#include "ltiEdgeDetector.h"
+#define _edgeDetector edgeDetector
+#define _edgeDetector_parameters parameters
+namespace lti {typedef lti::edgeDetector::parameters edgeDetector_parameters;}
+#include "ltiClassicEdgeDetector.h"
+#define _classicEdgeDetector classicEdgeDetector
+#define _classicEdgeDetector_parameters parameters
+namespace lti {typedef lti::classicEdgeDetector::parameters classicEdgeDetector_parameters;}
+#include "ltiCannyEdges.h"
+#define _cannyEdges cannyEdges
+#define _cannyEdges_parameters parameters
+namespace lti {typedef lti::cannyEdges::parameters cannyEdges_parameters;}
+#include "ltiConvolution.h"
+#define _convolution convolution
+#define _convolution_parameters parameters
+namespace lti {typedef lti::convolution::parameters convolution_parameters;}
+#include "ltiSegmentation.h"
+#define _segmentation segmentation
+#define _segmentation_parameters parameters
+namespace lti {typedef lti::segmentation::parameters segmentation_parameters;}
+#include "ltiRegionGrowing.h"
+#define _regionGrowing regionGrowing
+#define _regionGrowing_parameters parameters
+namespace lti {typedef lti::regionGrowing::parameters regionGrowing_parameters;}
+#include "ltiObjectsFromMask.h"
+#define _objectsFromMask objectsFromMask
+#define _objectsFromMask_parameters parameters
+#define _objectsFromMask_objectStruct objectStruct
+namespace lti {
+typedef lti::objectsFromMask::objectStruct objectStruct;
+typedef lti::objectsFromMask::objectStruct objectsFromMask_objectStruct;
+typedef lti::objectsFromMask::parameters objectsFromMask_parameters;
+}
+////TODO: add better tree support !!!
+////#define _tree tree
+//#define _tree_objectStruct_node node
+//#define _tree tree<objectStruct>
+//namespace lti {
+//typedef lti::tree<objectStruct>::node tree_objectStruct_node;
+//}
+#include "ltiPolygonApproximation.h"
+#define _polygonApproximation polygonApproximation
+#define _polygonApproximation_parameters parameters
+namespace lti {typedef lti::polygonApproximation::parameters polygonApproximation_parameters;}
+#include "ltiColorQuantization.h"
+#define _colorQuantization colorQuantization
+#define _colorQuantization_parameters parameters
+namespace lti {typedef lti::colorQuantization::parameters colorQuantization_parameters;}
+#include "ltiKMColorQuantization.h"
+#define _kMColorQuantization kMColorQuantization
+#define _kMColorQuantization_parameters parameters
+namespace lti {
+typedef lti::kMColorQuantization::parameters kMColorQuantization_parameters;
+//typedef lti::kMColorQuantization::parameters lti_kMColorQuantization_parameters;
+}
+typedef lti::kMColorQuantization::parameters lti_kMColorQuantization_parameters;
+#include "ltiMeanShiftSegmentation.h"
+#define _meanShiftSegmentation meanShiftSegmentation
+#define _meanShiftSegmentation_parameters parameters
+namespace lti {typedef lti::meanShiftSegmentation::parameters meanShiftSegmentation_parameters;}
+#include "ltiKMeansSegmentation.h"
+#define _kMeansSegmentation kMeansSegmentation
+#define _kMeansSegmentation_parameters parameters
+namespace lti {
+typedef lti::kMeansSegmentation::parameters kMeansSegmentation_parameters;
+//typedef lti::kMeansSegmentation::parameters lti_kMeansSegmentation_parameters;
+}
+typedef lti::kMeansSegmentation::parameters lti_kMeansSegmentation_parameters;
+
+#include "ltiWhiteningSegmentation.h"
+#define _whiteningSegmentation whiteningSegmentation
+#define _whiteningSegmentation_parameters parameters
+namespace lti {typedef lti::whiteningSegmentation::parameters whiteningSegmentation_parameters;}
+#include "ltiCsPresegmentation.h"
+#define _csPresegmentation csPresegmentation
+#define _csPresegmentation_parameters parameters
+namespace lti {typedef lti::csPresegmentation::parameters csPresegmentation_parameters;}
+#include "ltiFeatureExtractor.h"
+#define _featureExtractor featureExtractor
+#define _featureExtractor_parameters parameters
+namespace lti {typedef lti::featureExtractor::parameters featureExtractor_parameters;}
+#include "ltiGlobalFeatureExtractor.h"
+#define _globalFeatureExtractor globalFeatureExtractor
+#define _globalFeatureExtractor_parameters parameters
+namespace lti {typedef lti::globalFeatureExtractor::parameters globalFeatureExtractor_parameters;}
+#include "ltiGeometricFeatures.h"
+#define _geometricFeatures geometricFeatures
+#define _geometricFeatures_parameters parameters
+namespace lti {typedef lti::geometricFeatures::parameters geometricFeatures_parameters;}
+#include "ltiChromaticityHistogram.h"
+#define _chromaticityHistogram chromaticityHistogram
+#define _chromaticityHistogram_parameters parameters
+namespace lti {typedef lti::chromaticityHistogram::parameters chromaticityHistogram_parameters;}
+#include "ltiLocalFeatureExtractor.h"
+#define _localFeatureExtractor localFeatureExtractor
+#define _localFeatureExtractor_parameters parameters
+namespace lti {typedef lti::localFeatureExtractor::parameters localFeatureExtractor_parameters;}
+#include "ltiLocalMoments.h"
+#define _localMoments localMoments
+#define _localMoments_parameters parameters
+namespace lti {typedef lti::localMoments::parameters localMoments_parameters;}
+#include "ltiMorphology.h"
+#define _morphology morphology
+#define _morphology_parameters parameters
+namespace lti {typedef lti::morphology::parameters morphology_parameters;}
+#include "ltiDilation.h"
+#define _dilation dilation
+#define _dilation_parameters parameters
+namespace lti {typedef lti::dilation::parameters dilation_parameters;}
+#include "ltiErosion.h"
+#define _erosion erosion
+#define _erosion_parameters parameters
+namespace lti {typedef lti::erosion::parameters erosion_parameters;}
+#include "ltiDistanceTransform.h"
+#define _distanceTransform distanceTransform
+#define _distanceTransform_parameters parameters
+namespace lti {typedef lti::distanceTransform::parameters distanceTransform_parameters;}
+#include "ltiSkeleton.h"
+#define _skeleton skeleton
+#define _skeleton_parameters parameters
+namespace lti {typedef lti::skeleton::parameters skeleton_parameters;}
+#include "ltiClassifier.h"
+#define _classifier classifier
+#define _classifier_parameters parameters
+#define _classifier_outputTemplate outputTemplate
+#define _classifier_outputVector outputVector
+namespace lti {
+typedef lti::classifier::parameters classifier_parameters;
+typedef lti::classifier::outputTemplate classifier_outputTemplate;
+typedef lti::classifier::outputVector classifier_outputVector;
+}
+#include "ltiSupervisedInstanceClassifier.h"
+#define _supervisedInstanceClassifier supervisedInstanceClassifier
+#define _supervisedInstanceClassifier_parameters parameters
+namespace lti {typedef lti::supervisedInstanceClassifier::parameters supervisedInstanceClassifier_parameters;}
+/* TODO
+#include "ltiDecisionTree.h"
+#define _decisionTree decisionTree
+#define _decisionTree_parameters parameters
+namespace lti {
+typedef lti::decisionTree::parameters decisionTree_parameters;
+}
+*/
+
+#include "ltiSplitImageToHSI.h"
+#include "ltiSplitImageToHSV.h"
+#include "ltiSplitImageToHLS.h"
+#include "ltiSplitImageToRGB.h"
+#include "ltiSplitImageToYUV.h"
+
+typedef std::ostream ostream;
+typedef std::istream istream;
+
+using namespace lti;
+
+#include "lti_manual.h"
+
+%}
+// **************************************************************************
+// This part is for the swig parser phase !
+// This code will be used by swig to build up the type hierarchy.
+// for successful mapping of const ubyte & to simple data types !!!
+typedef unsigned      char ubyte;
+typedef   signed      char  byte;
+typedef unsigned short int uint16;
+typedef   signed short int  int16;
+typedef unsigned       int uint32;
+typedef   signed       int  int32;
+/* #ifdef LOSEDOWS
+typedef unsigned   __int64 uint64;
+typedef signed     __int64  int64;
+#else
+typedef unsigned long long uint64;
+typedef   signed long long  int64;
+#endif */
+typedef point<int> ipoint;
+
+%include "ltiObject.h"
+%include "ltiIoHandler.h"
+%include "ltiIoObject.h"
+%include "ltiMathObject.h"
+%include "ltiRGBPixel.h"
+%include "ltiPoint.h"
+namespace lti {
+    %template(ipoint) tpoint<int>;
+    %template(fpoint) tpoint<float>;
+    %template(dpoint) tpoint<double>;
+}
+%template(list_ipoint) std::list<lti::ipoint>;
+%include "ltiPointList.h"
+%extend lti::tpointList {
+// TODO: add a better (pythonic) support for iterators
+void * createIterator()
+{
+    lti::tpointList<T>::iterator * pIter = new lti::tpointList<T>::iterator;
+    (*pIter) = self->begin();
+    return (void *) (pIter);
+}
+void deleteIterator(void *p) 
+{
+    lti::tpointList<T>::iterator * pIter = (lti::tpointList<T>::iterator *)p;
+    delete pIter;
+}
+bool isEnd(void *p) 
+{
+    lti::tpointList<T>::iterator * pIter = (lti::tpointList<T>::iterator *)p;
+    return *pIter == self->end();
+}
+tpoint<T> nextElement(void * p) 
+{
+    lti::tpointList<T>::iterator * pIter = (lti::tpointList<T>::iterator *)p;
+    tpoint<T> aPointOut = *(*pIter);
+    ++(*pIter);
+    return aPointOut;
+}
+}
+namespace lti {
+    %template(pointList) tpointList<int>;
+}
+%include "ltiPolygonPoints.h"
+namespace lti {
+//    %template(ipolygonPoints) tpolygonPoints<int>;        // PATCH in ltiPolygonPoints.h
+}
+%include "ltiGeometry.h"
+namespace lti {
+//TODO:    %template(iintersection) intersection<ipoint>;
+}
+%include "ltiGenericVector.h"
+%extend lti::genericVector {
+    // add index support for python (Warning: this is Python-specific!) 
+	const T & __getitem__( int index )
+	{
+		return self->at(index);
+	}
+	void __setitem__( int index, const T & value )
+	{
+		(*self)[index] = value;
+	}
+}
+namespace lti {
+    %template(dgenericVector)   genericVector<double>;
+    %template(fgenericVector)   genericVector<float>;
+    %template(igenericVector)   genericVector<int>;
+    %template(bgenericVector)   genericVector<ubyte>;
+    %template(rgbgenericVector) genericVector<rgbPixel>;
+}
+%include "ltiVector.h"
+namespace lti {
+    %template(dvector) vector<double>;
+    %template(fvector) vector<float>;
+    %template(ivector) vector<int>;
+    %template(uvector) vector<ubyte>;
+    %template(palette) vector<rgbPixel>;
+}
+%include "ltiArray.h"
+namespace lti {
+    %template(iarray) array<int>;
+    %template(farray) array<float>;
+    %template(darray) array<double>;
+    %template(barray) array<ubyte>;
+}
+%include "ltiGenericMatrix.h"
+%extend lti::genericMatrix {
+    // add index support for python (Warning: this is Python-specific!) 
+	const T & __getitem__( int index )
+	{
+		return self->at(index);
+	}
+	void __setitem__( int index, const genericVector<T> & value )
+	{
+		(*self)[index] = value;
+	}
+    // TODO: check
+    // The original at()-method makes some problems! is it because of 'inline' ?
+    const T & at( int row, int col )
+    {
+        return self->at(row,col);
+    }
+    void setAt( int row, int col, const T & value )
+    {
+		(*self)[row][col] = value;
+    }
+}
+namespace lti {
+    %template(bgenericMatrix) genericMatrix<ubyte>;
+    %template(igenericMatrix) genericMatrix<int>;
+    %template(fgenericMatrix) genericMatrix<float>;
+    %template(dgenericMatrix) genericMatrix<double>;
+    %template(rgbPixelgenericMatrix) genericMatrix<rgbPixel>;
+}
+%include "ltiMatrix.h"
+namespace lti {
+    %template(imatrix) matrix<int>;
+    %template(fmatrix) matrix<float>;
+    %template(dmatrix) matrix<double>;
+    %template(bmatrix) matrix<ubyte>;
+    %template(rgbPixelmatrix) matrix<rgbPixel>;
+}
+%include "ltiHistogram.h"
+//namespace lti {
+//    %template(histogram) thistogram<double>;
+//}
+
+%include "ltiImage.h"
+%include "ltiContour.h"
+
+// has to be included AFTER the definition of borderPoints !!!
+%include "_objectsFromMask_objectStruct.h"
+#include "_objectsFromMask_objectStruct.h"
+
+// TODO: add better tree support !
+//%include "ltiTree.h"
+//namespace lti {
+//    //%template(tree_objectStruct) tree<objectsFromMask_objectStruct>;    // does not work because of a syntactical difference to tree<objectStruct>, unforunately is swig not so clever to handel that :-(
+//    %template(tree_objectStruct) tree<objectStruct>;    
+//}
+////#define node tree_objectStruct_node
+//%include "_tree_node.h"
+
+%include "ltiLinearKernels.h"
+namespace lti {
+    %template(ikernel1D) kernel1D<int>;
+    %template(fkernel1D) kernel1D<float>;
+    %template(dkernel1D) kernel1D<double>;
+    %template(bkernel1D) kernel1D<ubyte>;
+    %template(ikernel2D) kernel2D<int>;
+    %template(fkernel2D) kernel2D<float>;
+    %template(dkernel2D) kernel2D<double>;
+    %template(bkernel2D) kernel2D<ubyte>;
+    %template(isepKernel) sepKernel<int>;
+    %template(fsepKernel) sepKernel<float>;
+    %template(dsepKernel) sepKernel<double>;
+    %template(usepKernel) sepKernel<ubyte>;
+}
+%include "ltiGradientKernels.h"
+namespace lti {
+    // TODO %template(igradientKernelX) gradientKernelX<int>;
+}
+%include "ltiHessianKernels.h"
+%include "ltiLaplacianKernel.h"
+%include "ltiSecondDerivativeKernels.h"
+namespace lti {
+    %template(iandoKernelXX) andoKernelXX<int>;
+    %template(iandoKernelXY) andoKernelXY<int>;
+    %template(iandoKernelYY) andoKernelYY<int>;
+    %template(fandoKernelXX) andoKernelXX<float>;
+    %template(fandoKernelXY) andoKernelXY<float>;
+    %template(fandoKernelYY) andoKernelYY<float>;
+}
+
+// TODO: ok: mit SWIG 1.3.21 !!! und SWIG 1.3.24 + VC7
+%template(list_ioPoints) std::list<lti::ioPoints>;
+%template(list_borderPoints) std::list<lti::borderPoints>;
+%template(list_areaPoints) std::list<lti::areaPoints>;
+
+// parameters in functor (eindeutig) umbenennen
+#define parameters functor_parameters
+%include "_functor_parameters.h"
+%include "ltiFunctor.h"
+#undef parameters
+
+#define parameters modifier_parameters
+%include "_modifier_parameters.h"
+%include "ltiModifier.h"
+#undef parameters
+
+#define parameters filter_parameters
+%include "_filter_parameters.h"
+%include "ltiFilter.h"
+#undef parameters
+
+#define parameters ioFunctor_parameters
+%include "_ioFunctor_parameters.h"
+%include "ltiIOFunctor.h"
+#undef parameters
+
+#define parameters ioBMP_parameters
+%include "_ioBMP_parameters.h"
+%include "ltiBMPFunctor.h"
+#undef parameters
+
+#define parameters ioJPEG_parameters
+%include "_ioJPEG_parameters.h"
+%include "ltiJPEGFunctor.h"
+#undef parameters
+
+#define parameters ioPNG_parameters
+%include "_ioPNG_parameters.h"
+%include "ltiPNGFunctor.h"
+#undef parameters
+
+#define parameters ioImage_parameters
+%include "_ioImage_parameters.h"
+%include "ltiALLFunctor.h"
+#undef parameters
+
+#define parameters viewerBase_parameters
+%include "_viewerBase_parameters.h"
+%include "ltiViewerBase.h"
+#undef parameters
+
+#define parameters externViewer_parameters
+%include "_externViewer_parameters.h"
+%include "ltiExternViewer.h"
+#undef parameters
+
+%include "ltiSplitImage.h"
+%include "ltiSplitImageTorgI.h"
+
+#define parameters usePalette_parameters
+%include "_usePalette_parameters.h"
+%include "ltiUsePalette.h"
+#undef parameters
+
+#define parameters transform_parameters
+%include "_transform_parameters.h"
+%include "ltiTransform.h"
+#undef parameters
+
+#define parameters gradientFunctor_parameters
+%include "_gradientFunctor_parameters.h"
+%include "ltiGradientFunctor.h"
+#undef parameters
+
+#define parameters colorContrastGradient_parameters
+%include "_colorContrastGradient_parameters.h"
+%include "ltiColorContrastGradient.h"
+#undef parameters
+
+#define parameters edgeDetector_parameters
+%include "_edgeDetector_parameters.h"
+%include "ltiEdgeDetector.h"
+#undef parameters
+
+#define parameters classicEdgeDetector_parameters
+%include "_classicEdgeDetector_parameters.h"
+%include "ltiClassicEdgeDetector.h"
+#undef parameters
+
+#define parameters cannyEdges_parameters
+%include "_cannyEdges_parameters.h"
+%include "ltiCannyEdges.h"
+#undef parameters
+
+// TODO: problems with private class accumulator !!! --> can we solve this with generated header file out of the XML-output ?
+#define parameters convolution_parameters
+%include "_convolution_parameters.h"
+%include "ltiConvolution.h"
+#undef parameters
+
+#define parameters segmentation_parameters
+%include "_segmentation_parameters.h"
+%include "ltiSegmentation.h"
+#undef parameters
+
+#define parameters regionGrowing_parameters
+%include "_regionGrowing_parameters.h"
+%include "ltiRegionGrowing.h"
+#undef parameters
+
+////#define objectStruct objectsFromMask_objectStruct
+//%include "_objectsFromMask_objectStruct.h"
+////%include "ltiObjectsFromMask.h"
+////#undef objectStruct
+
+#define parameters objectsFromMask_parameters
+%include "_objectsFromMask_parameters.h"
+%include "ltiObjectsFromMask.h"
+#undef parameters
+
+#define parameters polygonApproximation_parameters
+%include "_polygonApproximation_parameters.h"
+%include "ltiPolygonApproximation.h"
+#undef parameters
+
+#define parameters colorQuantization_parameters
+%include "_colorQuantization_parameters.h"
+%include "ltiColorQuantization.h"
+#undef parameters
+
+#define parameters kMColorQuantization_parameters
+%include "_kMColorQuantization_parameters.h"
+%include "ltiKMColorQuantization.h"
+#undef parameters
+
+#define parameters meanShiftSegmentation_parameters
+%include "_meanShiftSegmentation_parameters.h"
+%include "ltiMeanShiftSegmentation.h"
+#undef parameters
+
+#define parameters kMeansSegmentation_parameters
+%include "_kMeansSegmentation_parameters.h"
+%include "ltiKMeansSegmentation.h"
+#undef parameters
+
+%extend lti::_kMeansSegmentation::_kMeansSegmentation_parameters {
+// TODO: is there a better way to support complex attributes ?
+// a helper method to set complex attributes of a parameters-class
+void setQuantParameters(const lti::_kMColorQuantization::kMColorQuantization_parameters & value) 
+{
+    self->quantParameters = value;
+} 
+};
+
+#define parameters whiteningSegmentation_parameters
+%include "_whiteningSegmentation_parameters.h"
+%include "ltiWhiteningSegmentation.h"
+#undef parameters
+
+#define parameters csPresegmentation_parameters
+%include "_csPresegmentation_parameters.h"
+%include "ltiCsPresegmentation.h"
+#undef parameters
+
+#define parameters featureExtractor_parameters
+%include "_featureExtractor_parameters.h"
+%include "ltiFeatureExtractor.h"
+#undef parameters
+
+#define parameters globalFeatureExtractor_parameters
+%include "_globalFeatureExtractor_parameters.h"
+%include "ltiGlobalFeatureExtractor.h"
+#undef parameters
+
+#define parameters localFeatureExtractor_parameters
+%include "_localFeatureExtractor_parameters.h"
+%include "ltiLocalFeatureExtractor.h"
+#undef parameters
+
+#define parameters localMoments_parameters
+%include "_localMoments_parameters.h"
+%include "ltiLocalMoments.h"
+#undef parameters
+
+#define parameters geometricFeatures_parameters
+%include "_geometricFeatures_parameters.h"
+%include "ltiGeometricFeatures.h"
+#undef parameters
+
+#define parameters chromaticityHistogram_parameters
+%include "_chromaticityHistogram_parameters.h"
+%include "ltiChromaticityHistogram.h"
+#undef parameters
+
+#define parameters morphology_parameters
+%include "_morphology_parameters.h"
+%include "ltiMorphology.h"
+#undef parameters
+
+#define parameters dilation_parameters
+%include "_dilation_parameters.h"
+%include "ltiDilation.h"
+#undef parameters
+
+#define parameters erosion_parameters
+%include "_erosion_parameters.h"
+%include "ltiErosion.h"
+#undef parameters
+
+#define parameters distanceTransform_parameters
+%rename (distanceTransform_sedMask) lti::distanceTransform::sedMask;
+%include "_distanceTransform_parameters.h"
+%include "ltiDistanceTransform.h"
+#undef parameters
+
+#define parameters skeleton_parameters
+%include "_skeleton_parameters.h"
+%include "ltiSkeleton.h"
+#undef parameters
+
+#define parameters classifier_parameters
+#define outputTemplate classifier_outputTemplate
+#define outputVector classifier_outputVector
+%include "_classifier_outputVector.h"
+%include "_classifier_outputTemplate.h"
+%include "_classifier_parameters.h"
+%include "ltiClassifier.h"
+#undef parameters
+
+#define parameters supervisedInstanceClassifier_parameters
+//%include "_supervisedInstanceClassifier_parameters.h"
+%include "ltiSupervisedInstanceClassifier.h"
+#undef parameters
+
+//#define parameters decisionTree_parameters
+//%include "_decisionTree_parameters.h"
+//%include "ltiDecisionTree.h"
+//#undef parameters
+
+%include "ltiSplitImageToHSI.h"
+%extend lti::splitImageToHSI {
+    // transfer the HSI value as a rgbPixel (TODO: maybe better as a Python tuple? How?)
+    lti::rgbPixel apply( const rgbPixel &pixel )
+    {
+        ubyte H, S, I;
+        self->apply( pixel, H, S, I );
+        return lti::rgbPixel( H, S, I );
+    }
+/* TODO --> does not work !
+    int[3] apply( const rgbPixel &pixel )
+    {
+        int ret[3];
+        ubyte H, S, I;
+        self->apply( pixel, H, S, I );
+        ret[0] = H;
+        ret[1] = S;
+        ret[2] = I;
+        return ret;
+    }
+*/    
+}
+%include "ltiSplitImageToHSV.h"
+%include "ltiSplitImageToHLS.h"
+%include "ltiSplitImageToRGB.h"
+%include "ltiSplitImageToYUV.h"
+
+// **************************************************************************
+
+%include "lti_manual.h"
+
+
diff --git a/externals/gridflow/optional/rblti/std_list_ruby.i b/externals/gridflow/optional/rblti/std_list_ruby.i
new file mode 100644
index 00000000..baf66d91
--- /dev/null
+++ b/externals/gridflow/optional/rblti/std_list_ruby.i
@@ -0,0 +1,28 @@
+/*
+  Lists
+*/
+
+%fragment("StdListTraits","header",fragment="StdSequenceTraits")
+%{
+  namespace swig {
+    template <class T >
+    struct traits_asptr<std::list<T> >  {
+      static int asptr(PyObject *obj, std::list<T> **lis) {
+	return traits_asptr_stdseq<std::list<T> >::asptr(obj, lis);
+      }
+    };
+
+    template <class T>
+    struct traits_from<std::list<T> > {
+      static PyObject *from(const std::list<T> & vec) {
+	return traits_from_stdseq<std::list<T> >::from(vec);
+      }
+    };
+  }
+%}
+
+#define %swig_list_methods(Type...) %swig_sequence_methods(Type)
+#define %swig_list_methods_val(Type...) %swig_sequence_methods_val(Type);
+
+%include <std/std_list.i>
+
diff --git a/externals/gridflow/optional/usb.c b/externals/gridflow/optional/usb.c
index 1721d4c4..b12b5a10 100644
--- a/externals/gridflow/optional/usb.c
+++ b/externals/gridflow/optional/usb.c
@@ -1,5 +1,5 @@
 /*
-	$Id: usb.c,v 1.1 2005-10-04 02:02:15 matju Exp $
+	$Id: usb.c,v 1.2 2006-03-15 04:45:31 matju Exp $
 
 	GridFlow
 	Copyright (c) 2001,2002,2003 by Mathieu Bouchard
@@ -354,5 +354,6 @@ void startup_usb () {
 		rb_hash_aset(busses,rb_str_new2(bus->dirname),usb_scan_bus(bus));
 	}
 	//IEVAL(cUSB,"STDERR.print '@busses = '; STDERR.puts @busses.inspect");
+	rb_require("gridflow/optional/usb.rb");
 }
 
diff --git a/externals/gridflow/optional/usb.rb b/externals/gridflow/optional/usb.rb
new file mode 100644
index 00000000..98191329
--- /dev/null
+++ b/externals/gridflow/optional/usb.rb
@@ -0,0 +1,107 @@
+=begin
+	$Id: usb.rb,v 1.1 2006-03-15 04:46:22 matju Exp $
+
+	GridFlow
+	Copyright (c) 2001,2002,2003,2004,2005 by Mathieu Bouchard
+
+	This program is free software; you can redistribute it and/or
+	modify it under the terms of the GNU General Public License
+	as published by the Free Software Foundation; either version 2
+	of the License, or (at your option) any later version.
+
+	See file ../COPYING for further informations on licensing terms.
+
+	This program is distributed in the hope that it will be useful,
+	but WITHOUT ANY WARRANTY; without even the implied warranty of
+	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+	GNU General Public License for more details.
+
+	You should have received a copy of the GNU General Public License
+	along with this program; if not, write to the Free Software
+	Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+=end
+
+module GridFlow
+
+class<<USB
+	attr_reader :busses
+end
+
+FObject.subclass("delcomusb",1,1) {
+	Vendor,Product=0x0FC5,0x1222
+	def self.find
+		r=[]
+		USB.busses.each {|dir,bus|
+			bus.each {|dev|
+				r<<dev if dev.idVendor==Vendor and dev.idProduct==Product
+			}
+		}
+		r
+	end
+	def initialize #(bus=nil,dev=nil)
+		r=DelcomUSB.find
+		raise "no such device" if r.length<1
+		raise "#{r.length} such devices (which one???)" if r.length>1
+		@usb=USB.new(r[0])
+		if_num=nil
+		r[0].config.each {|config|
+			config.interface.each {|interface|
+				if_num = interface.bInterfaceNumber
+			}
+		}
+		# post "Interface # %i\n", if_num
+		@usb.set_configuration 1
+		@usb.claim_interface if_num
+		@usb.set_altinterface 0 rescue ArgumentError
+	end
+	# libdelcom had this:
+        # uint8 recipient, deviceModel, major, minor, dataL, dataM;
+        # uint16 length; uint8[8] extension;
+	def _0_send_command(major,minor,dataL,dataM,extension="\0\0\0\0\0\0\0\0")
+		raise "closed" if not @usb
+		raise "extension.length!=8" if extension.length!=8
+		@usb.control_msg(
+			0x000000c8, 0x00000012,
+			minor*0x100+major,
+			dataM*0x100+dataL,
+			extension, 5000)
+	end
+	def delete; @usb.close; end
+}
+
+FObject.subclass("klippeltronics",1,1) {
+	def self.find
+	  r=[]
+	  USB.busses.each {|dir,bus|
+	    bus.each {|dev|
+	      GridFlow.post "dir=%s, vendor=%x, product=%x",
+		      dir, dev.idVendor, dev.idProduct
+	      r<<dev if dev.idVendor==0xDead and dev.idProduct==0xBEEF
+	    }
+	  }
+	  r
+	end
+	def initialize
+		r=self.class.find
+		post "%s", r.inspect
+		raise "no such device" if r.length<1
+		raise "#{r.length} such devices (which one???)" if r.length>1
+		$iobox=@usb=USB.new(r[0])
+		if_num=nil
+		r[0].config.each {|config|
+			config.interface.each {|interface|
+				#post "interface=%s", interface.to_s
+				if_num = interface.bInterfaceNumber
+			}
+		}
+		# post "Interface # %i\n", if_num
+		# @usb.set_configuration 0
+		@usb.claim_interface if_num
+		@usb.set_altinterface 0 rescue ArgumentError
+	end
+	#@usb.control_msg(0b10100001,0x01,0,0,"",1000)
+	#@usb.control_msg(0b10100001,0x01,0,1," ",0)
+	def delete; @usb.close; end
+}
+
+end # module GridFlow
diff --git a/externals/gridflow/pd_abstractions/#color.pd b/externals/gridflow/pd_abstractions/#color.pd
index bd97d09b..b7a38d9f 100644
--- a/externals/gridflow/pd_abstractions/#color.pd
+++ b/externals/gridflow/pd_abstractions/#color.pd
@@ -1,21 +1,16 @@
-#N canvas 648 305 209 58 10;
-#X floatatom 3 29 5 0 0 0 - - -;
+#N canvas 0 17 209 58 10;
 #X obj 75 28 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -225271
 -24198 -1 0 1;
 #X obj 75 43 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -228992
 -62784 -1 0 1;
-#X floatatom 3 44 5 0 0 0 - - -;
 #X obj 75 13 hsl 128 15 0 255 0 0 empty empty empty -2 -6 0 8 -261689
 -258699 -1 0 1;
-#X floatatom 3 14 5 0 0 0 - - -;
 #X obj 3 76 #pack 3;
-#X obj 209 36 #export_list;
-#X obj 210 55 unpack 0 0 0;
-#X obj 208 17 inlet rgb_color;
+#X obj 209 13 inlet rgb_color;
 #X obj 56 75 outlet rgb_color;
-#X obj 43 12 int;
-#X obj 43 27 int;
-#X obj 43 42 int;
+#X obj 48 12 int;
+#X obj 48 27 int;
+#X obj 48 42 int;
 #X obj 196 2 cnv 10 60 10 empty \$0-cnv empty 20 12 0 14 -262144 -262144
 0;
 #X obj 125 192 s \$0-cnv;
@@ -23,46 +18,58 @@
 #X obj 4 154 #export;
 #X obj 3 133 # ^ -1;
 #X obj 3 114 #fold |;
-#X obj 3 95 # << ( 16 8 0 );
-#X obj 194 75 loadbang;
-#X msg 194 151 range \$1 \$2;
-#X obj 194 132 #export_list;
-#X obj 194 94 listmake \$1 \$2;
-#X obj 194 113 # || ( 0 255 );
+#X obj 194 85 loadbang;
+#X msg 194 161 range \$1 \$2;
+#X obj 194 142 #export_list;
+#X obj 194 104 listmake \$1 \$2;
 #X obj 59 134 loadbang;
 #X obj 88 154 - \$3;
 #X msg 59 154 1;
 #X obj 3 180 spigot;
-#X connect 0 0 6 1;
-#X connect 1 0 12 0;
-#X connect 2 0 13 0;
-#X connect 3 0 6 2;
-#X connect 4 0 11 0;
-#X connect 5 0 6 0;
-#X connect 6 0 10 0;
-#X connect 6 0 20 0;
-#X connect 7 0 8 0;
-#X connect 8 0 4 0;
-#X connect 8 1 1 0;
-#X connect 8 2 2 0;
-#X connect 9 0 7 0;
-#X connect 11 0 5 0;
-#X connect 12 0 0 0;
-#X connect 13 0 3 0;
-#X connect 16 0 15 0;
-#X connect 17 0 29 0;
-#X connect 18 0 17 0;
-#X connect 19 0 18 0;
-#X connect 20 0 19 0;
-#X connect 21 0 24 0;
-#X connect 22 0 2 0;
-#X connect 22 0 1 0;
-#X connect 22 0 4 0;
-#X connect 23 0 22 0;
-#X connect 24 0 25 0;
-#X connect 25 0 23 0;
-#X connect 26 0 28 0;
-#X connect 27 0 29 1;
-#X connect 28 0 27 0;
-#X connect 29 0 16 0;
+#X obj 209 33 route delegate;
+#X obj 244 53 #unpack 3;
+#X obj 1 14 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 256;
+#X obj 1 30 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 256;
+#X obj 1 46 nbx 4 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 8 -262144
+-1 -1 0 256;
+#X obj 194 123 # || (0 255);
+#X obj 3 95 # << (16 8 0);
+#X text 64 218 should be sized 209 by 58 or something;
+#X connect 0 0 7 0;
+#X connect 1 0 8 0;
+#X connect 2 0 6 0;
+#X connect 3 0 5 0;
+#X connect 3 0 29 0;
+#X connect 4 0 23 0;
+#X connect 6 0 25 0;
+#X connect 7 0 26 0;
+#X connect 8 0 27 0;
+#X connect 11 0 10 0;
+#X connect 12 0 22 0;
+#X connect 13 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 18 0;
+#X connect 16 0 1 0;
+#X connect 16 0 0 0;
+#X connect 16 0 2 0;
+#X connect 17 0 16 0;
+#X connect 18 0 28 0;
+#X connect 19 0 21 0;
+#X connect 20 0 22 1;
+#X connect 21 0 20 0;
+#X connect 22 0 11 0;
+#X connect 23 0 2 0;
+#X connect 23 0 0 0;
+#X connect 23 0 1 0;
+#X connect 23 1 24 0;
+#X connect 24 0 2 0;
+#X connect 24 1 0 0;
+#X connect 24 2 1 0;
+#X connect 25 0 3 0;
+#X connect 26 0 3 1;
+#X connect 27 0 3 2;
+#X connect 28 0 17 0;
+#X connect 29 0 14 0;
 #X coords 0 0 1 1 120 56 1;
diff --git a/externals/gridflow/pd_abstractions/#spread.pd b/externals/gridflow/pd_abstractions/#spread.pd
index b86ed96e..41a6a8da 100644
--- a/externals/gridflow/pd_abstractions/#spread.pd
+++ b/externals/gridflow/pd_abstractions/#spread.pd
@@ -2,7 +2,7 @@
 #X obj 17 12 inlet;
 #X obj 17 52 # & 0;
 #X obj 17 72 # + 5;
-#X obj 17 92 #! rand;
+#X obj 17 92 # rand;
 #X obj 17 112 # - 2;
 #X obj 137 162 # +;
 #X obj 124 68 # >> 1;
diff --git a/externals/gridflow/pd_examples/blob.pd b/externals/gridflow/pd_examples/blob.pd
index 48f5251a..12ea5ee6 100644
--- a/externals/gridflow/pd_examples/blob.pd
+++ b/externals/gridflow/pd_examples/blob.pd
@@ -1,106 +1,106 @@
-#N canvas 19 81 792 565 10;
-#X floatatom 405 212 5 0 0 0 - - -;
-#X obj 347 172 r move;
-#X obj 56 95 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#N canvas 19 81 792 575 10;
+#X floatatom 398 265 5 0 0 0 - - -;
+#X obj 368 225 r move;
+#X obj 56 129 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X msg 56 128 240 320 3 # 0;
-#X msg 461 357 300;
-#X obj 398 342 # * 300;
-#X obj 311 436 # cos*;
-#X msg 460 319 1600;
-#X msg 513 249 25;
-#X obj 373 212 +;
-#X msg 513 268 100;
-#X obj 504 192 hsl 128 15 100 2600 0 1 empty empty empty -2 -6 0 8
+#X msg 56 162 240 320 3 # 0;
+#X msg 461 407 300;
+#X obj 398 392 # * 300;
+#X obj 261 475 # cos*;
+#X msg 461 369 1600;
+#X msg 513 299 25;
+#X obj 368 263 +;
+#X msg 513 318 100;
+#X obj 505 244 hsl 128 15 100 2600 0 1 empty empty empty -2 -6 0 8
 -260818 -1 -1 2297 1;
-#X text 364 435 make circular orbit of variable radius;
-#X floatatom 502 211 5 0 0 0 - - -;
-#X msg 461 338 800;
-#X text 294 325 frequency of the orbit;
-#X text 500 177 increment;
-#X msg 373 192 1;
-#X obj 64 58 s move;
-#X obj 311 394 #outer + ( 0 9000 );
-#X obj 73 94 loadbang;
-#X obj 19 0 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
-#X obj 78 351 #out window;
-#X obj 246 126 # +;
-#X obj 438 299 # + 50;
-#X text 401 197 counter;
-#X obj 19 41 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X text 314 474 make circular orbit of variable radius;
+#X floatatom 502 261 5 0 0 0 - - -;
+#X msg 461 388 800;
+#X text 294 375 frequency of the orbit;
+#X text 501 229 increment;
+#X msg 368 244 1;
+#X obj 58 108 s move;
+#X obj 73 128 loadbang;
+#X obj 19 50 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 75 392 #out window;
+#X obj 186 236 # +;
+#X obj 437 345 # + 50;
+#X text 394 250 counter;
+#X obj 19 91 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 311 458 # + ( 120 160 );
-#X obj 19 309 #store;
-#X text 65 113 blank image to start with;
-#X text 272 127 translate the square;
-#X text 546 247 make a wavy radius (50-100) \; the 1100 is its frequency
+#X obj 261 494 # + ( 120 160 );
+#X obj 19 354 #store;
+#X text 65 147 blank image to start with;
+#X text 212 237 translate the square;
+#X text 546 297 make a wavy radius (50-100) \; the 1100 is its frequency
 \; tune it for fun and profit.;
-#X obj 19 58 t b b;
-#X obj 368 232 t a a a;
-#X msg 246 74 4 2 # -1 -1 -1 1 1 1 1 -1;
-#X obj 19 22 metro 1.367;
-#X obj 8 491 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj 19 108 t b b;
+#X obj 368 282 t a a a;
+#X msg 186 198 4 2 # -1 -1 -1 1 1 1 1 -1;
+#X obj 19 72 metro 1.367;
+#X obj 8 541 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text 16 498 GridFlow 0.8.0;
-#X obj 8 -38 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 16 548 GridFlow 0.8.0;
+#X obj 8 12 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 21 -38 Blob.pd;
-#X msg 514 287 10;
-#X obj 437 257 # * 1000;
-#X obj 101 215 #color;
-#X obj 101 171 loadbang;
-#X text 452 383 duplicate the angle \; make the 2nd 90 degrees apart
+#X text 21 12 Blob.pd;
+#X msg 514 337 10;
+#X obj 437 307 # * 1000;
+#X obj 101 265 #color;
+#X obj 101 221 loadbang;
+#X text 385 432 duplicate the angle \; make the 2nd 90 degrees apart
 (required for a circle \; else it'll be an oval or a line);
-#X obj 78 309 #draw_polygon + (3 # );
-#X text 21 -25 Copyright 2002 Mathieu Bouchard and Alexandre Castonguay
+#X obj 75 354 #draw_polygon + (3 # );
+#X text 21 25 Copyright 2002 Mathieu Bouchard and Alexandre Castonguay
 ;
-#X text 245 58 a 2x2 square's coordinates;
-#X text 288 103 scale factor;
-#X obj 246 102 # * 8;
-#X obj 78 330 #solarize;
-#X text 400 -1 This is the classic "Shadebob" effect of the demoscene
+#X text 185 182 a 2x2 square's coordinates;
+#X text 228 218 scale factor;
+#X obj 186 217 # * 8;
+#X obj 75 373 #solarize;
+#X text 400 49 This is the classic "Shadebob" effect of the demoscene
 ;
-#X msg 101 193 12 24 36;
-#X text 6 284 superimpose the light of many squares;
-#X obj 438 278 # cos* 100;
+#X msg 101 243 12 24 36;
+#X text 6 331 superimpose the light of many squares;
+#X obj 437 326 # cos* 100;
+#X obj 261 444 #outer + (0 9000);
 #X connect 0 0 9 1;
 #X connect 1 0 17 0;
 #X connect 2 0 3 0;
-#X connect 3 0 28 1;
+#X connect 3 0 27 1;
 #X connect 4 0 5 1;
-#X connect 5 0 19 0;
-#X connect 6 0 27 0;
+#X connect 5 0 54 0;
+#X connect 6 0 26 0;
 #X connect 7 0 5 1;
-#X connect 8 0 54 1;
+#X connect 8 0 53 1;
 #X connect 9 0 0 0;
-#X connect 9 0 33 0;
-#X connect 10 0 54 1;
+#X connect 9 0 32 0;
+#X connect 10 0 53 1;
 #X connect 11 0 13 0;
-#X connect 13 0 41 1;
+#X connect 13 0 40 1;
 #X connect 14 0 5 1;
 #X connect 17 0 9 0;
-#X connect 19 0 6 0;
-#X connect 20 0 2 0;
-#X connect 21 0 35 0;
-#X connect 23 0 45 2;
-#X connect 24 0 6 1;
-#X connect 26 0 32 0;
-#X connect 27 0 23 1;
-#X connect 28 0 45 0;
-#X connect 32 0 28 0;
-#X connect 32 1 18 0;
-#X connect 33 0 34 0;
-#X connect 33 1 5 0;
-#X connect 33 2 41 0;
-#X connect 34 0 49 0;
-#X connect 35 0 26 0;
-#X connect 40 0 54 1;
-#X connect 41 0 54 0;
-#X connect 42 0 45 1;
-#X connect 43 0 52 0;
-#X connect 45 0 28 1;
-#X connect 45 0 50 0;
-#X connect 49 0 23 0;
-#X connect 50 0 22 0;
-#X connect 52 0 42 0;
-#X connect 54 0 24 0;
+#X connect 19 0 2 0;
+#X connect 20 0 34 0;
+#X connect 22 0 44 2;
+#X connect 23 0 6 1;
+#X connect 25 0 31 0;
+#X connect 26 0 22 1;
+#X connect 27 0 44 0;
+#X connect 31 0 27 0;
+#X connect 31 1 18 0;
+#X connect 32 0 33 0;
+#X connect 32 1 5 0;
+#X connect 32 2 40 0;
+#X connect 33 0 48 0;
+#X connect 34 0 25 0;
+#X connect 39 0 53 1;
+#X connect 40 0 53 0;
+#X connect 41 0 44 1;
+#X connect 42 0 51 0;
+#X connect 44 0 27 1;
+#X connect 44 0 49 0;
+#X connect 48 0 22 0;
+#X connect 49 0 21 0;
+#X connect 51 0 41 0;
+#X connect 53 0 23 0;
+#X connect 54 0 6 0;
diff --git a/externals/gridflow/pd_examples/cellular_1d.pd b/externals/gridflow/pd_examples/cellular_1d.pd
index eb1c6c30..138b20a1 100644
--- a/externals/gridflow/pd_examples/cellular_1d.pd
+++ b/externals/gridflow/pd_examples/cellular_1d.pd
@@ -1,164 +1,160 @@
-#N canvas 337 53 804 634 10;
-#X obj 43 68 loadbang;
-#X obj 93 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0 1
+#N canvas 355 53 786 544 10;
+#X obj 33 103 loadbang;
+#X obj 93 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0 1
 ;
-#X obj 108 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
+#X obj 108 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
 1;
-#X obj 123 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
+#X obj 123 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
 1;
-#X obj 138 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0
+#X obj 138 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0
 1;
-#X obj 153 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
+#X obj 153 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
 1;
-#X obj 168 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0
+#X obj 168 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0
 1;
-#X obj 183 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
+#X obj 183 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 1
 1;
-#X obj 198 382 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0
+#X obj 198 352 tgl 15 0 empty empty empty 0 -6 0 8 -260818 -1 -1 0
 1;
-#X obj 124 498 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+#X obj 124 468 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
 -262144 -1 -1 86 256;
-#X obj -5 188 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X obj -1 215 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X msg 17 332 1 256 # 1;
-#X msg 43 102 1 256 # 2;
-#X obj 17 -2 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
-#X obj 418 199 loadbang;
-#X msg 418 219 1 256 # 0;
-#X text 131 482 characteristic number;
-#X obj 428 11 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
--262144 -1 -1 4 256;
-#X msg 467 69 \$1 256;
-#X msg 352 82 set \$1;
-#X text 104 124 randomizer;
-#X text 91 361 specify behaviour here;
-#X text 24 254 compute new state;
-#X text 315 237 make scrollie;
-#X text 367 270 convert bit matrix to rgb image;
-#X text 313 250 (window height = 128);
-#X obj 202 38 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X msg 17 312 1 256 # 1;
+#X msg 33 122 1 256 # 2;
+#X obj -1 77 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 415 245 loadbang;
+#X msg 415 264 1 256 # 0;
+#X text 131 452 characteristic number;
+#X obj 352 86 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-241291 -1 -1 0 256;
+#X msg 466 127 \$1 256;
+#X msg 352 122 set \$1;
+#X text 79 141 randomizer;
+#X text 91 331 specify behaviour here;
+#X text 24 234 compute new state;
+#X text 315 283 make scrollie;
+#X text 367 313 convert bit matrix to rgb image;
+#X text 313 296 (window height = 128);
+#X obj 159 74 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 151 337 loadbang;
-#X text 47 84 click here to restart;
-#X obj 99 200 t a a;
-#X obj 17 26 metro 33.3667;
-#X obj 416 115 t a a;
-#X obj 472 359 loadbang;
-#X obj 389 495 unpack 0 0 0;
-#X obj 564 494 unpack 0 0 0;
-#X msg 389 394 3 # 0;
-#X msg 565 395 3 # 255;
-#X text 442 392 background;
-#X text 629 395 foreground;
-#X obj 17 292 t a a;
-#X obj 43 124 # rand;
-#X obj 17 234 #store;
-#X obj 17 312 #finished;
-#X obj 17 352 # <<;
-#X obj 17 372 # &;
-#X obj 17 392 # != 0;
-#X obj 123 406 #pack 8;
-#X obj 124 445 #fold +;
-#X obj 124 466 #export;
-#X obj 202 56 #for 0 256 1;
-#X obj 202 76 # == 128;
-#X obj 202 96 #redim ( 1 256 );
-#X obj 416 96 #import ( 1 256 );
-#X obj 416 135 #finished;
-#X obj 352 157 #for 1 128 1;
-#X obj 352 177 #outer ignore ( 0 );
-#X obj 352 197 #store;
-#X obj 352 218 @join 0;
-#X obj 351 287 #outer ignore ( 0 );
-#X obj 351 308 #store;
-#X obj 398 308 #redim ( 2 3 );
-#X obj 389 414 #color;
-#X obj 565 414 #color;
-#X obj 389 475 #export_list;
-#X obj 565 475 #export_list;
-#X obj 492 526 #pack 6;
-#X obj 17 272 #convolve (1 3 # 1 2 4);
-#X obj 124 426 # << (0 1 2 3 4 5 6 7);
-#X obj -4 550 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj 151 307 loadbang;
+#X obj 95 182 t a a;
+#X obj 17 76 metro 33.3667;
+#X obj 366 165 t a a;
+#X obj 534 403 loadbang;
+#X msg 419 404 3 # 0;
+#X msg 595 405 3 # 255;
+#X text 460 405 background;
+#X text 648 407 foreground;
+#X obj 17 272 t a a;
+#X obj 33 141 # rand;
+#X obj 17 214 #store;
+#X obj 17 292 #finished;
+#X obj 17 332 # <<;
+#X obj 17 352 # &;
+#X obj 17 372 # != 0;
+#X obj 123 376 #pack 8;
+#X obj 124 415 #fold +;
+#X obj 124 436 #export;
+#X obj 159 91 #for 0 256 1;
+#X obj 159 110 # == 128;
+#X obj 159 129 #redim ( 1 256 );
+#X obj 366 184 #finished;
+#X obj 352 207 #for 1 128 1;
+#X obj 352 245 #store;
+#X obj 352 264 @join 0;
+#X obj 351 349 #store;
+#X obj 419 424 #color;
+#X obj 595 424 #color;
+#X obj 513 485 #pack 6;
+#X obj 17 252 #convolve (1 3 # 1 2 4);
+#X obj 124 396 # << (0 1 2 3 4 5 6 7);
+#X obj -4 510 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text 4 557 GridFlow 0.8.0;
-#X obj -7 -50 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 4 517 GridFlow 0.8.0;
+#X obj -7 0 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X obj 351 330 #out window;
-#X text -3 -35 Copyright 2002 Mathieu Bouchard;
-#X text -3 -49 Cellular_1d;
-#X obj 428 34 max 1;
-#X text 495 9 <-- number of new lines per frame;
-#X text 221 37 <-- make single dot;
+#X obj 351 368 #out window;
+#X text -3 15 Copyright 2002 Mathieu Bouchard;
+#X text -3 1 Cellular_1d;
+#X obj 352 102 max 1;
+#X text 419 84 <-- number of new lines per frame;
+#X text 178 73 <-- make single dot;
+#X text 100 123 restart;
+#X obj 352 226 #outer ignore (0);
+#X obj 351 330 #outer ignore (0);
+#X obj 398 349 #redim (2 3);
+#X obj 366 146 #import (1 256);
+#X obj 419 484 #unpack 3;
+#X obj 595 484 #unpack 3;
 #X connect 0 0 12 0;
-#X connect 1 0 46 0;
-#X connect 2 0 46 1;
-#X connect 3 0 46 2;
-#X connect 4 0 46 3;
-#X connect 5 0 46 4;
-#X connect 6 0 46 5;
-#X connect 7 0 46 6;
-#X connect 8 0 46 7;
-#X connect 9 0 44 1;
-#X connect 10 0 41 0;
-#X connect 11 0 43 0;
-#X connect 12 0 40 0;
-#X connect 13 0 30 0;
+#X connect 1 0 43 0;
+#X connect 2 0 43 1;
+#X connect 3 0 43 2;
+#X connect 4 0 43 3;
+#X connect 5 0 43 4;
+#X connect 6 0 43 5;
+#X connect 7 0 43 6;
+#X connect 8 0 43 7;
+#X connect 9 0 41 1;
+#X connect 10 0 38 0;
+#X connect 11 0 40 0;
+#X connect 12 0 37 0;
+#X connect 13 0 29 0;
 #X connect 14 0 15 0;
-#X connect 15 0 56 1;
-#X connect 17 0 74 0;
-#X connect 18 0 52 1;
-#X connect 19 0 54 0;
-#X connect 26 0 49 0;
+#X connect 15 0 51 1;
+#X connect 17 0 65 0;
+#X connect 18 0 72 1;
+#X connect 19 0 50 0;
+#X connect 26 0 46 0;
 #X connect 27 0 2 0;
 #X connect 27 0 3 0;
 #X connect 27 0 7 0;
 #X connect 27 0 5 0;
-#X connect 29 0 41 1;
-#X connect 29 1 52 0;
-#X connect 30 0 41 0;
-#X connect 31 0 53 0;
-#X connect 31 1 57 1;
-#X connect 32 0 35 0;
-#X connect 32 0 36 0;
-#X connect 33 0 65 0;
-#X connect 33 1 65 1;
-#X connect 33 2 65 2;
-#X connect 34 0 65 3;
-#X connect 34 1 65 4;
-#X connect 34 2 65 5;
-#X connect 35 0 61 0;
-#X connect 36 0 62 0;
-#X connect 39 0 42 0;
-#X connect 39 1 43 1;
-#X connect 40 0 29 0;
-#X connect 41 0 66 0;
-#X connect 42 0 11 0;
-#X connect 43 0 44 0;
+#X connect 28 0 38 1;
+#X connect 28 1 72 0;
+#X connect 29 0 38 0;
+#X connect 30 0 49 0;
+#X connect 30 1 52 1;
+#X connect 31 0 32 0;
+#X connect 31 0 33 0;
+#X connect 32 0 54 0;
+#X connect 33 0 55 0;
+#X connect 36 0 39 0;
+#X connect 36 1 40 1;
+#X connect 37 0 28 0;
+#X connect 38 0 57 0;
+#X connect 39 0 11 0;
+#X connect 40 0 41 0;
+#X connect 41 0 42 0;
+#X connect 42 0 28 0;
+#X connect 43 0 58 0;
 #X connect 44 0 45 0;
-#X connect 45 0 29 0;
-#X connect 46 0 67 0;
+#X connect 45 0 9 0;
+#X connect 46 0 47 0;
 #X connect 47 0 48 0;
-#X connect 48 0 9 0;
+#X connect 48 0 28 0;
 #X connect 49 0 50 0;
-#X connect 50 0 51 0;
-#X connect 51 0 29 0;
-#X connect 52 0 31 0;
-#X connect 53 0 54 0;
-#X connect 54 0 55 0;
-#X connect 55 0 56 0;
-#X connect 56 0 57 0;
-#X connect 57 0 56 1;
-#X connect 57 0 58 0;
-#X connect 58 0 59 0;
-#X connect 59 0 71 0;
-#X connect 60 0 59 1;
-#X connect 61 0 63 0;
-#X connect 62 0 64 0;
-#X connect 63 0 33 0;
-#X connect 64 0 34 0;
-#X connect 65 0 60 0;
-#X connect 66 0 39 0;
-#X connect 67 0 47 0;
-#X connect 74 0 19 0;
-#X connect 74 0 18 0;
+#X connect 50 0 69 0;
+#X connect 51 0 52 0;
+#X connect 52 0 51 1;
+#X connect 52 0 70 0;
+#X connect 53 0 62 0;
+#X connect 54 0 73 0;
+#X connect 55 0 74 0;
+#X connect 56 0 71 0;
+#X connect 57 0 36 0;
+#X connect 58 0 44 0;
+#X connect 65 0 19 0;
+#X connect 65 0 18 0;
+#X connect 69 0 51 0;
+#X connect 70 0 53 0;
+#X connect 71 0 53 1;
+#X connect 72 0 30 0;
+#X connect 73 0 56 0;
+#X connect 73 1 56 1;
+#X connect 73 2 56 2;
+#X connect 74 0 56 3;
+#X connect 74 1 56 4;
+#X connect 74 2 56 5;
diff --git a/externals/gridflow/pd_examples/color_correction.pd b/externals/gridflow/pd_examples/color_correction.pd
index 2a153d20..8c276f11 100644
--- a/externals/gridflow/pd_examples/color_correction.pd
+++ b/externals/gridflow/pd_examples/color_correction.pd
@@ -1,8 +1,8 @@
-#N canvas 455 129 676 546 10;
-#X text 360 96 sigma (extremes);
-#X obj 134 433 #out window;
-#X text 361 171 linear (contrast);
-#X obj 134 364 shunt 2;
+#N canvas 459 129 672 521 10;
+#X text 360 136 sigma (extremes);
+#X obj 134 465 #out window;
+#X text 361 211 linear (contrast);
+#X obj 134 404 shunt 2;
 #N canvas 1 96 188 188 color 0;
 #X obj 55 134 # inv+;
 #X obj 55 90 # inv+ 255;
@@ -22,9 +22,9 @@
 #X connect 6 0 0 0;
 #X connect 7 0 3 0;
 #X connect 8 0 1 0;
-#X restore 184 386 pd color correction graph generator;
-#X obj 19 295 #in;
-#X text 360 244 constant (brightness);
+#X restore 184 425 pd color correction graph generator;
+#X obj 59 285 #in;
+#X text 360 284 constant (brightness);
 #N canvas 604 262 237 400 color-correction 0;
 #X obj 23 214 # + 128;
 #X obj 23 194 # /;
@@ -67,88 +67,88 @@
 #X connect 17 0 4 0;
 #X connect 18 0 8 1;
 #X connect 19 0 8 0;
-#X restore 176 274 pd color-correction;
-#X obj 134 386 #store;
-#X obj 29 5 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
-#X obj 29 50 #for 0 256 1;
-#X msg 19 274 open teapot.png \, bang;
-#X obj 164 298 #finished;
-#X obj 29 27 metro 33.3667;
-#X obj 19 254 loadbang;
-#X obj 256 52 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -1
+#X restore 176 314 pd color-correction;
+#X obj 134 425 #store;
+#X obj 29 45 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 29 81 #for 0 256 1;
+#X obj 164 338 #finished;
+#X obj 29 62 metro 33.3667;
+#X obj 59 247 loadbang;
+#X obj 256 92 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -1
 -1 0;
-#X text 277 53 regular;
-#X text 276 68 solarize;
-#X text 277 82 solarize 2;
-#X obj 29 91 shunt 3;
-#X obj 29 163 t a;
-#X obj 122 146 # sin* 255;
-#X obj 123 127 # / 255;
-#X obj 123 108 # * 18000;
-#X obj 190 351 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
+#X text 277 93 regular;
+#X text 276 108 solarize;
+#X text 277 122 solarize 2;
+#X obj 29 119 shunt 3;
+#X obj 29 173 t a;
+#X obj 119 174 # sin* 255;
+#X obj 120 155 # / 255;
+#X obj 120 136 # * 18000;
+#X obj 190 391 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
 -1 0;
-#X text 209 351 see picture;
-#X text 209 366 see graph;
-#X obj 8 231 spigot;
-#X obj 57 232 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+#X text 209 391 see picture;
+#X text 209 406 see graph;
+#X obj 8 221 spigot;
+#X obj 57 222 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X text 13 214 enable stream;
-#X text 361 20 gamma (midtones);
-#X msg 254 143 3 # 256;
-#X obj 253 123 loadbang;
-#X msg 237 171 3 # 0;
-#X obj 8 320 #camera;
-#X obj 362 37 #color 0 1024 1;
-#X obj 362 112 #color 0 1024 1;
-#X obj 362 186 #color 0 1024 1;
-#X obj 362 258 #color -256 256 1;
-#X obj 51 114 #solarize;
-#X obj 134 411 #apply_colormap_channelwise;
-#X obj 2 -38 cnv 15 720 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 13 204 enable stream;
+#X text 361 60 gamma (midtones);
+#X msg 254 183 3 # 256;
+#X obj 253 163 loadbang;
+#X msg 238 212 3 # 0;
+#X obj 8 310 #camera;
+#X obj 362 77 #color 0 1024 1;
+#X obj 362 152 #color 0 1024 1;
+#X obj 362 226 #color 0 1024 1;
+#X obj 362 298 #color -256 256 1;
+#X obj 51 140 #solarize;
+#X obj 134 445 #apply_colormap_channelwise;
+#X obj 2 2 cnv 15 720 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 15 -25 Copyright 2002 Mathieu Bouchard;
-#X obj 2 477 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 15 15 Copyright 2002 Mathieu Bouchard;
+#X obj 2 487 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text 10 484 GridFlow 0.8.0;
-#X text 15 -38 color_correction.pd;
-#X obj 29 71 #outer + (0 0 0);
+#X text 10 494 GridFlow 0.8.0;
+#X text 15 2 color_correction.pd;
+#X obj 29 100 #outer + (0 0 0);
+#X msg 59 266 load teapot.png;
 #X connect 3 0 8 0;
 #X connect 3 1 4 0;
 #X connect 4 0 1 0;
 #X connect 5 0 8 1;
-#X connect 7 0 12 0;
+#X connect 7 0 11 0;
 #X connect 7 0 4 1;
-#X connect 7 0 40 1;
-#X connect 8 0 40 0;
-#X connect 9 0 13 0;
-#X connect 10 0 46 0;
-#X connect 11 0 5 0;
-#X connect 12 0 3 0;
-#X connect 13 0 10 0;
-#X connect 13 0 27 0;
-#X connect 14 0 11 0;
-#X connect 15 0 19 1;
-#X connect 19 0 20 0;
-#X connect 19 1 39 0;
-#X connect 19 2 23 0;
-#X connect 20 0 7 0;
+#X connect 7 0 39 1;
+#X connect 8 0 39 0;
+#X connect 9 0 12 0;
+#X connect 10 0 45 0;
+#X connect 11 0 3 0;
+#X connect 12 0 10 0;
+#X connect 12 0 26 0;
+#X connect 13 0 46 0;
+#X connect 14 0 18 1;
+#X connect 18 0 19 0;
+#X connect 18 1 38 0;
+#X connect 18 2 22 0;
+#X connect 19 0 7 0;
+#X connect 20 0 19 0;
 #X connect 21 0 20 0;
 #X connect 22 0 21 0;
-#X connect 23 0 22 0;
-#X connect 24 0 3 1;
-#X connect 27 0 34 0;
-#X connect 28 0 27 1;
-#X connect 31 0 35 0;
-#X connect 31 0 36 0;
-#X connect 31 0 37 0;
-#X connect 32 0 31 0;
-#X connect 32 0 33 0;
-#X connect 33 0 38 0;
-#X connect 34 0 8 1;
-#X connect 35 0 7 1;
-#X connect 36 0 7 2;
-#X connect 37 0 7 3;
-#X connect 38 0 7 4;
-#X connect 39 0 20 0;
-#X connect 40 0 1 0;
-#X connect 46 0 19 0;
+#X connect 23 0 3 1;
+#X connect 26 0 33 0;
+#X connect 27 0 26 1;
+#X connect 30 0 34 0;
+#X connect 30 0 35 0;
+#X connect 30 0 36 0;
+#X connect 31 0 30 0;
+#X connect 31 0 32 0;
+#X connect 32 0 37 0;
+#X connect 33 0 8 1;
+#X connect 34 0 7 1;
+#X connect 35 0 7 2;
+#X connect 36 0 7 3;
+#X connect 37 0 7 4;
+#X connect 38 0 19 0;
+#X connect 39 0 1 0;
+#X connect 45 0 18 0;
+#X connect 46 0 5 0;
diff --git a/externals/gridflow/pd_examples/cross_fade.pd b/externals/gridflow/pd_examples/cross_fade.pd
index f7af6195..1656b935 100644
--- a/externals/gridflow/pd_examples/cross_fade.pd
+++ b/externals/gridflow/pd_examples/cross_fade.pd
@@ -1,73 +1,74 @@
-#N canvas 401 101 681 500 10;
-#X obj 33 191 # *>>8;
-#X text 60 235 first picture plus a fraction of the difference;
-#X obj 33 233 # +;
-#X obj 33 170 #store;
-#X obj 264 103 # inv+;
-#X obj 88 254 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+#N canvas 397 101 680 501 10;
+#X obj 13 229 # *>>8;
+#X text 40 293 first picture plus a fraction of the difference;
+#X obj 13 291 # +;
+#X obj 13 210 #store;
+#X obj 211 157 # inv+;
+#X obj 68 311 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X text 152 324 note: the #layer/#join objects can make the crossfade
+#X text 12 372 note: the #layer/#join objects can make the crossfade
 process simpler but it's still not faster.;
-#X obj 50 -30 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
-;
-#X msg 309 72 open r001.jpg \, cast int16 \, bang;
-#X obj 283 72 #in;
-#X obj 33 149 #finished;
-#X text 109 257 click to clip out-of-range colours;
-#X text 82 190 multiply by a N/256 fraction;
-#X obj 81 295 # max 0;
-#X obj 264 51 #in;
-#X obj 81 274 # min 255;
-#X obj 33 326 #out window;
-#X obj 33 109 #cast int16;
-#X text 81 170 keep the difference between both pictures;
-#X msg 290 51 open b001.jpg \, cast int16 \, bang;
-#X obj 290 31 t b b;
-#X obj 330 31 loadbang;
-#X obj 33 253 shunt 2;
-#X obj 50 -5 metro 33.3667;
-#X obj 50 15 float;
-#X obj 62 44 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+#X obj 13 46 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 264 130 #in;
+#X obj 13 191 #finished;
+#X text 85 311 click to clip out-of-range colours;
+#X text 60 229 multiply by a N/256 fraction;
+#X obj 211 111 #in;
+#X obj 13 353 #out window;
+#X obj 13 153 #cast int16;
+#X text 61 213 keep the difference between both pictures;
+#X obj 249 91 t b b;
+#X obj 249 72 loadbang;
+#X obj 13 310 shunt 2;
+#X obj 13 63 metro 33.3667;
+#X obj 13 82 float;
+#X obj 25 101 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
 -262144 -1 -1 0 256;
-#X obj 94 14 + 4;
-#X obj 50 65 pingpong 256;
-#X obj 61 87 hsl 129 15 0 256 0 0 empty empty empty -2 -6 0 8 -260818
+#X obj 52 82 + 4;
+#X obj 13 117 pingpong 256;
+#X obj 21 136 hsl 129 15 0 256 0 0 empty empty empty -2 -6 0 8 -260818
 -1 -1 0 1;
-#X obj 33 128 t a a;
-#X text 153 362 also #draw_image/#join is a possibility;
-#X obj 0 -77 cnv 15 680 30 empty empty empty 20 12 0 14 -233017 -66577
+#X obj 13 172 t a a;
+#X text 11 406 also #draw_image/#join is a possibility;
+#X obj 0 1 cnv 15 680 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 14 -64 Copyright 2002 Mathieu Bouchard;
-#X text 14 -80 cross_fade.pd;
-#X obj 0 391 cnv 15 680 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 14 14 Copyright 2002 Mathieu Bouchard;
+#X text 14 -2 cross_fade.pd;
+#X obj 0 469 cnv 15 680 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text 8 399 GridFlow 0.8.0;
+#X text 8 477 GridFlow 0.8.0;
+#X obj 57 329 #clip;
+#X msg 237 111 load b001.jpg;
+#X msg 289 130 load r001.jpg;
+#X obj 264 149 #cast s;
+#X obj 211 130 #cast s;
 #X connect 0 0 2 0;
-#X connect 2 0 22 0;
+#X connect 2 0 18 0;
 #X connect 3 0 0 0;
 #X connect 4 0 3 1;
-#X connect 5 0 22 1;
-#X connect 7 0 23 0;
-#X connect 8 0 9 0;
-#X connect 9 0 4 1;
-#X connect 10 0 3 0;
-#X connect 13 0 16 0;
-#X connect 14 0 4 0;
-#X connect 14 0 2 1;
-#X connect 15 0 13 0;
-#X connect 17 0 29 0;
-#X connect 19 0 14 0;
-#X connect 20 0 19 0;
-#X connect 20 1 8 0;
-#X connect 21 0 20 0;
-#X connect 22 0 16 0;
-#X connect 22 1 15 0;
+#X connect 5 0 18 1;
+#X connect 7 0 19 0;
+#X connect 8 0 35 0;
+#X connect 9 0 3 0;
+#X connect 12 0 36 0;
+#X connect 14 0 25 0;
+#X connect 16 0 33 0;
+#X connect 16 1 34 0;
+#X connect 17 0 16 0;
+#X connect 18 0 13 0;
+#X connect 18 1 32 0;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 20 0 22 0;
+#X connect 20 0 23 0;
+#X connect 22 0 20 1;
 #X connect 23 0 24 0;
-#X connect 24 0 25 0;
-#X connect 24 0 26 0;
-#X connect 24 0 27 0;
-#X connect 26 0 24 1;
-#X connect 27 0 28 0;
-#X connect 27 0 17 0;
-#X connect 29 0 10 0;
-#X connect 29 1 0 1;
+#X connect 23 0 14 0;
+#X connect 25 0 9 0;
+#X connect 25 1 0 1;
+#X connect 32 0 13 0;
+#X connect 33 0 12 0;
+#X connect 34 0 8 0;
+#X connect 35 0 4 1;
+#X connect 36 0 4 0;
+#X connect 36 0 2 1;
diff --git a/externals/gridflow/pd_examples/drag_rectangle.pd b/externals/gridflow/pd_examples/drag_rectangle.pd
index 3453c9a8..ab0d8ea8 100644
--- a/externals/gridflow/pd_examples/drag_rectangle.pd
+++ b/externals/gridflow/pd_examples/drag_rectangle.pd
@@ -1,15 +1,15 @@
 #N canvas 702 123 647 484 10;
-#X obj 231 -7 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+#X obj 231 -7 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
 ;
 #X obj 231 117 #out window;
 #X obj 21 144 hsl 128 15 0 319 0 0 h_end_o h_end_i empty -2 -8 1 10
--262144 -1 -1 12700 1;
+-262144 -1 -1 0 1;
 #X obj 21 -4 hsl 128 15 0 319 0 0 h_start_o h_start_i empty 0 8 1 10
 -262144 -66577 -258699 0 0;
 #X obj 3 13 vsl 15 128 239 0 0 0 v_start_o v_start_i empty 0 -8 1 10
--262144 -1 -1 12647 1;
+-262144 -1 -1 0 1;
 #X obj 151 13 vsl 15 128 239 0 0 0 v_end_o v_end_i empty 0 -8 1 10
--262144 -1 -1 425 1;
+-262144 -1 -1 0 1;
 #N canvas 504 374 452 302 make_rectangle 0;
 #X obj 27 16 inlet;
 #X text 25 -3 image;
@@ -45,21 +45,20 @@
 #X obj 393 25 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
 #X obj 315 117 #mouse \, ...;
-#X obj 260 266 listelement 0;
+#X obj 260 268 listelement 0;
 #X obj 367 190 listelement 1;
 #X obj 260 225 listelement 0;
 #X obj 368 149 listelement 1;
-#X obj 368 170 s h_start_i;
-#X obj 367 211 s h_end_i;
+#X obj 368 168 s h_start_i;
+#X obj 367 209 s h_end_i;
 #X obj 260 287 s v_end_i;
-#X obj 260 246 s v_start_i;
+#X obj 260 244 s v_start_i;
 #X obj 378 65 loadbang;
-#X msg 378 85 0 0;
+#X msg 378 84 0 0;
 #X obj 328 161 t a;
-#X obj 64 330 #out window;
-#X obj 47 267 #for ( 0 0 ) ( 0 0 ) ( 1 1 );
-#X obj 112 221 t b a;
-#X obj 64 294 #store;
+#X obj 47 322 #out window;
+#X obj 86 221 t b a;
+#X obj 47 286 #store;
 #X msg 48 243 set ( \$1 \$2 );
 #X obj 327 43 #in b001.jpg;
 #X text 30 35 drag the mouse;
@@ -67,7 +66,7 @@
 #X text 39 51 inside the;
 #X text 37 66 first window;
 #X text 218 -25 step 1: turn on;
-#X text 69 312 cropping (to 2nd window);
+#X text 52 304 cropping (to 2nd window);
 #X obj -41 373 cnv 15 640 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
 #X text -33 380 GridFlow 0.8.0;
@@ -76,21 +75,22 @@
 0;
 #X text -27 -64 Copyright 2002 Mathieu Bouchard;
 #X text -27 -77 drag_rectangle.pd;
+#X obj 47 267 #for (0 0) (0 0) (1 1);
 #X connect 0 0 7 0;
 #X connect 1 0 13 0;
 #X connect 6 0 1 0;
 #X connect 7 0 11 0;
-#X connect 10 0 30 0;
+#X connect 10 0 29 0;
 #X connect 11 0 6 0;
-#X connect 12 0 30 0;
+#X connect 12 0 29 0;
 #X connect 13 0 6 1;
 #X connect 13 0 16 0;
 #X connect 13 0 17 0;
-#X connect 13 0 29 0;
+#X connect 13 0 28 0;
 #X connect 13 0 24 0;
 #X connect 13 1 24 0;
 #X connect 13 2 24 0;
-#X connect 13 2 27 0;
+#X connect 13 2 26 0;
 #X connect 14 0 20 0;
 #X connect 15 0 19 0;
 #X connect 16 0 21 0;
@@ -101,10 +101,10 @@
 #X connect 24 0 14 0;
 #X connect 24 0 15 0;
 #X connect 24 0 6 2;
-#X connect 26 0 28 0;
-#X connect 27 0 26 0;
-#X connect 27 1 26 1;
-#X connect 28 0 25 0;
-#X connect 29 0 26 0;
-#X connect 30 0 11 1;
-#X connect 30 0 28 1;
+#X connect 26 0 42 0;
+#X connect 26 1 42 1;
+#X connect 27 0 25 0;
+#X connect 28 0 42 0;
+#X connect 29 0 11 1;
+#X connect 29 0 27 1;
+#X connect 42 0 27 0;
diff --git a/externals/gridflow/pd_examples/eclipse.pd b/externals/gridflow/pd_examples/eclipse.pd
index 65ef9ef3..0c94440b 100644
--- a/externals/gridflow/pd_examples/eclipse.pd
+++ b/externals/gridflow/pd_examples/eclipse.pd
@@ -1,37 +1,36 @@
 #N canvas 623 182 635 533 10;
-#X floatatom 292 323 5 0 0 0 - - -;
-#X msg 244 303 24;
+#X floatatom 242 293 5 0 0 0 - - -;
+#X msg 194 273 24;
 #X obj 61 -35 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
 ;
-#X obj 244 281 loadbang;
-#X msg 292 303 32;
-#X floatatom 244 323 5 0 0 0 - - -;
+#X obj 194 251 loadbang;
+#X msg 242 273 32;
+#X floatatom 194 293 5 0 0 0 - - -;
 #X obj 38 17 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
 #X obj 61 -6 metro 33.3667;
-#X text 239 258 size of subimages;
-#X obj 61 111 t a a a;
-#X obj 61 166 t a a;
-#X text 224 54 gain on colour blue;
+#X text 189 228 size of subimages;
+#X obj 61 144 t a a;
+#X text 204 44 gain on colour blue;
 #X obj 61 17 #camera;
-#X obj 61 73 #scale_by 2;
-#X obj 141 97 #dim;
-#X obj 141 117 #inner (3 2 # 1 0 0 1 0 0);
-#X obj 61 147 #finished;
-#X obj 61 211 # /;
-#X obj 61 234 # *;
-#X obj 58 265 #store;
-#X obj 70 311 # *;
-#X obj 70 334 # >> 7;
-#X obj 70 356 # min 255;
-#X obj 70 378 #out window;
-#X obj 244 343 #pack 2;
-#X obj 141 242 # /;
-#X obj 107 265 #store;
-#X obj 107 242 # *;
-#X obj 61 186 #for (0 0) (240 320) (1 1);
-#X obj 107 208 #for (0 0) (240 320) (1 1);
-#X obj 61 54 # *>>8 (256 256 384);
+#X obj 61 63 #scale_by 2;
+#X obj 141 119 #dim;
+#X obj 141 139 #inner (3 2 # 1 0 0 1 0 0);
+#X obj 61 125 #finished;
+#X obj 61 183 # /;
+#X obj 61 202 # *;
+#X obj 61 229 #store;
+#X obj 61 256 # *;
+#X obj 61 275 # >> 7;
+#X obj 61 294 # min 255;
+#X obj 61 313 #out window;
+#X obj 194 313 #pack 2;
+#X obj 141 206 # /;
+#X obj 107 229 #store;
+#X obj 107 206 # *;
+#X obj 61 164 #for (0 0) (240 320) (1 1);
+#X obj 107 186 #for (0 0) (240 320) (1 1);
+#X obj 61 44 # *>>8 (256 256 384);
 #X obj 1 418 cnv 15 640 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
 #X text 9 425 GridFlow 0.8.0;
@@ -41,40 +40,41 @@
 #X text 16 -72 Copyright 2002 Mathieu Bouchard;
 #X text 121 17 <-- open this;
 #X text 16 -85 eclipse.pd;
-#X connect 0 0 24 1;
+#X obj 61 102 t a a;
+#X connect 0 0 23 1;
 #X connect 1 0 5 0;
 #X connect 2 0 7 0;
 #X connect 3 0 4 0;
 #X connect 3 0 1 0;
 #X connect 4 0 0 0;
-#X connect 5 0 24 0;
-#X connect 6 0 12 0;
-#X connect 7 0 12 0;
-#X connect 9 0 16 0;
-#X connect 9 1 14 0;
-#X connect 9 1 19 1;
-#X connect 9 1 26 1;
-#X connect 10 0 28 0;
-#X connect 10 1 29 0;
-#X connect 12 0 30 0;
-#X connect 13 0 9 0;
-#X connect 14 0 15 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 1;
-#X connect 15 0 29 1;
-#X connect 16 0 10 0;
+#X connect 5 0 23 0;
+#X connect 6 0 11 0;
+#X connect 7 0 11 0;
+#X connect 9 0 27 0;
+#X connect 9 1 28 0;
+#X connect 11 0 29 0;
+#X connect 12 0 37 0;
+#X connect 13 0 14 0;
+#X connect 14 0 24 0;
+#X connect 14 0 27 1;
+#X connect 14 0 28 1;
+#X connect 15 0 9 0;
+#X connect 16 0 17 0;
 #X connect 17 0 18 0;
 #X connect 18 0 19 0;
 #X connect 19 0 20 0;
 #X connect 20 0 21 0;
 #X connect 21 0 22 0;
-#X connect 22 0 23 0;
-#X connect 24 0 17 1;
-#X connect 24 0 18 1;
-#X connect 24 0 25 1;
-#X connect 25 0 27 1;
-#X connect 26 0 20 1;
-#X connect 27 0 26 0;
-#X connect 28 0 17 0;
-#X connect 29 0 27 0;
-#X connect 30 0 13 0;
+#X connect 23 0 16 1;
+#X connect 23 0 17 1;
+#X connect 23 0 24 1;
+#X connect 24 0 26 1;
+#X connect 25 0 19 1;
+#X connect 26 0 25 0;
+#X connect 27 0 16 0;
+#X connect 28 0 26 0;
+#X connect 29 0 12 0;
+#X connect 37 0 15 0;
+#X connect 37 1 13 0;
+#X connect 37 1 18 1;
+#X connect 37 1 25 1;
diff --git a/externals/gridflow/pd_examples/epicycloid.pd b/externals/gridflow/pd_examples/epicycloid.pd
index c1589de9..000bc8c0 100644
--- a/externals/gridflow/pd_examples/epicycloid.pd
+++ b/externals/gridflow/pd_examples/epicycloid.pd
@@ -1,125 +1,125 @@
-#N canvas 443 76 1178 736 10;
-#X text 18 93 epicycloid;
-#X text 18 116 x(t) = (R+r) cos(t) - p*cos((R+r)t/r);
-#X text 18 140 y(t) = (R+r) sin(t) - p*sin((R+r)t/r);
-#X obj 38 383 #draw_polygon put 1;
-#X obj 287 438 #import ( 4 2 );
-#X obj 38 406 #out window;
-#X obj -22 -22 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+#N canvas 301 73 904 550 10;
+#X text 158 43 epicycloid;
+#X text 168 56 x(t) = (R+r) cos(t) - p*cos((R+r)t/r);
+#X text 168 69 y(t) = (R+r) sin(t) - p*sin((R+r)t/r);
+#X obj 24 273 #draw_polygon put 1;
+#X obj 24 292 #out window;
+#X obj -22 68 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
 ;
-#X obj 327 375 pack f f f f;
-#X msg 327 404 \$2 \$1 \$4 \$1 \$4 \$3 \$2 \$3;
-#X text 334 350 x;
-#X text 394 352 y;
-#X text 421 354 y+1;
-#X text 357 352 x+1;
-#X floatatom 327 327 5 0 0 0 - - -;
-#X obj 369 325 + 1;
-#X floatatom 405 327 5 0 0 0 - - -;
-#X obj 447 324 + 1;
-#X obj 332 297 t f f;
-#X obj 417 297 t f f;
-#X obj 0 50 s met;
-#X obj 286 350 r met;
-#X obj 468 97 hsl 128 15 5 100 0 1 empty empty empty -2 -6 0 8 -24198
+#X obj 297 428 pack f f f f;
+#X msg 297 447 \$2 \$1 \$4 \$1 \$4 \$3 \$2 \$3;
+#X text 304 403 x;
+#X text 364 405 y;
+#X text 391 407 y+1;
+#X text 327 405 x+1;
+#X floatatom 303 381 5 0 0 0 - - -;
+#X obj 345 379 + 1;
+#X floatatom 390 382 5 0 0 0 - - -;
+#X obj 432 379 + 1;
+#X obj 303 358 t f f;
+#X obj 390 361 t f f;
+#X obj -16 108 s met;
+#X obj 258 428 r met;
+#X obj 388 197 hsl 128 15 5 100 0 1 empty empty empty -2 -6 0 8 -24198
 -1 -1 5500 1;
-#X obj 585 148 hsl 128 15 -100 100 0 1 empty empty empty -2 -6 0 8
+#X obj 515 238 hsl 128 15 -100 100 0 1 empty empty empty -2 -6 0 8
 -44926 -1 -1 4000 1;
-#X obj 732 173 hsl 128 15 -150 150 0 1 empty empty empty -2 -6 0 8
+#X obj 665 263 hsl 128 15 -150 150 0 1 empty empty empty -2 -6 0 8
 -258699 -1 -1 3200 1;
-#X text 439 52 t = valeur en angles de 0 a 360;
-#X obj 465 153 t f f;
-#X obj 582 180 t f f;
-#X obj 729 193 t f f;
-#X obj 333 127 * 6.28319;
-#X obj 333 106 / 360;
-#X floatatom 333 88 5 0 0 0 - - -;
-#X obj 333 152 t f f;
-#X obj -22 355 #store;
-#X obj 15 205 loadbang;
-#X obj 420 250 expr ($f2+$f3)*sin($f1) - $f4*sin(($f2+$f3)*$f1/$f3)
+#X text 313 155 t = valeur en angles de 0 a 360;
+#X obj 385 241 t f f;
+#X obj 512 270 t f f;
+#X obj 662 283 t f f;
+#X obj 303 217 * 6.28319;
+#X obj 303 196 / 360;
+#X floatatom 303 178 5 0 0 0 - - -;
+#X obj 303 236 t f f;
+#X obj -22 273 #store;
+#X obj -14 129 loadbang;
+#X obj 390 323 expr ($f2+$f3)*sin($f1) - $f4*sin(($f2+$f3)*$f1/$f3)
 ;
-#X obj 333 212 expr ($f2+$f3)*cos($f1) - $f4*cos(($f2+$f3)*$f1/$f3)
+#X obj 303 302 expr ($f2+$f3)*cos($f1) - $f4*cos(($f2+$f3)*$f1/$f3)
 ;
-#X obj 333 65 + 1;
-#X msg 333 41 1;
-#X floatatom 375 65 5 0 0 0 - - -;
-#X msg 375 16 0;
-#X text 406 19 reset count;
-#X text 129 231 reset image;
-#X text 540 126 r = Rayon du deuxieme cercle -100 a 100;
-#X obj 420 275 + 150;
-#X obj 333 272 + 150;
-#X floatatom 477 123 5 0 0 0 - - -;
-#X floatatom 633 173 5 0 0 0 - - -;
-#X floatatom 779 196 5 0 0 0 - - -;
-#X obj -22 7 metro 1;
-#X obj 33 -21 hsl 128 15 0 15 0 0 empty empty empty -2 -6 0 8 -260818
+#X obj 303 135 + 1;
+#X msg 303 111 1;
+#X floatatom 335 138 5 0 0 0 - - -;
+#X msg 335 119 0;
+#X text 366 122 reset count;
+#X text 100 147 reset image;
+#X text 470 216 r = Rayon du deuxieme cercle -100 a 100;
+#X obj 390 342 + 150;
+#X obj 303 339 + 150;
+#X floatatom 397 223 5 0 0 0 - - -;
+#X floatatom 563 263 5 0 0 0 - - -;
+#X floatatom 712 286 5 0 0 0 - - -;
+#X obj -22 85 metro 1;
+#X obj 25 68 hsl 128 15 0 15 0 0 empty empty empty -2 -6 0 8 -260818
 -1 -1 0 1;
-#X text 440 78 R = Rayon du premier cercle 5 a 100;
-#X obj -38 525 cnv 15 900 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 360 178 R = Rayon du premier cercle 5 a 100;
+#X obj -38 515 cnv 15 900 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -29 532 GridFlow 0.8.0;
-#X text -29 532 GridFlow 0.8.0;
-#X obj -35 -85 cnv 15 940 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text -29 522 GridFlow 0.8.0;
+#X text -29 522 GridFlow 0.8.0;
+#X obj -35 5 cnv 15 800 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X obj 102 317 #color;
-#X obj 102 268 loadbang;
-#X msg 102 292 230 224 0;
-#X msg 15 232 300 300 3 # 0;
-#X text -22 -72 Copyright 2004 Alexandre Castonguay;
-#X text -22 -85 epicycloid.pd;
-#X text 80 204 start with a blank \, black image;
-#X text 727 158 deuxieme cercle - 150 a 150;
-#X text 727 143 p = distance du centre du;
-#X connect 3 0 5 0;
-#X connect 3 0 32 1;
-#X connect 4 0 3 2;
-#X connect 6 0 48 0;
-#X connect 7 0 8 0;
-#X connect 8 0 4 0;
-#X connect 13 0 7 0;
-#X connect 14 0 7 2;
-#X connect 15 0 7 1;
-#X connect 16 0 7 3;
-#X connect 17 0 13 0;
-#X connect 17 1 14 0;
-#X connect 18 0 15 0;
-#X connect 18 1 16 0;
-#X connect 20 0 7 0;
+#X obj 88 213 #color;
+#X obj 88 175 loadbang;
+#X msg 88 194 230 224 0;
+#X msg -14 148 300 300 3 # 0;
+#X text -22 18 Copyright 2004 Alexandre Castonguay;
+#X text -22 5 epicycloid.pd;
+#X text 51 128 start with a blank \, black image;
+#X text 660 248 deuxieme cercle - 150 a 150;
+#X text 660 233 p = distance du centre du;
+#X obj 297 466 #import (4 2);
+#X connect 3 0 4 0;
+#X connect 3 0 31 1;
+#X connect 5 0 47 0;
+#X connect 6 0 7 0;
+#X connect 7 0 63 0;
+#X connect 12 0 6 0;
+#X connect 13 0 6 2;
+#X connect 14 0 6 1;
+#X connect 15 0 6 3;
+#X connect 16 0 12 0;
+#X connect 16 1 13 0;
+#X connect 17 0 14 0;
+#X connect 17 1 15 0;
+#X connect 19 0 6 0;
+#X connect 20 0 24 0;
+#X connect 20 0 44 0;
 #X connect 21 0 25 0;
 #X connect 21 0 45 0;
 #X connect 22 0 26 0;
 #X connect 22 0 46 0;
-#X connect 23 0 27 0;
-#X connect 23 0 47 0;
-#X connect 25 0 35 1;
-#X connect 25 1 34 1;
-#X connect 26 0 35 2;
-#X connect 26 1 34 2;
-#X connect 27 0 35 3;
-#X connect 27 1 34 3;
-#X connect 28 0 31 0;
+#X connect 24 0 34 1;
+#X connect 24 1 33 1;
+#X connect 25 0 34 2;
+#X connect 25 1 33 2;
+#X connect 26 0 34 3;
+#X connect 26 1 33 3;
+#X connect 27 0 30 0;
+#X connect 28 0 27 0;
 #X connect 29 0 28 0;
-#X connect 30 0 29 0;
-#X connect 31 0 35 0;
-#X connect 31 1 34 0;
-#X connect 32 0 3 0;
-#X connect 33 0 58 0;
+#X connect 30 0 34 0;
+#X connect 30 1 33 0;
+#X connect 31 0 3 0;
+#X connect 32 0 57 0;
+#X connect 33 0 42 0;
 #X connect 34 0 43 0;
-#X connect 35 0 44 0;
-#X connect 36 0 38 0;
-#X connect 36 0 30 0;
-#X connect 37 0 36 0;
-#X connect 38 0 36 1;
-#X connect 39 0 38 0;
-#X connect 43 0 18 0;
-#X connect 44 0 17 0;
-#X connect 48 0 19 0;
-#X connect 48 0 32 0;
-#X connect 48 0 37 0;
-#X connect 49 0 48 1;
-#X connect 55 0 3 1;
-#X connect 56 0 57 0;
-#X connect 57 0 55 0;
-#X connect 58 0 32 1;
+#X connect 35 0 37 0;
+#X connect 35 0 29 0;
+#X connect 36 0 35 0;
+#X connect 37 0 35 1;
+#X connect 38 0 37 0;
+#X connect 42 0 17 0;
+#X connect 43 0 16 0;
+#X connect 47 0 18 0;
+#X connect 47 0 31 0;
+#X connect 47 0 36 0;
+#X connect 48 0 47 1;
+#X connect 54 0 3 1;
+#X connect 55 0 56 0;
+#X connect 56 0 54 0;
+#X connect 57 0 31 1;
+#X connect 63 0 3 2;
diff --git a/externals/gridflow/pd_examples/feedback_fractal.pd b/externals/gridflow/pd_examples/feedback_fractal.pd
index 2d012a78..abb70e80 100644
--- a/externals/gridflow/pd_examples/feedback_fractal.pd
+++ b/externals/gridflow/pd_examples/feedback_fractal.pd
@@ -20,128 +20,128 @@
 #X connect 6 0 8 0;
 #X connect 8 0 0 0;
 #X connect 9 0 2 0;
-#X restore 462 229 pd experimental features;
-#X text 527 134 Choose Julia Mapping or Rotation;
-#X obj 31 -34 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
-;
-#X obj 414 67 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X restore 545 260 pd experimental features;
+#X text 515 193 Choose Julia Mapping or Rotation;
+#X obj 31 53 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X obj 414 145 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X text 190 59 apply transform (with feedback);
-#X floatatom 454 281 5 0 0 0 - - -;
-#X floatatom 451 323 5 0 0 0 - - -;
-#X msg 84 319 cast uint8 \, bang;
-#X text 530 281 zoom;
-#X text 531 324 move x;
-#X msg 501 324 -45;
-#X msg 501 281 128;
-#X obj 170 60 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X text 135 196 apply transform (with feedback);
+#X floatatom 430 363 5 0 0 0 - - -;
+#X floatatom 518 387 5 0 0 0 - - -;
+#X text 434 375 zoom;
+#X text 518 397 move x;
+#X msg 518 368 -45;
+#X msg 430 344 128;
+#X obj 119 197 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X obj 450 92 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X obj 444 119 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X obj 505 133 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+#X obj 497 193 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
-#X floatatom 451 303 5 0 0 0 - - -;
-#X text 531 303 move y;
-#X msg 501 303 193;
-#X obj 31 -7 metro 33.3667;
-#X obj 450 131 shunt 2;
-#X obj 84 297 loadbang;
-#X obj 414 45 t b b;
-#X obj 414 21 loadbang;
-#X obj 31 276 t a;
-#X obj 202 99 loadbang;
-#X obj 212 119 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X floatatom 472 387 5 0 0 0 - - -;
+#X text 471 398 move y;
+#X msg 472 368 193;
+#X obj 31 80 metro 33.3667;
+#X obj 442 191 shunt 2;
+#X obj 77 365 loadbang;
+#X obj 414 91 t b b;
+#X obj 414 67 loadbang;
+#X obj 31 338 t a;
+#X obj 131 220 loadbang;
+#X obj 131 239 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X obj 200 266 t a;
-#X obj 31 21 t b b;
-#X obj 73 22 float;
-#X obj 73 41 + 1;
-#X obj 84 61 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
--262144 -1 -1 24 256;
-#X obj 508 257 t b;
-#X text 230 120 reset transform;
-#X obj 99 41 mod 60;
-#X obj 73 81 sel 59;
-#X obj 31 113 #store;
-#X obj 31 189 # << 7;
-#X obj 31 223 #fade 10;
-#X obj 31 252 # >> 7;
-#X obj 31 335 #store;
-#X obj 84 340 #in teapot.png;
-#X obj 31 364 #out window;
-#X obj 414 391 # -;
-#X obj 438 367 # - 128;
-#X obj 438 345 #two;
-#X obj 414 303 # /;
-#X obj 414 229 #store;
-#X obj 450 110 #for ( -128 -128 ) ( 128 128 ) ( 1 1 );
-#X obj 446 154 @complex_sq;
-#X obj 461 175 #inner (2 2 # 120 30 -30 120);
-#X obj -13 -87 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+#X obj 119 317 t a;
+#X obj 31 108 t b b;
+#X obj 73 109 float;
+#X obj 73 128 + 1;
+#X obj 84 148 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 57 256;
+#X obj 486 323 t b;
+#X text 149 240 reset transform;
+#X obj 99 128 mod 60;
+#X obj 73 168 sel 59;
+#X obj 31 200 #store;
+#X obj 31 276 # << 7;
+#X obj 31 295 #fade 10;
+#X obj 31 314 # >> 7;
+#X obj 31 422 #store;
+#X obj 31 451 #out window;
+#X obj 414 478 # -;
+#X obj 438 454 # - 128;
+#X obj 414 390 # /;
+#X obj 414 296 #store;
+#X obj 442 172 #for ( -128 -128 ) ( 128 128 ) ( 1 1 );
+#X obj 442 210 @complex_sq;
+#X obj 485 229 #inner (2 2 # 120 30 -30 120);
+#X obj -13 0 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X obj -15 431 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj -15 518 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 438 GridFlow 0.8.0;
-#X text -7 438 GridFlow 0.8.0;
-#X text 0 -87 feedback_fractal.pd;
-#X text 0 -74 Copyright 2001 Mathieu Bouchard;
-#X obj 212 138 #for (0 0) (256 256) (1 1);
-#X obj 210 210 #convolve (2 2 # 1);
-#X obj 209 232 # >> 2;
-#X obj 200 181 #store;
-#X obj 200 159 #store;
-#X connect 0 0 46 1;
-#X connect 2 0 18 0;
-#X connect 3 0 46 0;
-#X connect 5 0 45 1;
-#X connect 7 0 40 0;
-#X connect 10 0 6 0;
-#X connect 11 0 17 0;
-#X connect 11 0 5 0;
-#X connect 12 0 60 0;
-#X connect 13 0 47 0;
-#X connect 14 0 19 1;
-#X connect 17 0 15 0;
-#X connect 18 0 27 0;
-#X connect 19 0 48 0;
-#X connect 19 1 49 0;
-#X connect 20 0 7 0;
-#X connect 21 0 3 0;
-#X connect 21 1 13 0;
-#X connect 21 1 31 0;
-#X connect 22 0 21 0;
-#X connect 23 0 39 0;
-#X connect 24 0 56 0;
-#X connect 25 0 56 0;
-#X connect 26 0 35 1;
-#X connect 26 0 59 1;
-#X connect 27 0 35 0;
-#X connect 27 1 28 0;
+#X text -7 525 GridFlow 0.8.0;
+#X text -7 525 GridFlow 0.8.0;
+#X text 0 0 feedback_fractal.pd;
+#X text 0 13 Copyright 2001 Mathieu Bouchard;
+#X obj 131 258 #for (0 0) (256 256) (1 1);
+#X obj 119 298 #store;
+#X obj 119 279 #store;
+#X obj 77 422 #cast b;
+#X obj 77 403 #in;
+#X msg 77 384 load teapot.png;
+#X obj 438 432 #pack;
+#X text 431 145 apply coords;
+#X text 462 118 apply type of transform;
+#X connect 0 0 43 1;
+#X connect 2 0 17 0;
+#X connect 3 0 43 0;
+#X connect 5 0 42 1;
+#X connect 6 0 59 1;
+#X connect 9 0 6 0;
+#X connect 10 0 5 0;
+#X connect 11 0 55 0;
+#X connect 12 0 44 0;
+#X connect 13 0 18 1;
+#X connect 14 0 59 0;
+#X connect 16 0 14 0;
+#X connect 17 0 26 0;
+#X connect 18 0 45 0;
+#X connect 18 1 46 0;
+#X connect 19 0 58 0;
+#X connect 20 0 3 0;
+#X connect 20 1 12 0;
+#X connect 20 1 30 0;
+#X connect 21 0 20 0;
+#X connect 22 0 38 0;
+#X connect 23 0 24 0;
+#X connect 24 0 53 0;
+#X connect 25 0 34 1;
+#X connect 25 0 54 1;
+#X connect 26 0 34 0;
+#X connect 26 1 27 0;
+#X connect 27 0 28 0;
 #X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 29 0 33 0;
-#X connect 29 0 34 0;
-#X connect 31 0 11 0;
-#X connect 31 0 17 0;
-#X connect 31 0 10 0;
-#X connect 33 0 28 1;
-#X connect 34 0 12 0;
+#X connect 28 0 32 0;
+#X connect 28 0 33 0;
+#X connect 30 0 10 0;
+#X connect 30 0 16 0;
+#X connect 30 0 9 0;
+#X connect 32 0 27 1;
+#X connect 33 0 11 0;
+#X connect 34 0 35 0;
 #X connect 35 0 36 0;
 #X connect 36 0 37 0;
-#X connect 37 0 38 0;
-#X connect 38 0 23 0;
-#X connect 39 0 41 0;
-#X connect 40 0 39 1;
-#X connect 42 0 60 1;
-#X connect 43 0 42 1;
-#X connect 45 0 42 0;
-#X connect 46 0 45 0;
-#X connect 47 0 19 0;
-#X connect 48 0 46 1;
-#X connect 49 0 46 1;
-#X connect 56 0 35 1;
-#X connect 56 0 59 1;
-#X connect 57 0 58 0;
-#X connect 58 0 26 0;
-#X connect 59 0 26 0;
-#X connect 60 0 59 0;
+#X connect 37 0 22 0;
+#X connect 38 0 39 0;
+#X connect 40 0 55 1;
+#X connect 41 0 40 1;
+#X connect 42 0 40 0;
+#X connect 43 0 42 0;
+#X connect 44 0 18 0;
+#X connect 45 0 43 1;
+#X connect 46 0 43 1;
+#X connect 53 0 34 1;
+#X connect 53 0 54 1;
+#X connect 54 0 25 0;
+#X connect 55 0 54 0;
+#X connect 56 0 38 1;
+#X connect 57 0 56 0;
+#X connect 58 0 57 0;
diff --git a/externals/gridflow/pd_examples/fire.pd b/externals/gridflow/pd_examples/fire.pd
index 2a88a3a0..2e9f8606 100644
--- a/externals/gridflow/pd_examples/fire.pd
+++ b/externals/gridflow/pd_examples/fire.pd
@@ -1,51 +1,45 @@
-#N canvas 399 42 621 522 10;
-#X obj 347 171 loadbang;
-#X text 229 287 palette generator;
-#X obj 103 329 fps detailed;
-#X obj 250 325 #for 0 256 1;
-#X obj 23 180 #store;
-#X obj 250 347 #outer gamma;
-#X obj 103 351 print;
-#X msg 60 130 \$1 \$2 # 0;
-#X obj 71 217 #outer ignore ( 0 );
-#X obj 250 304 #finished;
-#X obj 23 -25 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
-;
-#X obj 204 -21 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
--1;
-#X obj 40 71 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#N canvas 55 53 634 527 10;
+#X obj 377 355 loadbang;
+#X text 243 362 palette generator;
+#X obj 100 383 fps detailed;
+#X obj 264 400 #for 0 256 1;
+#X obj 19 240 #store;
+#X obj 264 422 #outer gamma;
+#X obj 100 402 print;
+#X msg 56 200 \$1 \$2 # 0;
+#X obj 264 379 #finished;
+#X obj 19 35 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X obj 200 39 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 318 304 fork;
-#X text 262 2 height width;
-#X obj 103 307 #out window;
-#X text 101 269 applying palette;
-#X obj 103 287 #store;
-#N canvas 268 454 450 300 circle 0;
-#X obj 47 177 #fold +;
-#X obj 47 244 # << 7;
-#X obj 47 199 # >> 6;
-#X obj 47 157 @! sq;
-#X obj 47 222 # == 10;
+#X obj 332 379 fork;
+#X text 258 62 height width;
+#X obj 100 364 #out window;
+#X text 97 308 applying palette;
+#X obj 99 326 #store;
+#N canvas 127 200 450 300 circle 0;
+#X obj 47 146 #fold +;
+#X obj 47 203 # << 7;
+#X obj 47 165 # >> 6;
+#X obj 47 184 # == 10;
 #X obj 47 15 inlet size;
-#X obj 47 267 outlet matrix;
-#X obj 47 126 #for ( 0 0 ) ( 0 0 ) ( 1 1 );
-#X obj 47 34 # / 2;
-#X obj 47 77 t a a;
-#X obj 47 54 #export_list;
-#X obj 47 101 # inv+;
+#X obj 47 222 outlet matrix;
+#X obj 77 108 inlet pos;
+#X obj 47 53 t b a;
+#X obj 47 127 # sq-;
+#X obj 47 79 #for (0 0) (0 0) (1 1);
+#X obj 90 53 #export_list;
 #X connect 0 0 2 0;
-#X connect 1 0 6 0;
-#X connect 2 0 4 0;
-#X connect 3 0 0 0;
-#X connect 4 0 1 0;
-#X connect 5 0 8 0;
-#X connect 7 0 3 0;
-#X connect 8 0 10 0;
-#X connect 9 0 11 0;
-#X connect 9 1 7 1;
-#X connect 10 0 9 0;
-#X connect 11 0 7 0;
-#X restore 247 84 pd circle generator;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 7 0;
+#X connect 6 0 8 1;
+#X connect 7 0 9 0;
+#X connect 7 1 10 0;
+#X connect 8 0 0 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 1;
+#X restore 222 200 pd circle generator;
 #N canvas 498 387 361 260 baseline 0;
 #X obj 18 123 #fold +;
 #X obj 127 149 - 4;
@@ -75,23 +69,17 @@
 #X connect 12 0 2 0;
 #X connect 12 1 9 0;
 #X connect 12 1 8 1;
-#X restore 204 117 pd baseline generator;
-#X text 78 236 (height \, width \, 1) grid = grey image;
-#X text 49 113 make blank image;
-#X text 30 163 feedback loop;
-#X text 78 200 (height \, width) grid = matrix;
-#X obj 204 63 shunt 2;
-#X obj 258 64 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
-;
-#X obj 347 213 #color 0 800 1;
-#X msg 347 191 600 200 75;
-#X obj 224 -22 loadbang;
-#N canvas 645 360 400 289 fire 1;
+#X restore 200 220 pd baseline generator;
+#X text 45 183 make blank image;
+#X text 26 223 feedback loop;
+#X obj 377 393 #color 0 800 1;
+#X msg 377 374 600 200 75;
+#X obj 220 38 loadbang;
+#N canvas 645 360 400 289 fire 0;
 #X obj 174 180 #store;
 #X obj 61 196 #export_list;
 #X obj 6 65 # >> 2;
 #X obj 6 26 fork;
-#X obj 6 45 #convolve ( 3 3 # 1 0 0 0 1 0 1 1 1 );
 #X obj 6 235 # & 255;
 #X obj 174 115 listmake;
 #X obj 6 103 # / 80;
@@ -114,67 +102,188 @@
 #X text 264 180 random numbers;
 #X obj 174 159 # rand;
 #X obj 274 123 # rand;
-#X connect 0 0 17 1;
-#X connect 1 0 6 1;
-#X connect 2 0 17 0;
-#X connect 3 0 4 0;
-#X connect 3 1 10 0;
-#X connect 4 0 2 0;
-#X connect 5 0 15 0;
-#X connect 6 0 8 0;
-#X connect 7 0 14 0;
-#X connect 8 0 24 0;
-#X connect 9 0 6 0;
-#X connect 10 0 9 0;
-#X connect 11 0 14 1;
-#X connect 11 0 13 0;
-#X connect 12 0 0 1;
-#X connect 13 0 1 0;
-#X connect 14 0 5 0;
-#X connect 16 0 25 0;
-#X connect 17 0 7 0;
-#X connect 18 0 3 0;
-#X connect 19 0 16 0;
-#X connect 24 0 0 0;
-#X connect 25 0 12 0;
-#X restore 71 180 pd fire generator;
-#X text 183 46 note: reset the size if you change the generator;
-#X msg 204 2 80 256;
-#X obj 23 -2 metro 33.3667;
-#X obj -15 -84 cnv 15 620 30 empty empty empty 20 12 0 14 -233017 -66577
+#X obj 6 46 #convolve (3 3 # 1 0 0 0 1 0 1 1 1);
+#X connect 0 0 16 1;
+#X connect 1 0 5 1;
+#X connect 2 0 16 0;
+#X connect 3 0 25 0;
+#X connect 3 1 9 0;
+#X connect 4 0 14 0;
+#X connect 5 0 7 0;
+#X connect 6 0 13 0;
+#X connect 7 0 23 0;
+#X connect 8 0 5 0;
+#X connect 9 0 8 0;
+#X connect 10 0 13 1;
+#X connect 10 0 12 0;
+#X connect 11 0 0 1;
+#X connect 12 0 1 0;
+#X connect 13 0 4 0;
+#X connect 15 0 24 0;
+#X connect 16 0 6 0;
+#X connect 17 0 3 0;
+#X connect 18 0 15 0;
+#X connect 23 0 0 0;
+#X connect 24 0 11 0;
+#X connect 25 0 2 0;
+#X restore 65 240 pd fire generator;
+#X text 166 108 note: reset the size if you change the generator;
+#X obj 19 58 metro 33.3667;
+#X obj 5 -4 cnv 15 620 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text -5 -84 fire.pd;
-#X text -5 -71 Copyright 2001 Mathieu Bouchard;
-#X obj -15 403 cnv 15 620 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 15 -4 fire.pd;
+#X obj 5 483 cnv 15 620 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 411 GridFlow 0.8.0;
-#X text -7 411 GridFlow 0.8.0;
-#X connect 0 0 27 0;
+#X text 13 491 GridFlow 0.8.0;
+#X obj 139 402 route position;
+#N canvas 268 301 442 406 cursor 0;
+#X obj 30 29 listmake;
+#X obj 107 48 listsublist 0 2;
+#X obj 107 10 inlet;
+#X obj 132 151 listsublist 0 48;
+#X obj 30 49 fork;
+#X obj 30 285 outlet;
+#X obj 30 131 @export_list;
+#X obj 30 151 listappend 0 0;
+#X obj 107 29 #export_list;
+#X obj 30 79 # -;
+#X obj 115 86 #finished;
+#X obj 115 105 #store (0 0);
+#X obj 30 170 #redim (25 2);
+#X obj 30 189 # sq-;
+#X obj 30 208 #fold +;
+#X obj 30 227 # sqrt;
+#X obj 30 246 #fold +;
+#X obj 30 266 # / 5;
+#X obj 30 9 r metro;
+#X connect 0 0 4 0;
+#X connect 1 0 0 1;
+#X connect 2 0 8 0;
+#X connect 3 0 7 1;
+#X connect 4 0 9 0;
+#X connect 4 1 11 1;
+#X connect 6 0 7 0;
+#X connect 7 0 3 0;
+#X connect 7 0 12 0;
+#X connect 8 0 1 0;
+#X connect 9 0 6 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 1;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 17 0 5 0;
+#X connect 18 0 0 0;
+#X restore 371 162 pd cursor motion detector;
+#X obj 139 460 s cursor;
+#X msg 20 341 hidecursor;
+#N canvas 238 140 484 503 fuzzy 0;
+#X obj 47 281 outlet;
+#X obj 229 74 listsublist 0 2;
+#X obj 47 110 @fold +;
+#X obj 47 68 #for (0 0) (0 0) (1 1);
+#X obj 47 13 inlet size;
+#X obj 47 32 t b a;
+#X obj 86 32 #export_list;
+#X obj 47 91 # sq-;
+#X obj 47 263 # - 10;
+#X obj 47 243 # max 10;
+#X obj 47 224 # min 255;
+#X obj 47 205 # + 64;
+#X obj 47 186 # tanh* 64;
+#X obj 47 167 # << 8;
+#X obj 47 148 # inv+ 2;
+#X obj 47 129 # >> 2;
+#X obj 104 125 inlet radius;
+#X obj 229 55 #export_list;
+#X obj 229 36 inlet pos;
+#X connect 1 0 7 1;
+#X connect 2 0 15 0;
+#X connect 3 0 7 0;
+#X connect 4 0 5 0;
+#X connect 5 0 3 0;
+#X connect 5 1 6 0;
+#X connect 6 0 3 1;
+#X connect 7 0 2 0;
+#X connect 8 0 0 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 0;
+#X connect 11 0 10 0;
+#X connect 12 0 11 0;
+#X connect 13 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 14 0;
+#X connect 16 0 14 1;
+#X connect 17 0 1 0;
+#X connect 18 0 17 0;
+#X restore 276 181 pd fuzzy disk seed generator;
+#X text 177 440 #scale_by compensation;
+#X msg 139 421 \$1 \$2;
+#X obj 99 345 #scale_by 2;
+#X obj 139 440 # / 2;
+#X text 15 294 (height \, width \, 1) grid = grey image;
+#X text 16 260 (height \, width) grid = matrix;
+#X obj 200 123 shunt 3;
+#X obj 253 125 hradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -1
+-1 1;
+#X obj 500 203 r cursor;
+#X obj 501 222 t a;
+#X obj 204 90 listmake;
+#X obj 58 86 spigot;
+#X obj 19 86 t b b;
+#X obj 104 87 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
+;
+#X msg 200 62 120 160;
+#X obj 49 109 s metro;
+#X obj 67 277 #outer ignore (0);
+#X text 15 9 Copyright 2001 \, 2005 Mathieu Bouchard;
+#X connect 0 0 21 0;
 #X connect 2 0 6 0;
 #X connect 3 0 5 0;
-#X connect 4 0 29 0;
-#X connect 5 0 17 1;
+#X connect 4 0 23 0;
+#X connect 5 0 15 1;
 #X connect 7 0 4 1;
-#X connect 8 0 17 0;
-#X connect 9 0 3 0;
-#X connect 10 0 32 0;
-#X connect 11 0 31 0;
-#X connect 12 0 4 0;
-#X connect 13 0 9 0;
-#X connect 13 1 5 1;
-#X connect 15 0 2 0;
-#X connect 17 0 15 0;
-#X connect 18 0 29 1;
-#X connect 19 0 29 1;
-#X connect 24 0 19 0;
-#X connect 24 1 18 0;
-#X connect 25 0 24 1;
-#X connect 26 0 13 0;
-#X connect 27 0 26 0;
-#X connect 28 0 31 0;
-#X connect 29 0 8 0;
-#X connect 29 0 4 1;
-#X connect 31 0 7 0;
-#X connect 31 0 29 2;
-#X connect 31 0 24 0;
-#X connect 32 0 4 0;
+#X connect 8 0 3 0;
+#X connect 9 0 25 0;
+#X connect 10 0 49 0;
+#X connect 11 0 8 0;
+#X connect 11 1 5 1;
+#X connect 13 0 2 0;
+#X connect 13 0 30 0;
+#X connect 15 0 37 0;
+#X connect 16 0 23 1;
+#X connect 17 0 23 1;
+#X connect 20 0 11 0;
+#X connect 21 0 20 0;
+#X connect 22 0 49 0;
+#X connect 23 0 4 1;
+#X connect 23 0 51 0;
+#X connect 25 0 47 0;
+#X connect 30 0 36 0;
+#X connect 31 0 34 1;
+#X connect 33 0 13 0;
+#X connect 34 0 23 1;
+#X connect 36 0 38 0;
+#X connect 37 0 13 0;
+#X connect 38 0 32 0;
+#X connect 41 0 17 0;
+#X connect 41 1 16 0;
+#X connect 41 2 34 0;
+#X connect 42 0 41 1;
+#X connect 43 0 44 0;
+#X connect 44 0 31 0;
+#X connect 44 0 16 1;
+#X connect 44 0 34 2;
+#X connect 45 0 41 0;
+#X connect 46 0 45 0;
+#X connect 47 0 4 0;
+#X connect 47 1 46 0;
+#X connect 47 1 50 0;
+#X connect 48 0 46 1;
+#X connect 49 0 7 0;
+#X connect 49 0 23 2;
+#X connect 49 0 45 0;
+#X connect 51 0 15 0;
diff --git a/externals/gridflow/pd_examples/game_of_life.pd b/externals/gridflow/pd_examples/game_of_life.pd
index c35187a9..d8820876 100644
--- a/externals/gridflow/pd_examples/game_of_life.pd
+++ b/externals/gridflow/pd_examples/game_of_life.pd
@@ -1,20 +1,18 @@
-#N canvas 400 83 719 454 10;
-#X text 41 -19 click here;
-#X obj 23 -17 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
-;
-#X obj 31 251 #out window;
-#X text 48 92 this is the feedback loop;
-#X obj 123 0 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#N canvas 400 83 791 374 10;
+#X obj 36 46 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 31 237 #out window;
+#X text 48 122 this is the feedback loop;
+#X obj 143 50 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 141 -1 for 0 10 1;
-#X obj 263 53 loadbang;
-#X obj 141 73 #store;
-#X obj 141 19 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X obj 161 49 for 0 10 1;
+#X obj 262 87 loadbang;
+#X obj 141 103 #store;
+#X obj 161 68 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 31 291 print;
-#X obj 31 271 fps detailed;
-#X obj 31 113 fork;
-#X text 159 19 next;
+#X obj 31 275 print;
+#X obj 31 256 fps detailed;
+#X obj 31 143 fork;
+#X text 179 68 next;
 #N canvas 0 0 450 210 game 0;
 #X obj 28 64 inlet matrix;
 #X obj 28 141 outlet matrix;
@@ -29,39 +27,39 @@ but faster to compute.);
 #X connect 3 0 4 0;
 #X connect 4 0 5 0;
 #X connect 5 0 1 0;
-#X restore 31 72 pd game of life;
-#X text 260 20 init with a random map;
-#X text 262 35 10% white dots;
-#X text 33 179 convert this 1-bit matrix to standard RGB \; 1 becomes
+#X restore 31 102 pd game of life;
+#X text 260 60 init with a random map;
+#X text 261 72 10% white dots;
+#X text 33 169 convert this 1-bit matrix to standard RGB \; 1 becomes
 -1 becomes 255 \, but 0 stays 0;
-#X obj 23 15 metro 5;
-#X obj -15 339 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj 53 45 metro 5;
+#X obj 5 329 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 346 GridFlow 0.8.0;
-#X text -7 346 GridFlow 0.8.0;
-#X obj -13 -85 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 13 336 GridFlow 0.8.0;
+#X text 13 336 GridFlow 0.8.0;
+#X obj 7 5 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 0 -85 game_of_life.pd;
-#X text 0 -72 Copyright 2001 Mathieu Bouchard;
-#X obj 263 97 # rand (b #);
-#X obj 263 119 # == (b # 0);
-#X msg 263 75 240 320 b # 10;
-#X obj 31 209 # inv+ (b # 0);
-#X obj 31 230 #outer ignore (3 b #);
-#X connect 1 0 17 0;
-#X connect 2 0 10 0;
-#X connect 4 0 5 0;
-#X connect 5 0 8 0;
-#X connect 6 0 26 0;
-#X connect 7 0 13 0;
-#X connect 8 0 7 0;
-#X connect 10 0 9 0;
-#X connect 11 0 27 0;
-#X connect 11 1 7 1;
-#X connect 13 0 11 0;
-#X connect 17 0 7 0;
-#X connect 24 0 25 0;
-#X connect 25 0 11 0;
-#X connect 26 0 24 0;
-#X connect 27 0 28 0;
-#X connect 28 0 2 0;
+#X text 20 5 game_of_life.pd;
+#X text 20 18 Copyright 2001 Mathieu Bouchard;
+#X obj 262 125 # rand (b #);
+#X obj 262 144 # == (b # 0);
+#X msg 262 106 240 320 b # 10;
+#X obj 31 199 # inv+ (b # 0);
+#X obj 31 218 #outer ignore (3 b #);
+#X connect 0 0 16 0;
+#X connect 1 0 9 0;
+#X connect 3 0 4 0;
+#X connect 4 0 7 0;
+#X connect 5 0 25 0;
+#X connect 6 0 12 0;
+#X connect 7 0 6 0;
+#X connect 9 0 8 0;
+#X connect 10 0 26 0;
+#X connect 10 1 6 1;
+#X connect 12 0 10 0;
+#X connect 16 0 6 0;
+#X connect 23 0 24 0;
+#X connect 24 0 10 0;
+#X connect 25 0 23 0;
+#X connect 26 0 27 0;
+#X connect 27 0 1 0;
diff --git a/externals/gridflow/pd_examples/hello-world.pd b/externals/gridflow/pd_examples/hello-world.pd
index fb101d24..e43e1a71 100644
--- a/externals/gridflow/pd_examples/hello-world.pd
+++ b/externals/gridflow/pd_examples/hello-world.pd
@@ -1,38 +1,50 @@
-#N canvas 604 118 501 445 10;
-#X obj 46 67 # / 320;
-#X obj 46 187 # * 255;
-#X obj 46 153 # != 0;
-#X obj 46 -12 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
--1;
-#X obj 46 280 #out window;
-#X obj 46 99 # inv+ 7;
-#X obj 46 15 #for 0 320 1;
-#X obj 46 48 # * 7;
-#X obj 46 -34 loadbang;
-#X text 66 -12 make one line:;
-#X text 54 31 numbers 0 to 319;
-#X text 55 84 numbers 0 to 6 repeated 45 or 46 times;
-#X text 56 116 numbers 7 down to 1 ...;
-#X text 53 172 3*1-bit rgb image line;
-#X text 83 206 3*8-bit rgb image line;
-#X text 53 234 repeat line 240 times;
+#N canvas 165 50 640 466 10;
+#X obj 6 67 # / 320;
+#X obj 6 187 # * 255;
+#X obj 6 153 # != 0;
+#X obj 6 -12 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 6 99 # inv+ 7;
+#X obj 6 15 #for 0 320 1;
+#X obj 6 48 # * 7;
+#X obj 6 -34 loadbang;
+#X text 26 -12 make one line:;
+#X text 14 31 numbers 0 to 319;
+#X text 15 84 numbers 0 to 6 repeated 45 or 46 times;
+#X text 16 116 numbers 7 down to 1 ...;
+#X text 13 172 3*1-bit rgb image line;
+#X text 13 205 3*8-bit rgb image line;
+#X text 135 223 repeat line 240 times;
 #X obj -13 -85 cnv 15 500 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
 #X text 0 -86 hello-world.pd;
-#X obj 46 134 #outer & (2 4 1);
-#X obj 46 252 #redim (240 320 3);
-#X obj -14 319 cnv 15 500 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj 6 134 #outer & (2 4 1);
+#X obj 6 222 #redim (240 320 3);
+#X obj -14 349 cnv 15 500 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 325 GridFlow 0.8.0;
-#X text -7 325 GridFlow 0.8.0;
+#X text -7 355 GridFlow 0.8.0;
+#X text -7 355 GridFlow 0.8.0;
 #X text 0 -72 Copyright 2001 Mathieu Bouchard;
-#X connect 0 0 5 0;
-#X connect 1 0 19 0;
+#X obj 289 297 #text_to_image;
+#X obj 289 278 #import per_message;
+#X msg 289 259 symbol Hello_World!;
+#X obj 290 319 #draw_image put (3 # 0) (0 0);
+#X obj 6 290 #out window;
+#X msg 288 240 load grid gzfile lucida-typewriter-12.grid.gz;
+#X obj 391 297 #in;
+#X text 328 216 FOR FUTURE USE:;
+#X connect 0 0 4 0;
+#X connect 1 0 18 0;
 #X connect 2 0 1 0;
-#X connect 3 0 6 0;
-#X connect 5 0 18 0;
-#X connect 6 0 7 0;
-#X connect 7 0 0 0;
-#X connect 8 0 3 0;
-#X connect 18 0 2 0;
-#X connect 19 0 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 17 0;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X connect 7 0 3 0;
+#X connect 17 0 2 0;
+#X connect 18 0 27 0;
+#X connect 23 0 26 1;
+#X connect 24 0 23 0;
+#X connect 25 0 24 0;
+#X connect 28 0 29 0;
+#X connect 29 0 23 2;
diff --git a/externals/gridflow/pd_examples/image_stats.pd b/externals/gridflow/pd_examples/image_stats.pd
index 9f9c753a..ecb60e01 100644
--- a/externals/gridflow/pd_examples/image_stats.pd
+++ b/externals/gridflow/pd_examples/image_stats.pd
@@ -1,39 +1,39 @@
-#N canvas 391 151 716 416 10;
-#X obj 257 173 print total_value;
-#X obj 523 151 #dim;
-#X obj 22 187 #export_list;
-#X obj 328 150 print number_of_values;
-#X obj 523 200 print number_of_dimensions;
-#X obj 523 173 #export;
-#X obj 185 91 #fold +;
-#X obj 281 201 /;
-#X obj 185 135 #fold +;
-#X obj 22 215 print total_pixel;
-#X obj 185 57 fork;
-#X obj 245 28 #in;
-#X obj 328 106 #fold * \, seed 1;
-#X obj 480 112 print dimensions;
-#X obj 281 228 print average_value;
-#X obj 186 157 #export;
-#X obj 185 113 #fold +;
-#X obj 480 90 #export_list;
-#X obj 480 68 #dim;
-#X obj 328 84 #dim;
-#X obj 328 128 #export;
-#X msg 271 -35 open bluemarble.jpg \, bang;
-#X msg 271 -15 open teapot.png \, bang;
-#X msg 271 5 open r001.jpg \, bang;
-#X obj -15 304 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
+#N canvas 391 151 716 426 10;
+#X obj 214 261 print total_value;
+#X obj 473 191 #dim;
+#X obj 42 220 #export_list;
+#X obj 278 231 print number_of_values;
+#X obj 473 229 print number_of_dimensions;
+#X obj 473 210 #export;
+#X obj 205 181 #fold +;
+#X obj 205 301 /;
+#X obj 205 219 #fold +;
+#X obj 42 239 print total_pixel;
+#X obj 205 147 fork;
+#X obj 265 118 #in;
+#X obj 278 193 #fold * \, seed 1;
+#X obj 420 166 print dimensions;
+#X obj 205 320 print average_value;
+#X obj 205 238 #export;
+#X obj 205 200 #fold +;
+#X obj 420 147 #export_list;
+#X obj 420 128 #dim;
+#X obj 278 174 #dim;
+#X obj 278 212 #export;
+#X msg 291 55 open bluemarble.jpg \, bang;
+#X msg 291 75 open teapot.png \, bang;
+#X msg 291 95 open r001.jpg \, bang;
+#X obj 5 394 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 311 GridFlow 0.8.0;
-#X text -7 311 GridFlow 0.8.0;
-#X obj -13 -85 cnv 15 720 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 13 401 GridFlow 0.8.0;
+#X text 13 401 GridFlow 0.8.0;
+#X obj 7 5 cnv 15 720 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text -5 -72 Copyright 2001 Mathieu Bouchard;
-#X text -5 -86 image_stats.pd;
-#X obj 22 131 #fold + \, seed (3 #);
-#X obj 22 92 #fold + \, seed (3 #);
-#X text 460 -36 <-- click on one of these;
+#X text 15 18 Copyright 2001 Mathieu Bouchard;
+#X text 15 4 image_stats.pd;
+#X obj 42 201 #fold + \, seed (3 #);
+#X obj 42 182 #fold + \, seed (3 #);
+#X text 480 54 <-- click on one of these;
 #X connect 1 0 5 0;
 #X connect 2 0 9 0;
 #X connect 5 0 4 0;
diff --git a/externals/gridflow/pd_examples/linear_transform.pd b/externals/gridflow/pd_examples/linear_transform.pd
index b5e87d8d..1c2d4749 100644
--- a/externals/gridflow/pd_examples/linear_transform.pd
+++ b/externals/gridflow/pd_examples/linear_transform.pd
@@ -1,123 +1,215 @@
-#N canvas 454 137 685 580 10;
-#X text 455 -6 click here to go in manual mode;
-#X floatatom 138 224 5 0 0 0 - - -;
-#X obj 7 289 # >> 11;
-#X obj 7 62 #store;
-#X obj 194 204 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
+#N canvas 76 11 784 587 10;
+#X text 359 43 click here to go in manual mode;
+#X floatatom 141 311 5 0 0 0 - - -;
+#X obj 27 374 # >> 11;
+#X obj 27 139 #store;
+#X obj 183 291 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
 8 -260818 -1 -1 0 1;
-#X obj 545 123 * 3;
-#X obj 418 376 # sin*;
-#X obj 194 223 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
+#X obj 505 208 * 3;
+#X obj 428 435 # sin*;
+#X obj 183 310 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
 8 -260818 -1 -1 0 1;
-#X floatatom 138 170 5 0 0 0 - - -;
-#X msg 448 137 10000;
-#X obj 7 -26 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
-#X obj 194 166 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
+#X floatatom 141 257 5 0 0 0 - - -;
+#X msg 444 238 10000;
+#X obj 27 59 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X obj 183 253 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
 8 -260818 -1 -1 0 1;
-#X obj 94 40 loadbang;
-#X obj 82 266 #redim ( 2 2 );
-#X text 191 147 linear transform;
-#X obj 7 310 # + 128;
-#X floatatom 138 188 5 0 0 0 - - -;
-#X floatatom 138 206 5 0 0 0 - - -;
-#X obj 194 185 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
+#X obj 77 138 loadbang;
+#X text 180 234 linear transform;
+#X obj 27 395 # + 128;
+#X floatatom 141 275 5 0 0 0 - - -;
+#X floatatom 141 293 5 0 0 0 - - -;
+#X obj 183 272 hsl 128 15 -4096 4096 0 0 empty empty empty -2 -6 0
 8 -260818 -1 -1 0 1;
-#X obj 418 175 vsl 15 128 0 35999 0 0 empty empty empty 0 -8 0 8 -260818
--1 -1 12700 1;
-#X obj 453 174 vsl 15 128 -10000 10000 0 0 empty empty empty 0 -8 0
-8 -260818 -1 -1 7400 1;
-#X obj 427 34 % 36000;
-#X obj 448 116 loadbang;
-#X text 360 146 rotozoomer;
-#X obj 545 143 # sin* 100;
-#X obj 384 -6 shunt 2;
-#X msg 132 342 open teapot.png \, bang;
-#X msg 545 215 set \$1;
-#X obj 132 321 loadbang;
-#X obj 7 363 #store;
-#X obj 7 384 #out window;
-#X obj 453 312 t b f;
-#X obj 439 -5 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
+#X obj 428 260 vsl 15 128 0 35999 0 0 empty empty empty 0 -8 0 8 -260818
+-1 -1 0 1;
+#X obj 444 259 vsl 15 128 -32768 32768 0 0 empty empty empty 0 -8 0
+8 -260818 -1 -1 12700 1;
+#X obj 327 82 % 36000;
+#X obj 444 219 loadbang;
+#X text 432 185 rotozoomer;
+#X obj 505 227 # sin* 100;
+#X obj 288 43 shunt 2;
+#X msg 505 284 set \$1;
+#X obj 152 416 loadbang;
+#X obj 27 448 #store;
+#X obj 27 469 #out window;
+#X obj 343 44 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
 ;
-#X obj 81 247 #pack 4;
-#X obj 7 35 t b b;
-#X obj 384 33 float;
-#X obj 427 14 + 100;
-#X obj 545 164 # inv* 100000;
-#X obj 545 185 #export;
-#X obj 63 341 #camera;
-#X obj 132 363 #in;
-#X obj 63 321 spigot;
-#X obj 111 322 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+#X obj 88 334 #pack 4;
+#X obj 27 95 t b b;
+#X obj 288 82 float;
+#X obj 327 63 + 100;
+#X obj 505 246 # inv* 100000;
+#X obj 505 265 #export;
+#X obj 83 426 #camera;
+#X obj 152 454 #in;
+#X obj 83 406 spigot;
+#X obj 131 407 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
-#X obj 7 268 #inner;
-#X obj 81 144 loadbang;
-#X obj 23 412 fps detailed;
-#X obj 23 435 print;
-#X obj 7 8 metro 5;
-#X obj -18 -85 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+#X obj 27 353 #inner;
+#X obj 88 237 loadbang;
+#X obj 27 488 fps detailed;
+#X obj 27 507 print;
+#X obj 2 0 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 1 -72 Copyright 2002 Mathieu Bouchard;
-#X text 1 -85 convolve.pd;
-#X obj -18 -85 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 21 13 Copyright 2002 Mathieu Bouchard;
+#X text 21 0 convolve.pd;
+#X obj 2 0 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 1 -85 linear_transform.pd;
-#X obj 94 61 #for (-128 -128) (128 128) (1 1);
-#X obj 418 355 #outer + (9000 18000 0 9000);
-#X text 1 -72 Copyright 2001 Mathieu Bouchard;
-#X obj -18 464 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 21 0 linear_transform.pd;
+#X obj 77 157 #for (-128 -128) (128 128) (1 1);
+#X obj 428 416 #outer + (9000 18000 0 9000);
+#X text 21 13 Copyright 2001 Mathieu Bouchard;
+#X obj 2 549 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -10 471 GridFlow 0.8.0;
-#X text -10 471 GridFlow 0.8.0;
-#X connect 1 0 33 3;
-#X connect 2 0 15 0;
-#X connect 3 0 43 0;
-#X connect 4 0 17 0;
-#X connect 5 0 24 0;
-#X connect 6 0 13 0;
+#X text 10 556 GridFlow 0.8.0;
+#X text 10 556 GridFlow 0.8.0;
+#X msg 152 435 load teapot.png;
+#X obj 27 76 metro 33.3667;
+#X obj 89 353 #redim (2 2);
+#X obj 333 335 #export;
+#X obj 333 316 # % 36000;
+#N canvas 0 0 450 300 scratch 0;
+#X obj 40 38 inlet;
+#X obj 40 245 outlet;
+#X obj 40 57 route keypress;
+#X msg 40 76 \$4;
+#X msg 40 115 -1;
+#X msg 79 115 1;
+#X obj 40 182 +;
+#X obj 40 207 int;
+#X obj 72 185 nbx 8 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 0 256;
+#X obj 40 226 #fade 2;
+#X obj 65 207 inlet;
+#X obj 40 139 * 1500;
+#X obj 40 95 route Left Right;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 12 0;
+#X connect 4 0 11 0;
+#X connect 5 0 11 0;
+#X connect 6 0 7 1;
+#X connect 6 0 8 0;
+#X connect 7 0 9 0;
+#X connect 8 0 6 1;
+#X connect 9 0 1 0;
+#X connect 10 0 7 0;
+#X connect 11 0 6 0;
+#X connect 12 0 4 0;
+#X connect 12 1 5 0;
+#X restore 333 297 pd scratch;
+#N canvas 0 0 304 312 scratch2 0;
+#X obj 30 23 inlet;
+#X obj 46 263 outlet;
+#X obj 30 42 route keypress;
+#X msg 30 90 \$4;
+#X msg 69 130 1;
+#X obj 45 197 +;
+#X obj 46 218 int;
+#X obj 71 199 nbx 8 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 131526 256;
+#X obj 46 243 #fade 2;
+#X obj 71 218 inlet;
+#X obj 30 109 route Up Down;
+#X msg 30 130 -1;
+#X obj 30 70 t l l;
+#X msg 129 62 \$3;
+#X obj 129 81 & 1;
+#X obj 129 100 sel 0 1;
+#X obj 49 161 *;
+#X msg 130 120 1000;
+#X msg 168 120 5;
+#X connect 0 0 2 0;
+#X connect 2 0 12 0;
+#X connect 3 0 10 0;
+#X connect 4 0 16 0;
+#X connect 5 0 6 1;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 5 1;
+#X connect 8 0 1 0;
+#X connect 9 0 6 0;
+#X connect 10 0 11 0;
+#X connect 10 1 4 0;
+#X connect 11 0 16 0;
+#X connect 12 0 3 0;
+#X connect 12 1 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 15 0 17 0;
+#X connect 15 1 18 0;
+#X connect 16 0 5 0;
+#X connect 17 0 16 1;
+#X connect 18 0 16 1;
+#X restore 336 367 pd scratch2;
+#X obj 336 386 #export;
+#X floatatom 336 443 8 0 0 0 - - -;
+#X obj 336 405 / 10000;
+#X obj 336 424 exp;
+#X obj 505 373 t b;
+#X connect 1 0 30 3;
+#X connect 2 0 14 0;
+#X connect 3 0 40 0;
+#X connect 4 0 16 0;
+#X connect 5 0 23 0;
+#X connect 6 0 57 0;
 #X connect 7 0 1 0;
-#X connect 8 0 33 0;
-#X connect 9 0 20 0;
-#X connect 10 0 47 0;
+#X connect 8 0 30 0;
+#X connect 9 0 19 0;
+#X connect 10 0 56 0;
 #X connect 11 0 8 0;
-#X connect 12 0 53 0;
-#X connect 13 0 43 1;
-#X connect 15 0 29 0;
-#X connect 16 0 33 1;
-#X connect 17 0 33 2;
-#X connect 18 0 16 0;
-#X connect 19 0 54 0;
-#X connect 20 0 31 0;
-#X connect 21 0 35 1;
-#X connect 22 0 9 0;
-#X connect 24 0 37 0;
-#X connect 25 0 35 0;
-#X connect 26 0 40 0;
-#X connect 27 0 20 0;
-#X connect 28 0 26 0;
-#X connect 29 0 30 0;
-#X connect 30 0 45 0;
-#X connect 31 0 19 0;
-#X connect 31 1 6 1;
-#X connect 32 0 25 1;
-#X connect 33 0 13 0;
-#X connect 34 0 3 0;
-#X connect 34 1 25 0;
-#X connect 34 1 41 0;
-#X connect 35 0 36 0;
-#X connect 35 0 19 0;
-#X connect 35 0 5 0;
-#X connect 36 0 21 0;
-#X connect 37 0 38 0;
-#X connect 38 0 27 0;
-#X connect 38 0 31 0;
-#X connect 39 0 29 1;
-#X connect 40 0 29 1;
-#X connect 41 0 39 0;
-#X connect 42 0 41 1;
-#X connect 43 0 2 0;
-#X connect 44 0 33 0;
-#X connect 45 0 46 0;
-#X connect 47 0 34 0;
-#X connect 53 0 3 1;
-#X connect 54 0 6 0;
+#X connect 12 0 49 0;
+#X connect 14 0 27 0;
+#X connect 15 0 30 1;
+#X connect 16 0 30 2;
+#X connect 17 0 15 0;
+#X connect 18 0 50 0;
+#X connect 19 0 66 0;
+#X connect 20 0 32 1;
+#X connect 21 0 9 0;
+#X connect 23 0 34 0;
+#X connect 24 0 32 0;
+#X connect 25 0 19 0;
+#X connect 26 0 55 0;
+#X connect 27 0 28 0;
+#X connect 28 0 42 0;
+#X connect 28 0 60 0;
+#X connect 28 0 61 0;
+#X connect 29 0 24 1;
+#X connect 30 0 57 0;
+#X connect 31 0 3 0;
+#X connect 31 1 24 0;
+#X connect 31 1 38 0;
+#X connect 31 1 60 1;
+#X connect 31 1 61 1;
+#X connect 32 0 33 0;
+#X connect 32 0 18 0;
+#X connect 32 0 5 0;
+#X connect 33 0 20 0;
+#X connect 34 0 35 0;
+#X connect 35 0 25 0;
+#X connect 35 0 66 0;
+#X connect 36 0 27 1;
+#X connect 37 0 27 1;
+#X connect 38 0 36 0;
+#X connect 39 0 38 1;
+#X connect 40 0 2 0;
+#X connect 41 0 30 0;
+#X connect 42 0 43 0;
+#X connect 49 0 3 1;
+#X connect 50 0 6 0;
+#X connect 55 0 37 0;
+#X connect 56 0 31 0;
+#X connect 57 0 40 1;
+#X connect 58 0 18 0;
+#X connect 59 0 58 0;
+#X connect 60 0 59 0;
+#X connect 61 0 62 0;
+#X connect 62 0 64 0;
+#X connect 64 0 65 0;
+#X connect 65 0 63 0;
+#X connect 65 0 19 0;
+#X connect 65 0 6 1;
+#X connect 66 0 18 0;
diff --git a/externals/gridflow/pd_examples/photo_pianoroll.pd b/externals/gridflow/pd_examples/photo_pianoroll.pd
index b97e2008..9ad80e38 100644
--- a/externals/gridflow/pd_examples/photo_pianoroll.pd
+++ b/externals/gridflow/pd_examples/photo_pianoroll.pd
@@ -1,16 +1,15 @@
-#N canvas 476 141 695 640 10;
-#X obj 146 24 #in lada.jpg;
-#X obj 58 479 #out window;
-#X obj 28 -9 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
-#X obj 58 93 #store;
-#X obj 164 3 loadbang;
-#X text 268 -34 How to play a car;
-#X obj 146 4 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#N canvas 329 40 705 535 10;
+#X obj 146 62 #in lada.jpg;
+#X obj 38 290 #out window;
+#X obj 38 48 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X obj 38 114 #store;
+#X obj 164 41 loadbang;
+#X obj 146 42 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 406 488 dac~;
-#X obj 333 54 +;
-#X msg 333 33 1;
-#X obj 361 54 % 365;
+#X obj 255 466 dac~;
+#X obj 329 58 +;
+#X msg 329 39 1;
+#X obj 361 39 % 365;
 #N canvas 0 0 450 300 fft 0;
 #X obj 23 68 rifft~;
 #X obj 23 88 outlet~;
@@ -18,142 +17,142 @@
 #X obj 23 48 tabreceive~ array2;
 #X connect 0 0 1 0;
 #X connect 3 0 0 0;
-#X restore 405 448 pd fft;
-#X obj 7 41 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1
-;
-#X obj 28 40 t b b;
-#X msg 284 418 4 2 # 0 0 0 502 1 502 1 0;
-#X obj 284 437 # +;
-#X obj 58 418 t a b;
-#X msg 311 437 \$1 0;
-#X obj 58 439 #greyscale_to_rgb;
-#X obj 477 135 #store;
-#X obj 476 214 #export_list;
-#X obj 517 234 s array1;
-#X obj 477 174 #cast float32;
-#X obj 186 126 # inv+ 255;
-#X obj 146 64 # min 255;
-#X obj 146 45 # * 3;
-#X msg 477 113 1 1 # \$1;
-#X obj 444 14 table array1 502;
-#X obj 477 234 t b a;
-#X obj 350 437 r row;
-#X obj 361 76 s row;
-#X obj 478 285 t f f;
-#X obj 480 392 tabwrite array2;
-#X obj 479 326 exp;
-#X obj 137 221 #mouse \, ...;
-#X obj 272 242 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 224 243 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
-1;
-#X obj 165 374 #draw_polygon put;
-#X msg 272 259 1 # 255;
-#X msg 223 261 1 # 0;
-#X obj 169 350 spigot;
-#X obj 280 292 t a a;
-#X obj 294 374 # +;
-#X obj 146 139 t a;
-#X msg 280 314 4 2 # 0 0 0 1 1 1 1 0;
-#X obj 280 336 # *;
-#X obj 357 333 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
+#X restore 255 423 pd fft;
+#X obj 17 85 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 38 84 t b b;
+#X msg 260 252 4 2 # 0 0 0 502 1 502 1 0;
+#X obj 260 271 # +;
+#X obj 38 233 t a b;
+#X msg 287 271 \$1 0;
+#X obj 38 252 #greyscale_to_rgb;
+#X obj 462 77 #store;
+#X obj 462 153 #export_list;
+#X obj 501 172 s array1;
+#X obj 171 177 # inv+ 255;
+#X obj 146 100 # min 255;
+#X obj 146 81 # * 3;
+#X msg 474 58 1 1 # \$1;
+#X obj 255 339 table array1 502;
+#X obj 462 172 t b a;
+#X obj 326 271 r row;
+#X obj 361 58 s row;
+#X obj 462 210 t f f;
+#X obj 462 305 tabwrite array2;
+#X obj 462 248 exp;
+#X obj 38 309 #mouse \, ...;
+#X obj 79 383 #draw_polygon put;
+#X obj 79 364 spigot;
+#X obj 29 413 t a a;
+#X obj 29 470 # +;
+#X obj 146 177 t a;
+#X msg 29 432 4 2 # 0 0 0 1 1 1 1 0;
+#X obj 29 451 # *;
+#X obj 105 459 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
+-262131 -1 -1 20 256;
+#X msg 185 217 365 502 1 # 255;
+#X text 296 217 clear;
+#X obj 462 286 tabread4 array1;
+#X obj 462 191 for 0 64 1;
+#X obj 462 96 #fade 5;
+#X obj 255 358 table array2 1024;
+#X obj 255 442 lop~ 1000;
+#X obj 462 229 / 20;
+#X obj 462 267 * 22;
+#X obj 105 473 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
 -262131 -1 -1 20 256;
-#X msg 185 182 365 502 1 # 255;
-#X text 296 182 clear;
-#X obj 480 373 tabread4 array1;
-#X obj 477 265 for 0 64 1;
-#X obj 477 154 #fade 5;
-#X obj 444 35 table array2 1024;
-#X obj 406 468 lop~ 1000;
-#X obj 479 305 / 20;
-#X obj 480 346 * 22;
-#X obj 28 19 metro 46.44;
-#X obj 357 350 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
--262131 -1 -1 1 256;
-#X obj 325 373 #pack 2;
-#X obj 475 194 # / ( float32 # 4000 );
-#X obj 186 155 #convolve ( 1 7 # 1 1 2 8 2 1 1 );
-#X obj 514 90 # >> 4;
-#X obj 146 84 #convolve ( 2 2 # 1 );
-#X obj 146 103 # >> 2;
-#X obj 58 459 #draw_polygon put (3 # 255 0 0);
-#X obj -18 524 cnv 15 700 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj 54 470 #pack 2;
+#X obj 499 39 # >> 4;
+#X obj 146 138 # >> 2;
+#X obj 38 271 #draw_polygon put (3 # 255 0 0);
+#X obj 2 499 cnv 15 700 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -10 531 GridFlow 0.8.0;
-#X text -10 531 GridFlow 0.8.0;
-#X obj -18 -85 cnv 15 700 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 10 506 GridFlow 0.8.0;
+#X text 10 506 GridFlow 0.8.0;
+#X obj 2 0 cnv 15 700 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text -3 -86 photo_pianoroll.pd;
-#X text -5 -72 Copyright 2004 Mathieu Bouchard;
-#X connect 0 0 25 0;
-#X connect 1 0 34 0;
-#X connect 2 0 56 0;
-#X connect 3 0 16 0;
-#X connect 3 0 40 0;
+#X text 17 -1 photo_pianoroll.pd;
+#X text 15 13 Copyright 2004 Mathieu Bouchard;
+#X obj 462 134 # / (f # 4000);
+#X obj 462 115 #cast f;
+#X obj 171 196 #convolve (1 7 # 1 1 2 8 2 1 1);
+#X obj 146 119 #convolve (2 2 # 1);
+#X msg 132 344 0;
+#X msg 136 364 1 # \$1;
+#X msg 162 344 255;
+#X obj 79 402 s feedback;
+#X obj 152 158 r feedback;
+#X obj 38 65 metro 46.44;
+#X text 575 7 How to play a car;
+#X connect 0 0 23 0;
+#X connect 1 0 32 0;
+#X connect 2 0 70 0;
+#X connect 3 0 15 0;
+#X connect 3 0 34 0;
 #X connect 4 0 0 0;
-#X connect 6 0 0 0;
-#X connect 8 0 10 0;
-#X connect 9 0 8 0;
-#X connect 10 0 8 1;
-#X connect 10 0 30 0;
-#X connect 10 0 26 0;
-#X connect 11 0 53 0;
-#X connect 12 0 13 0;
-#X connect 13 0 9 0;
-#X connect 13 1 3 0;
-#X connect 14 0 15 0;
-#X connect 15 0 64 2;
-#X connect 16 0 18 0;
-#X connect 16 1 14 0;
-#X connect 17 0 15 1;
-#X connect 18 0 64 0;
-#X connect 19 0 51 0;
-#X connect 20 0 28 0;
-#X connect 22 0 59 0;
-#X connect 23 0 60 0;
-#X connect 24 0 62 0;
-#X connect 25 0 24 0;
-#X connect 26 0 19 0;
-#X connect 28 0 50 0;
-#X connect 28 1 21 0;
-#X connect 29 0 17 0;
-#X connect 31 0 54 0;
-#X connect 31 1 32 1;
-#X connect 33 0 55 0;
-#X connect 34 0 41 0;
-#X connect 34 1 41 0;
-#X connect 34 4 36 0;
-#X connect 34 4 40 1;
-#X connect 34 6 35 0;
-#X connect 34 6 40 1;
+#X connect 5 0 0 0;
+#X connect 7 0 9 0;
+#X connect 8 0 7 0;
+#X connect 9 0 7 1;
+#X connect 9 0 28 0;
+#X connect 9 0 24 0;
+#X connect 10 0 47 0;
+#X connect 11 0 12 0;
+#X connect 12 0 8 0;
+#X connect 12 1 3 0;
+#X connect 13 0 14 0;
+#X connect 14 0 54 2;
+#X connect 15 0 17 0;
+#X connect 15 1 13 0;
+#X connect 16 0 14 1;
+#X connect 17 0 54 0;
+#X connect 18 0 45 0;
+#X connect 19 0 26 0;
+#X connect 21 0 63 0;
+#X connect 22 0 64 0;
+#X connect 23 0 22 0;
+#X connect 24 0 18 0;
+#X connect 26 0 44 0;
+#X connect 26 1 20 0;
+#X connect 27 0 16 0;
+#X connect 29 0 48 0;
+#X connect 29 1 30 1;
+#X connect 31 0 49 0;
+#X connect 32 0 35 0;
+#X connect 32 1 35 0;
+#X connect 32 4 34 1;
+#X connect 32 4 65 0;
+#X connect 32 6 34 1;
+#X connect 32 6 67 0;
+#X connect 33 0 68 0;
+#X connect 34 0 33 0;
 #X connect 35 0 38 0;
-#X connect 36 0 39 0;
-#X connect 37 0 43 0;
-#X connect 38 0 37 1;
-#X connect 39 0 37 1;
-#X connect 40 0 37 0;
-#X connect 41 0 44 0;
-#X connect 41 1 42 1;
-#X connect 42 0 37 2;
-#X connect 43 0 3 1;
-#X connect 43 0 23 0;
-#X connect 44 0 45 0;
-#X connect 45 0 42 0;
-#X connect 46 0 58 0;
-#X connect 47 0 43 0;
-#X connect 49 0 32 0;
-#X connect 50 0 31 0;
-#X connect 51 0 22 0;
-#X connect 53 0 7 0;
-#X connect 53 0 7 1;
-#X connect 54 0 33 0;
-#X connect 55 0 49 0;
-#X connect 56 0 13 0;
-#X connect 57 0 58 1;
-#X connect 58 0 45 1;
-#X connect 59 0 20 0;
-#X connect 60 0 61 0;
-#X connect 61 0 19 1;
-#X connect 62 0 63 0;
-#X connect 63 0 43 0;
-#X connect 64 0 1 0;
+#X connect 35 1 36 1;
+#X connect 36 0 33 2;
+#X connect 37 0 3 1;
+#X connect 37 0 21 0;
+#X connect 38 0 39 0;
+#X connect 39 0 36 0;
+#X connect 40 0 51 0;
+#X connect 41 0 37 0;
+#X connect 43 0 30 0;
+#X connect 44 0 29 0;
+#X connect 45 0 62 0;
+#X connect 47 0 6 0;
+#X connect 47 0 6 1;
+#X connect 48 0 31 0;
+#X connect 49 0 43 0;
+#X connect 50 0 51 1;
+#X connect 51 0 39 1;
+#X connect 52 0 18 1;
+#X connect 53 0 37 0;
+#X connect 54 0 1 0;
+#X connect 61 0 19 0;
+#X connect 62 0 61 0;
+#X connect 63 0 52 0;
+#X connect 64 0 53 0;
+#X connect 65 0 66 0;
+#X connect 66 0 33 1;
+#X connect 67 0 33 1;
+#X connect 69 0 37 0;
+#X connect 70 0 12 0;
diff --git a/externals/gridflow/pd_examples/polygon.pd b/externals/gridflow/pd_examples/polygon.pd
index d43a14f8..a18980ea 100644
--- a/externals/gridflow/pd_examples/polygon.pd
+++ b/externals/gridflow/pd_examples/polygon.pd
@@ -1,15 +1,12 @@
-#N canvas 242 170 497 560 10;
-#X obj 30 250 #draw_polygon +;
-#X obj 127 3 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+#N canvas 130 96 584 565 10;
+#X obj 35 250 #draw_polygon +;
+#X obj 18 1 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
 ;
-#X obj 187 80 +;
-#X obj 30 214 #store;
-#X obj 220 102 * 5000;
-#X obj 165 -27 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+#X obj 35 214 #store;
+#X obj 35 -36 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
 ;
-#X msg 187 61 1;
-#X obj 30 394 #out window;
-#X obj 391 7 vsl 15 137 0 36000 0 1 empty empty empty -2 -6 0 8 -260818
+#X obj 35 378 #out window;
+#X obj 306 7 vsl 15 137 0 36000 0 1 empty empty empty -2 -6 0 8 -260818
 -1 -1 3400 1;
 #N canvas 0 0 415 291 create 0;
 #X msg 82 66 0 \$1;
@@ -34,7 +31,7 @@
 #X connect 7 0 2 1;
 #X connect 8 0 6 0;
 #X connect 10 0 0 0;
-#X restore 289 149 pd create star;
+#X restore 204 149 pd create star;
 #N canvas 0 0 450 300 color 0;
 #X obj 18 141 outlet 0;
 #X obj 18 95 # sin* 128;
@@ -50,26 +47,24 @@ color wheel except we don't support the HSV color model for now.;
 #X connect 3 0 5 0;
 #X connect 4 0 3 0;
 #X connect 5 0 1 0;
-#X restore 80 129 pd color generator;
-#X obj 165 1 metro 33.3667;
-#X obj 165 34 t b b b;
-#X obj 30 71 t b;
-#X floatatom 392 151 6 0 0 0 - - -;
-#X obj 89 194 loadbang;
-#X obj 215 81 % 36000;
-#X obj 46 272 shunt 2;
-#X obj 115 274 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+#X restore 62 102 pd color generator;
+#X obj 35 -19 metro 33.3667;
+#X obj 35 0 t b b b;
+#X obj 35 71 t b;
+#X floatatom 307 151 6 0 0 0 - - -;
+#X obj 88 194 loadbang;
+#X obj 51 272 shunt 2;
+#X obj 104 274 tgl 15 1 empty empty empty 0 -6 0 8 -241291 -1 -1 1
 1;
-#X text 133 273 blur;
-#X msg 89 214 240 320 3 b # 0;
-#X obj 80 167 #cast b;
-#X obj 80 148 # >> 7;
-#X obj 74 357 #solarize;
-#X obj 30 317 shunt 2;
-#X obj 93 318 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+#X text 122 273 blur;
+#X msg 88 214 240 320 3 b # 0;
+#X obj 62 140 #cast b;
+#X obj 79 355 #solarize;
+#X obj 35 317 shunt 2;
+#X obj 88 319 tgl 15 1 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
 ;
-#X obj 131 301 # >> (b # 2);
-#X obj 131 321 #convolve (1 3 b # 1 2 1) \, seed (b # 0);
+#X obj 155 303 # >> (b # 2);
+#X obj 155 322 #convolve (1 3 b # 1 2 1) \, seed (b # 0);
 #X obj -15 442 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
 #X text -7 450 GridFlow 0.8.0;
@@ -78,36 +73,51 @@ color wheel except we don't support the HSV color model for now.;
 0;
 #X text 0 -72 Copyright 2002 Mathieu Bouchard;
 #X text 0 -86 polygon.pd;
-#X connect 0 0 17 0;
-#X connect 0 0 24 0;
-#X connect 1 0 12 0;
-#X connect 2 0 16 0;
-#X connect 3 0 0 0;
-#X connect 4 0 9 1;
+#X obj 79 336 #cast i;
+#X obj 82 30 + 1;
+#X obj 57 30 i;
+#X msg 22 26 0;
+#X obj 182 75 expr ($f1*$f1/2);
+#X obj 155 341 # >> (b # 2);
+#X obj 155 360 #convolve (3 1 b # 1 2 1) \, seed (b # 0);
+#X obj 5 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1 -1
+;
+#X obj 62 121 # >> 3;
+#X connect 0 0 13 0;
+#X connect 0 0 19 0;
+#X connect 1 0 9 0;
+#X connect 2 0 0 0;
+#X connect 3 0 8 0;
 #X connect 5 0 11 0;
-#X connect 6 0 2 0;
-#X connect 8 0 14 0;
-#X connect 9 0 0 2;
-#X connect 10 0 22 0;
-#X connect 11 0 12 0;
-#X connect 12 0 13 0;
-#X connect 12 1 6 0;
-#X connect 12 2 9 0;
-#X connect 13 0 3 0;
-#X connect 14 0 9 2;
-#X connect 15 0 20 0;
+#X connect 6 0 0 2;
+#X connect 7 0 37 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 9 1 31 0;
+#X connect 9 2 6 0;
+#X connect 10 0 2 0;
+#X connect 11 0 6 2;
+#X connect 12 0 16 0;
+#X connect 13 0 2 1;
+#X connect 13 1 21 0;
+#X connect 14 0 13 1;
 #X connect 16 0 2 1;
-#X connect 16 0 10 0;
-#X connect 16 0 4 0;
-#X connect 17 0 3 1;
-#X connect 17 1 26 0;
-#X connect 18 0 17 1;
-#X connect 20 0 3 1;
-#X connect 21 0 0 1;
-#X connect 22 0 21 0;
-#X connect 23 0 7 0;
-#X connect 24 0 7 0;
-#X connect 24 1 23 0;
-#X connect 25 0 24 1;
-#X connect 26 0 27 0;
-#X connect 27 0 3 1;
+#X connect 17 0 0 1;
+#X connect 18 0 4 0;
+#X connect 19 0 4 0;
+#X connect 19 1 29 0;
+#X connect 20 0 19 1;
+#X connect 21 0 22 0;
+#X connect 22 0 34 0;
+#X connect 29 0 18 0;
+#X connect 30 0 31 1;
+#X connect 31 0 30 0;
+#X connect 31 0 7 0;
+#X connect 31 0 33 0;
+#X connect 32 0 31 0;
+#X connect 33 0 6 1;
+#X connect 34 0 35 0;
+#X connect 35 0 2 1;
+#X connect 36 0 32 0;
+#X connect 36 0 16 0;
+#X connect 37 0 17 0;
diff --git a/externals/gridflow/pd_examples/sand.pd b/externals/gridflow/pd_examples/sand.pd
index 42a0ed93..1ba43753 100644
--- a/externals/gridflow/pd_examples/sand.pd
+++ b/externals/gridflow/pd_examples/sand.pd
@@ -1,15 +1,14 @@
-#N canvas 524 30 680 685 10;
-#X text 317 199 disable falling;
-#X obj 6 392 # min 255;
-#X obj 3 167 fork;
-#X obj 295 402 # != 0;
-#X obj 356 446 #fold +;
-#X obj 99 518 s position;
-#X obj 192 -31 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+#N canvas 524 30 680 557 10;
+#X text 287 159 disable falling;
+#X obj 2 96 fork;
+#X obj 273 294 # != 0;
+#X obj 334 332 #fold +;
+#X obj 8 414 s position;
+#X obj 192 29 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
 ;
-#X obj 295 465 #export;
-#X obj 192 68 #store;
-#X obj 247 133 shunt 2;
+#X obj 273 351 #export;
+#X obj 192 82 #store;
+#X obj 217 113 shunt 2;
 #N canvas 25 226 369 359 mouse 0;
 #X text 143 214 is there a click?;
 #X obj 44 114 != 0;
@@ -34,26 +33,25 @@
 #X connect 11 0 5 0;
 #X connect 12 0 10 0;
 #X connect 12 1 11 0;
-#X restore 398 151 pd mouse click/drag;
-#X obj 358 152 # / 2;
-#X obj 295 423 #ravel;
-#X msg 11 142 100 100;
-#X obj 6 415 # max;
-#X obj 247 198 shunt 2;
-#X obj 26 187 s size;
-#X obj 295 444 #fold +;
-#X obj 454 112 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
-1;
-#X obj 356 404 @! abs;
-#X obj 432 412 #export;
-#X obj 432 370 #ravel;
-#X obj 288 260 shunt 2;
-#X obj 301 199 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+#X restore 366 132 pd mouse click/drag;
+#X obj 327 132 # / 2;
+#X obj 273 313 #ravel;
+#X msg 8 76 100 100;
+#X obj 217 158 shunt 2;
+#X obj 34 96 s size;
+#X obj 273 332 #fold +;
+#X obj 420 95 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+;
+#X obj 334 294 @! abs;
+#X obj 402 338 #export;
+#X obj 402 300 #ravel;
+#X obj 256 220 shunt 2;
+#X obj 271 159 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
-#X obj 356 467 #export;
-#X obj 398 111 shunt 2;
-#X obj 6 348 #greyscale_to_rgb;
-#X obj 399 132 r position;
+#X obj 334 351 #export;
+#X obj 367 94 shunt 2;
+#X obj 2 230 #greyscale_to_rgb;
+#X obj 367 113 r position;
 #N canvas 504 75 496 430 falling 0;
 #X obj 42 147 # +;
 #X text 228 286 vertical falling;
@@ -104,13 +102,13 @@
 #X connect 21 0 7 0;
 #X connect 22 0 8 0;
 #X connect 23 0 2 0;
-#X restore 247 218 pd falling sand;
-#X obj 6 465 #scale_by 2;
-#X obj 8 287 shunt 3;
-#X obj 6 540 print;
-#X obj 136 26 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+#X restore 217 178 pd falling sand;
+#X obj 2 373 #scale_by 2;
+#X obj 2 170 shunt 3;
+#X obj 2 452 print;
+#X obj 197 65 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X text 253 -8 auto;
+#X text 253 46 auto;
 #N canvas 292 75 480 513 falling 0;
 #X obj 105 177 # div 5;
 #X text 292 85 horizontal falling;
@@ -161,7 +159,7 @@
 #X connect 21 0 0 0;
 #X connect 22 0 17 0;
 #X connect 23 0 14 0;
-#X restore 292 238 pd falling sand ( 2 );
+#X restore 262 198 pd falling sand ( 2 );
 #N canvas 525 58 536 584 finger 0;
 #X obj 192 7 inlet;
 #X obj 36 78 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
@@ -270,19 +268,18 @@
 #X connect 23 0 21 0;
 #X connect 24 0 15 0;
 #X connect 25 0 3 1;
-#X restore 290 152 pd finger;
-#X obj 342 376 # -;
-#X obj 356 425 #ravel;
-#X msg 3 118 240 320;
-#X obj 432 391 #fold +;
-#X obj 6 328 # + 128;
-#X obj 148 476 #greyscale_to_rgb;
-#X obj 303 134 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+#X restore 260 132 pd finger;
+#X obj 310 266 # -;
+#X obj 334 313 #ravel;
+#X msg 2 56 240 320;
+#X obj 402 319 #fold +;
+#X obj 2 211 # + 128;
+#X obj 55 344 #greyscale_to_rgb;
+#X obj 270 115 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
-#X text 362 263 enable stats;
-#X text 292 529 checking for conservation of amounts of sand;
-#X msg 3 212 \$1 \$2 1 # 0;
-#X text 33 159 set size / reset;
+#X text 325 220 enable stats;
+#X text 239 391 checking for conservation of amounts of sand;
+#X msg 2 115 \$1 \$2 1 # 0;
 #N canvas 56 229 441 265 lighting 0;
 #X obj 27 209 outlet;
 #X obj 27 180 # +;
@@ -313,105 +310,106 @@
 #X connect 10 1 3 0;
 #X connect 13 0 8 1;
 #X connect 14 0 1 1;
-#X restore 151 355 pd lighting;
-#X obj 6 518 fps detailed;
-#X obj 344 262 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
+#X restore 26 268 pd lighting;
+#X obj 2 433 fps detailed;
+#X obj 309 221 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
-#X text 152 26 step;
-#X obj 71 253 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -1
--1 0;
-#X obj 6 486 #out window;
-#X obj 295 508 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+#X text 213 65 step;
+#X obj 55 144 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -241291 -1
+-1 2;
+#X obj 2 394 #out window;
+#X obj 273 372 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
 -262144 -1 -1 0 256;
-#X obj 356 508 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+#X obj 334 372 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
 -262144 -1 -1 0 256;
-#X obj 432 508 nbx 8 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+#X obj 402 357 nbx 8 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
 -262144 -1 -1 0 256;
-#X text 90 268 differential;
-#X text 89 253 heightmap;
-#X text 89 284 topographic;
-#X obj 152 68 t a a;
-#X obj 247 260 t a a;
-#X obj 149 457 # * 255;
-#X obj 150 437 # >= 6;
-#X obj 150 416 # & 7;
-#X obj 2 97 loadbang;
-#X text 470 112 disable finger;
-#X obj 332 354 t a a;
-#X obj 6 309 # << 2;
-#X obj 151 334 # << 4;
-#X obj 192 -8 metro 20;
-#X obj -15 569 cnv 15 680 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 74 158 differential;
+#X text 73 143 heightmap;
+#X text 73 174 topographic;
+#X obj 152 82 t a a;
+#X obj 217 220 t a a;
+#X obj 56 325 # * 255;
+#X obj 56 306 # >= 6;
+#X obj 56 287 # & 7;
+#X obj 2 37 loadbang;
+#X text 436 95 disable finger;
+#X obj 300 244 t a a;
+#X obj 2 192 # << 2;
+#X obj 192 46 metro 20;
+#X obj -15 499 cnv 15 680 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 576 GridFlow 0.8.0;
-#X text -7 576 GridFlow 0.8.0;
-#X obj -13 -85 cnv 15 680 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text -7 506 GridFlow 0.8.0;
+#X text -7 506 GridFlow 0.8.0;
+#X obj -13 -25 cnv 15 680 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 0 -72 Copyright 2002 Mathieu Bouchard;
-#X text 0 -85 sand.pd;
-#X connect 1 0 14 0;
-#X connect 2 0 45 0;
-#X connect 2 1 16 0;
-#X connect 3 0 12 0;
-#X connect 4 0 24 0;
-#X connect 6 0 69 0;
-#X connect 7 0 53 0;
-#X connect 8 0 9 0;
-#X connect 9 0 15 0;
-#X connect 9 1 35 0;
-#X connect 10 0 11 0;
-#X connect 10 1 25 0;
-#X connect 11 0 35 1;
-#X connect 12 0 17 0;
-#X connect 13 0 2 0;
-#X connect 14 0 29 0;
-#X connect 15 0 28 0;
-#X connect 15 1 60 0;
-#X connect 17 0 7 0;
-#X connect 18 0 25 1;
+#X text 0 -12 Copyright 2002 Mathieu Bouchard;
+#X text 0 -25 sand.pd;
+#X text -1 21 set size & reset;
+#X obj 2 295 #clip;
+#X obj 26 249 # << 0;
+#X connect 1 0 43 0;
+#X connect 1 1 14 0;
+#X connect 2 0 11 0;
+#X connect 3 0 22 0;
+#X connect 5 0 65 0;
+#X connect 6 0 50 0;
+#X connect 7 0 8 0;
+#X connect 8 0 13 0;
+#X connect 8 1 33 0;
+#X connect 9 0 10 0;
+#X connect 9 1 23 0;
+#X connect 10 0 33 1;
+#X connect 11 0 15 0;
+#X connect 12 0 1 0;
+#X connect 13 0 26 0;
+#X connect 13 1 57 0;
+#X connect 15 0 6 0;
+#X connect 16 0 23 1;
+#X connect 17 0 35 0;
+#X connect 18 0 52 0;
 #X connect 19 0 37 0;
-#X connect 20 0 55 0;
-#X connect 21 0 39 0;
-#X connect 22 1 21 0;
-#X connect 22 1 66 0;
-#X connect 23 0 15 1;
-#X connect 24 0 54 0;
-#X connect 25 0 9 1;
-#X connect 26 0 1 0;
-#X connect 27 0 10 0;
-#X connect 28 0 60 0;
-#X connect 29 0 52 0;
-#X connect 30 0 67 0;
-#X connect 30 1 68 0;
-#X connect 30 2 63 0;
-#X connect 32 0 8 0;
-#X connect 34 0 60 0;
-#X connect 35 0 15 0;
-#X connect 36 0 19 0;
-#X connect 36 0 3 0;
-#X connect 37 0 4 0;
-#X connect 38 0 2 0;
-#X connect 39 0 20 0;
-#X connect 40 0 26 0;
-#X connect 41 0 29 0;
-#X connect 42 0 9 1;
-#X connect 45 0 59 0;
-#X connect 47 0 1 0;
-#X connect 48 0 31 0;
-#X connect 49 0 22 1;
-#X connect 51 0 30 1;
-#X connect 52 0 48 0;
-#X connect 52 0 5 0;
-#X connect 59 0 30 0;
-#X connect 59 1 8 1;
+#X connect 20 1 19 0;
+#X connect 20 1 63 0;
+#X connect 21 0 13 1;
+#X connect 22 0 51 0;
+#X connect 23 0 8 1;
+#X connect 24 0 73 0;
+#X connect 25 0 9 0;
+#X connect 26 0 57 0;
+#X connect 27 0 49 0;
+#X connect 28 0 64 0;
+#X connect 28 1 74 0;
+#X connect 28 2 60 0;
+#X connect 30 0 7 0;
+#X connect 32 0 57 0;
+#X connect 33 0 13 0;
+#X connect 34 0 17 0;
+#X connect 34 0 2 0;
+#X connect 35 0 3 0;
+#X connect 36 0 1 0;
+#X connect 37 0 18 0;
+#X connect 38 0 24 0;
+#X connect 39 0 27 0;
+#X connect 40 0 8 1;
+#X connect 43 0 56 0;
+#X connect 44 0 73 0;
+#X connect 45 0 29 0;
+#X connect 46 0 20 1;
+#X connect 48 0 28 1;
+#X connect 49 0 45 0;
+#X connect 49 0 4 0;
+#X connect 56 0 28 0;
+#X connect 56 1 7 1;
+#X connect 57 0 56 0;
+#X connect 57 1 20 0;
+#X connect 58 0 39 0;
+#X connect 59 0 58 0;
 #X connect 60 0 59 0;
-#X connect 60 1 22 0;
-#X connect 61 0 41 0;
-#X connect 62 0 61 0;
-#X connect 63 0 62 0;
+#X connect 61 0 36 0;
+#X connect 63 0 34 1;
+#X connect 63 1 34 0;
 #X connect 64 0 38 0;
-#X connect 66 0 36 1;
-#X connect 66 1 36 0;
-#X connect 67 0 40 0;
-#X connect 68 0 47 0;
-#X connect 69 0 8 0;
+#X connect 65 0 7 0;
+#X connect 73 0 27 0;
+#X connect 74 0 44 0;
diff --git a/externals/gridflow/pd_examples/scratch_video.pd b/externals/gridflow/pd_examples/scratch_video.pd
index c322b745..d7a38e7e 100644
--- a/externals/gridflow/pd_examples/scratch_video.pd
+++ b/externals/gridflow/pd_examples/scratch_video.pd
@@ -1,29 +1,28 @@
-#N canvas 622 70 580 592 10;
-#X obj 109 21 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+#N canvas 503 45 580 510 10;
+#X obj 109 94 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
 ;
-#X obj 109 329 listelement 1;
-#X floatatom 109 352 5 0 0 0 - - -;
-#X floatatom 132 244 5 0 0 0 - - -;
-#X obj 109 305 route position;
-#X obj 109 221 #in;
-#X msg 142 167 open /home/alx/Documents/images/videos/bus_1.mov;
-#X obj 112 391 hsl 128 15 1 320 0 0 empty empty empty -2 -6 0 8 -260818
--1 -1 3145 1;
-#X obj -13 -85 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
+#X obj 109 352 listelement 1;
+#X floatatom 109 371 5 0 0 0 - - -;
+#X floatatom 132 279 5 0 0 0 - - -;
+#X obj 109 333 route position;
+#X obj 109 256 #in;
+#X msg 142 202 open /home/alx/Documents/images/videos/bus_1.mov;
+#X obj 112 410 hsl 128 15 1 320 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj -13 0 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X obj -16 472 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
+#X obj -16 477 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text 16 476 GridFlow 0.8.0;
-#X text 16 476 GridFlow 0.8.0;
-#X text 0 -85 traveling.pd;
-#X text 0 -72 Copyright 2003 Alexandre Castonguay;
-#X text -1 -34 Use the mouse position to scratch the video \, a touchscreen
+#X text 16 484 GridFlow 0.8.0;
+#X text 16 484 GridFlow 0.8.0;
+#X text 0 13 Copyright 2003 Alexandre Castonguay;
+#X text 2 52 Use the mouse position to scratch the video \, a touchscreen
 works well.;
 #N canvas 0 0 450 300 decide_framerate 0;
 #X obj 6 56 - 160;
 #X floatatom 6 80 5 0 0 0 - - -;
 #X obj 55 122 hsl 128 15 20 150 0 0 empty empty empty -2 -6 0 8 -24198
--1 -1 5862 1;
+-1 -1 0 1;
 #X obj 6 99 abs;
 #X floatatom 6 142 5 0 0 0 - - -;
 #X obj 6 121 / 3;
@@ -44,81 +43,79 @@ works well.;
 #X connect 8 0 7 0;
 #X connect 9 0 6 0;
 #X connect 10 0 0 0;
-#X restore 257 390 pd decide_framerate;
-#X obj 257 414 s framerate;
-#X obj 181 31 r framerate;
-#X obj 109 279 #out window;
-#X text 176 242 <-- frame number;
-#X text 213 328 <-- get x values;
-#X text 142 184 load your own until we get a bundled video for the
+#X restore 257 409 pd decide_framerate;
+#X obj 257 433 s framerate;
+#X obj 188 92 r framerate;
+#X obj 109 314 #out window;
+#X text 176 277 <-- frame number;
+#X text 213 351 <-- get x values;
+#X text 142 219 load your own until we get a bundled video for the
 docs;
-#X text 142 197 this one is 320 x 240;
-#N canvas 0 0 450 300 frame_count 1;
-#X msg 103 112 1;
-#X floatatom 103 168 5 0 0 0 - - -;
-#X obj 153 153 float \$1;
-#X obj 103 86 shunt 2;
-#X msg 173 69 1;
-#X msg 173 46 0;
-#X obj 103 140 + 1;
-#X msg 147 112 -1;
-#X msg 208 109 0;
-#X obj 46 -34 inlet;
-#X obj 231 68 inlet;
-#X obj 113 212 outlet;
-#X floatatom 147 -41 5 0 0 0 - - -;
-#X obj 147 -19 > 160;
-#X floatatom 147 8 5 0 0 0 - - -;
-#X text 192 -20 <-- is the direction left or right on a width of 320
+#X text 142 232 this one is 320 x 240;
+#N canvas 94 214 571 216 frame_count 0;
+#X msg 16 -5 1;
+#X floatatom 16 50 5 0 0 0 - - -;
+#X obj 48 30 float \$1;
+#X obj 16 -24 shunt 2;
+#X obj 16 30 + 1;
+#X msg 60 -5 -1;
+#X msg 111 49 0;
+#X obj 16 -54 inlet;
+#X obj 111 30 inlet;
+#X obj 16 102 outlet;
+#X floatatom 100 -38 5 0 0 0 - - -;
+#X obj 100 -22 > 160;
+#X text 145 -23 <-- is the direction left or right on a width of 320
 pixels;
-#X text 242 109 <-- reset;
-#X obj 147 -64 r position;
-#X connect 0 0 6 0;
+#X text 145 49 <-- reset;
+#X obj 100 -57 r position;
+#X obj 100 -3 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X connect 0 0 4 0;
 #X connect 1 0 2 0;
-#X connect 1 0 11 0;
-#X connect 2 0 6 1;
+#X connect 1 0 9 0;
+#X connect 2 0 4 1;
 #X connect 3 0 0 0;
-#X connect 3 1 7 0;
-#X connect 4 0 3 1;
-#X connect 5 0 3 1;
+#X connect 3 1 5 0;
+#X connect 4 0 1 0;
+#X connect 5 0 4 0;
 #X connect 6 0 1 0;
-#X connect 7 0 6 0;
-#X connect 8 0 1 0;
-#X connect 9 0 3 0;
-#X connect 10 0 8 0;
-#X connect 12 0 13 0;
-#X connect 13 0 14 0;
-#X connect 14 0 3 1;
-#X connect 17 0 12 0;
-#X restore 109 113 pd frame_count;
-#X obj 202 86 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+#X connect 7 0 3 0;
+#X connect 8 0 6 0;
+#X connect 10 0 11 0;
+#X connect 11 0 15 0;
+#X connect 14 0 10 0;
+#X connect 15 0 3 1;
+#X restore 109 168 pd frame_count;
+#X obj 202 141 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
 -1;
-#X text 226 85 <-- reset;
-#X obj 13 391 s position;
-#X msg 314 230 loop 1;
-#X obj 206 266 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X text 226 140 <-- reset;
+#X obj 93 433 s position;
+#X msg 314 265 loop 1;
+#X obj 206 301 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 224 62 r loopit;
-#X obj 236 264 print loopit;
-#X obj 109 56 metro 100.33;
-#X obj 71 175 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X obj 330 146 r loopit;
+#X obj 236 299 print loopit;
+#X obj 109 111 metro 100.33;
+#X obj 91 257 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X connect 0 0 31 0;
+#X text 0 0 scratch_video.pd;
+#X connect 0 0 30 0;
 #X connect 1 0 2 0;
 #X connect 2 0 7 0;
-#X connect 2 0 15 0;
-#X connect 2 0 26 0;
+#X connect 2 0 14 0;
+#X connect 2 0 25 0;
 #X connect 4 0 1 0;
-#X connect 5 0 18 0;
+#X connect 5 0 17 0;
 #X connect 5 1 3 0;
-#X connect 5 1 28 0;
+#X connect 5 1 27 0;
 #X connect 6 0 5 0;
-#X connect 15 0 16 0;
-#X connect 17 0 31 1;
-#X connect 18 0 4 0;
-#X connect 23 0 5 0;
-#X connect 24 0 23 1;
-#X connect 27 0 5 0;
-#X connect 28 0 30 0;
-#X connect 31 0 23 0;
-#X connect 32 0 5 0;
+#X connect 14 0 15 0;
+#X connect 16 0 30 1;
+#X connect 17 0 4 0;
+#X connect 22 0 5 0;
+#X connect 23 0 22 1;
+#X connect 26 0 5 0;
+#X connect 27 0 29 0;
+#X connect 30 0 22 0;
+#X connect 31 0 5 0;
diff --git a/externals/gridflow/pd_examples/spectrogram.pd b/externals/gridflow/pd_examples/spectrogram.pd
index ff9f55e7..fb6730d2 100644
--- a/externals/gridflow/pd_examples/spectrogram.pd
+++ b/externals/gridflow/pd_examples/spectrogram.pd
@@ -1,14 +1,13 @@
-#N canvas 695 85 580 565 10;
-#X msg 143 149 reset;
-#X obj 27 -34 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
+#N canvas 370 65 588 508 10;
+#X msg 147 208 reset;
+#X obj 21 50 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 297 54 adc~;
+#X obj 38 170 tabread4 array1;
+#X obj 21 69 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
 ;
-#X obj 316 -15 adc~;
-#X obj 28 110 tabread4 array1;
-#X obj 7 10 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
-;
-#X obj 351 -14 table array1 1024;
-#X obj 290 138 loadbang;
-#X obj 270 140 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X obj 332 55 table array1 1024;
+#X obj 208 212 loadbang;
+#X obj 191 214 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
 #N canvas 0 0 306 167 analysis 0;
 #X obj 24 -205 inlet~;
@@ -20,90 +19,90 @@
 #X connect 2 0 3 0;
 #X connect 2 1 3 1;
 #X connect 3 0 1 0;
-#X restore 317 8 pd analysis;
-#X obj 30 210 demux 2;
-#X obj 373 186 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
--1 1;
-#X obj 242 226 loadbang;
-#X obj 219 225 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X restore 298 77 pd analysis;
+#X obj 284 256 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
+-1 0;
+#X obj 190 291 loadbang;
+#X obj 173 293 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 27 34 for 0 320 1;
-#X obj 29 129 * 2000;
-#X text 392 187 black stripes;
-#X text 391 200 graph;
-#X obj 28 77 / 2;
-#X text 77 129 <-- adding some extra gain;
-#X obj 88 88 exp;
-#X obj 28 55 demux 2;
-#X obj 173 46 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
+#X obj 38 68 for 0 320 1;
+#X obj 38 189 * 2000;
+#X text 303 257 black stripes;
+#X text 302 270 graph;
+#X obj 38 117 / 2;
+#X text 83 189 <-- adding some extra gain;
+#X obj 81 138 exp;
+#X obj 194 136 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
 -1 0;
-#X text 195 46 linear;
-#X text 193 60 logarithmic;
-#X obj 89 67 / 51;
-#X obj 31 331 #fade;
-#X obj 123 332 loadbang;
-#X msg 72 331 16 4 1;
-#X obj 27 -9 metro 23.22;
-#X text 115 26 = 1000*1024/44100;
-#X obj 29 149 #import ( 320 );
-#X obj 29 169 # *>>8;
-#X obj 30 190 #fade 2;
-#X obj 30 249 # inv+ 255;
-#X obj 105 222 #outer <;
-#X obj 105 241 # * 255;
-#X obj 105 261 #transpose;
-#X obj 30 287 #redim (120 320 1);
-#X obj 31 309 #greyscale_to_rgb;
-#X obj 31 353 #clip;
-#X obj 31 375 #scale_by 2;
-#X obj 31 404 #out window;
-#X obj -15 449 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 216 136 linear;
+#X text 214 150 logarithmic;
+#X obj 82 117 / 51;
+#X obj 38 395 #fade;
+#X obj 130 396 loadbang;
+#X msg 79 395 16 4 1;
+#X obj 38 49 metro 23.22;
+#X text 115 117 = 1000*1024/44100;
+#X obj 38 208 #import ( 320 );
+#X obj 38 227 # *>>8;
+#X obj 38 246 #fade 2;
+#X obj 38 309 # inv+ 255;
+#X obj 113 292 #outer <;
+#X obj 113 311 # * 255;
+#X obj 113 330 #transpose;
+#X obj 38 357 #redim (120 320 1);
+#X obj 38 376 #greyscale_to_rgb;
+#X obj 38 414 #clip;
+#X obj 38 433 #scale_by 2;
+#X obj 38 452 #out window;
+#X obj 6 476 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 456 GridFlow 0.8.0;
-#X text -7 456 GridFlow 0.8.0;
-#X obj -15 -85 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
+#X text 14 483 GridFlow 0.8.0;
+#X text 14 483 GridFlow 0.8.0;
+#X obj 6 5 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text -2 -72 Copyright 2002 Mathieu Bouchard;
-#X text -2 -85 spectrogram.pd;
-#X obj 219 245 #for 120 0 -1;
-#X obj 270 161 #for 0 320 1;
-#X obj 270 184 # + 10;
-#X connect 0 0 30 0;
-#X connect 1 0 28 0;
+#X text 19 5 spectrogram.pd;
+#X obj 173 310 #for 120 0 -1;
+#X obj 191 231 #for 0 320 1;
+#X obj 191 250 # + 10;
+#X text 19 18 Copyright 2004 Mathieu Bouchard;
+#X obj 38 91 shunt 2;
+#X obj 38 265 shunt 2;
+#X connect 0 0 28 0;
+#X connect 1 0 26 0;
 #X connect 2 0 8 0;
 #X connect 2 1 8 0;
-#X connect 3 0 14 0;
-#X connect 4 0 13 0;
+#X connect 3 0 13 0;
+#X connect 4 0 12 0;
 #X connect 6 0 7 0;
-#X connect 7 0 49 0;
-#X connect 9 0 33 0;
-#X connect 9 1 34 0;
-#X connect 10 0 9 1;
-#X connect 11 0 12 0;
-#X connect 12 0 48 0;
-#X connect 13 0 20 0;
-#X connect 14 0 30 0;
-#X connect 17 0 3 0;
-#X connect 19 0 3 0;
-#X connect 20 0 17 0;
-#X connect 20 1 24 0;
-#X connect 21 0 20 1;
-#X connect 24 0 19 0;
-#X connect 25 0 39 0;
-#X connect 26 0 27 0;
-#X connect 27 0 25 1;
-#X connect 28 0 13 0;
-#X connect 30 0 31 0;
-#X connect 31 0 32 0;
-#X connect 32 0 9 0;
-#X connect 33 0 37 0;
+#X connect 7 0 46 0;
+#X connect 9 0 50 1;
+#X connect 10 0 11 0;
+#X connect 11 0 45 0;
+#X connect 12 0 49 0;
+#X connect 13 0 28 0;
+#X connect 16 0 3 0;
+#X connect 18 0 3 0;
+#X connect 19 0 49 1;
+#X connect 22 0 18 0;
+#X connect 23 0 37 0;
+#X connect 24 0 25 0;
+#X connect 25 0 23 1;
+#X connect 26 0 12 0;
+#X connect 28 0 29 0;
+#X connect 29 0 30 0;
+#X connect 30 0 50 0;
+#X connect 31 0 35 0;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
 #X connect 34 0 35 0;
 #X connect 35 0 36 0;
-#X connect 36 0 37 0;
+#X connect 36 0 23 0;
 #X connect 37 0 38 0;
-#X connect 38 0 25 0;
-#X connect 39 0 40 0;
-#X connect 40 0 41 0;
-#X connect 48 0 34 1;
-#X connect 49 0 50 0;
-#X connect 50 0 31 1;
+#X connect 38 0 39 0;
+#X connect 45 0 32 1;
+#X connect 46 0 47 0;
+#X connect 47 0 29 1;
+#X connect 49 0 16 0;
+#X connect 49 1 22 0;
+#X connect 50 0 31 0;
+#X connect 50 1 32 0;
diff --git a/externals/gridflow/pd_examples/threshold.pd b/externals/gridflow/pd_examples/threshold.pd
index 4a609930..0b90b07f 100644
--- a/externals/gridflow/pd_examples/threshold.pd
+++ b/externals/gridflow/pd_examples/threshold.pd
@@ -1,81 +1,78 @@
-#N canvas 720 79 579 617 10;
-#X obj 40 121 @ -;
-#X obj 40 144 @ max 0;
-#X obj 40 167 @ ||;
-#X obj 40 190 @ +;
-#X obj 99 143 inv+ 0;
-#X obj 40 -33 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+#N canvas 660 79 581 531 10;
+#X obj 72 208 inv+ 0;
+#X obj 40 8 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 99 57 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X obj 95 56 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
-;
-#X floatatom 251 270 5 0 0 0 - - -;
-#X obj 251 137 vsl 15 128 0 256 0 0 empty empty empty 0 -8 0 8 -260818
+#X floatatom 124 224 5 0 0 0 - - -;
+#X obj 124 91 vsl 15 128 0 256 0 0 empty empty empty 0 -8 0 8 -260818
 -1 -1 0 1;
-#X obj 40 55 shunt 2;
-#X obj 40 448 @out window;
-#X text 6 100 simple per-channel threshold;
-#X text 316 102 bluescreen luma threshold;
-#X text 381 255 here we have a mask;
-#X text 361 267 (alpha as separate image);
-#X obj 327 356 @join 2;
-#X text 386 295 make a RGBA image;
-#X obj 310 137 t b a a;
-#X text 218 398 = medium blue;
-#X obj 297 290 t a a;
-#X obj 131 449 fps;
-#X floatatom 161 451 5 0 0 0 - - -;
-#X obj 40 9 metro 100;
-#X msg 70 397 240 320 3 # 0 0 170;
-#X text 386 333 won't be necessary;
-#X text 319 117 with alpha channel;
-#X text 13 368 you could also load a picture;
-#X text 13 380 instead of using uniform blue;
-#X text 58 -31 1000/100 = 10 fps (max) (adjustable);
-#X text 281 22 see also color_detect.pd;
-#X obj 40 33 #camera;
-#X obj -13 -86 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
+#X obj 40 67 shunt 2;
+#X text 7 104 simple per-channel threshold;
+#X text 276 53 bluescreen luma threshold;
+#X text 340 195 here we have a mask;
+#X text 320 207 (alpha as separate image);
+#X obj 257 278 @join 2;
+#X text 346 226 make a RGBA image;
+#X obj 270 88 t b a a;
+#X text 210 379 = medium blue;
+#X obj 257 221 t a a;
+#X obj 121 416 fps;
+#X floatatom 146 418 5 0 0 0 - - -;
+#X obj 40 29 metro 100;
+#X msg 70 378 240 320 3 # 0 0 170;
+#X text 279 68 with alpha channel;
+#X text 13 349 you could also load a picture;
+#X text 13 361 instead of using uniform blue;
+#X text 58 10 1000/100 = 10 fps (max) (adjustable);
+#X obj 40 48 #camera;
+#X obj -13 -45 cnv 15 580 30 empty empty empty 20 12 0 14 -233017 -66577
 0;
-#X text 0 -73 Copyright 2002 Mathieu Bouchard;
-#X obj -15 499 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
+#X text 0 -32 Copyright 2002 Mathieu Bouchard;
+#X obj -15 450 cnv 15 580 30 empty empty empty 20 12 0 14 -200249 -66577
 0;
-#X text -7 506 GridFlow 0.8.0;
-#X text -7 506 GridFlow 0.8.0;
-#X text 0 -86 threshold.pd;
-#X obj 290 335 #store;
-#X obj 290 314 #finished;
-#X obj 354 204 # * 255;
-#X obj 354 181 # >=;
-#X obj 354 162 #rgb_to_greyscale;
-#X text 384 320 this silly #finished;
-#X text 388 347 in GridFlow 1;
-#X obj 70 425 #draw_image put \, alpha 1;
-#X connect 0 0 1 0;
-#X connect 1 0 2 0;
-#X connect 2 0 3 0;
-#X connect 3 0 10 0;
-#X connect 4 0 2 1;
-#X connect 5 0 22 0;
-#X connect 6 0 9 1;
-#X connect 7 0 0 1;
-#X connect 7 0 4 0;
-#X connect 7 0 3 1;
-#X connect 7 0 40 1;
-#X connect 8 0 7 0;
-#X connect 9 0 0 0;
-#X connect 9 1 17 0;
-#X connect 10 0 20 0;
+#X text -7 457 GridFlow 0.8.0;
+#X text -7 457 GridFlow 0.8.0;
+#X text 0 -45 threshold.pd;
+#X obj 257 259 #store;
+#X obj 257 240 #finished;
+#X obj 314 145 # * 255;
+#X obj 314 126 # >=;
+#X obj 314 107 #rgb_to_greyscale;
+#X obj 70 397 #draw_image put \, alpha 1;
+#X obj 40 166 # -;
+#X obj 40 185 # max 0;
+#X obj 40 208 # ||;
+#X obj 40 227 # +;
+#X obj 40 416 #out window;
+#X text 387 -38 see also color_detect.pd;
+#X connect 0 0 38 1;
+#X connect 1 0 17 0;
+#X connect 2 0 5 1;
+#X connect 3 0 0 0;
+#X connect 3 0 33 1;
+#X connect 3 0 36 1;
+#X connect 3 0 39 1;
+#X connect 4 0 3 0;
+#X connect 5 0 36 0;
+#X connect 5 1 12 0;
+#X connect 10 0 35 1;
+#X connect 12 0 18 0;
+#X connect 12 1 14 0;
+#X connect 12 2 34 0;
+#X connect 14 0 31 0;
+#X connect 14 1 30 1;
+#X connect 15 0 16 0;
 #X connect 17 0 23 0;
-#X connect 17 1 19 0;
-#X connect 17 2 41 0;
-#X connect 19 0 38 0;
-#X connect 19 1 37 1;
-#X connect 20 0 21 0;
-#X connect 22 0 30 0;
-#X connect 23 0 44 0;
-#X connect 30 0 9 0;
-#X connect 37 0 15 0;
-#X connect 38 0 37 0;
-#X connect 39 0 15 1;
-#X connect 40 0 39 0;
-#X connect 41 0 40 0;
-#X connect 44 0 10 0;
+#X connect 18 0 35 0;
+#X connect 23 0 5 0;
+#X connect 30 0 10 0;
+#X connect 31 0 30 0;
+#X connect 32 0 10 1;
+#X connect 33 0 32 0;
+#X connect 34 0 33 0;
+#X connect 35 0 40 0;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 38 0 39 0;
+#X connect 39 0 40 0;
+#X connect 40 0 15 0;
diff --git a/externals/gridflow/pd_examples/transform.pd b/externals/gridflow/pd_examples/transform.pd
index a4d5b653..d8785933 100644
--- a/externals/gridflow/pd_examples/transform.pd
+++ b/externals/gridflow/pd_examples/transform.pd
@@ -1,21 +1,21 @@
 #N canvas 726 225 674 481 10;
-#X obj 146 296 #remap_image;
-#X obj 146 381 #out window;
-#X obj 125 94 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
+#X obj 136 286 #remap_image;
+#X obj 136 324 #out window;
+#X obj 125 103 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1
 ;
 #X obj 294 376 # -;
 #X obj 294 202 t a a a;
-#X obj 380 273 # % 2;
-#X obj 380 297 # * -2;
-#X obj 380 318 # + 1;
-#X obj 316 342 # *;
-#X obj 425 245 # / 2;
-#X obj 428 184 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -261681
--1 -1 12700 1;
-#X obj 316 301 # -;
-#X obj 425 207 t f;
+#X obj 356 261 # % 2;
+#X obj 356 280 # * -2;
+#X obj 356 299 # + 1;
+#X obj 316 300 # *;
+#X obj 403 230 # / 2;
+#X obj 377 167 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -261681
+-1 -1 0 1;
+#X obj 316 281 # -;
+#X obj 374 190 t f;
 #X obj 316 262 # %;
-#X obj 380 248 # /;
+#X obj 356 242 # /;
 #X obj 186 214 #camera;
 #X obj 125 120 metro 10;
 #X obj 8 442 cnv 15 720 30 empty empty empty 20 12 0 14 -200249 -66577
@@ -27,13 +27,13 @@
 0;
 #X text 4 -2 Transform.pd;
 #X obj 95 215 #in r001.jpg;
-#X obj 125 155 shunt;
-#X obj 176 155 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+#X obj 125 139 shunt;
+#X obj 164 140 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
 #X text 68 32 By Mathieu Bouchard \, based on Clifford Smith's 'Transform'
 effect that is part of Fukuchi Kentaro's EffecTV : http://effectv.sourceforge.net
 ;
-#X text 199 153 <-- choose from a still image or camera input;
+#X text 187 138 <-- choose from a still image or camera input;
 #X connect 0 0 1 0;
 #X connect 0 1 4 0;
 #X connect 2 0 16 0;
diff --git a/externals/gridflow/pd_examples/videodev_effects.pd b/externals/gridflow/pd_examples/videodev_effects.pd
index b11f026f..36782931 100644
--- a/externals/gridflow/pd_examples/videodev_effects.pd
+++ b/externals/gridflow/pd_examples/videodev_effects.pd
@@ -1,7 +1,7 @@
-#N canvas 106 79 569 546 10;
-#X obj 86 397 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+#N canvas 522 50 597 660 10;
+#X obj 85 386 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X obj 72 149 # max 0;
+#X obj 71 138 # max 0;
 #N canvas 52 305 399 248 motion 0;
 #X obj 60 49 inlet;
 #X obj 60 72 # +;
@@ -21,24 +21,25 @@
 #X connect 4 1 9 0;
 #X connect 8 0 4 0;
 #X connect 9 0 1 1;
-#X restore 130 218 pd motion fade;
-#X obj 28 263 shunt 2;
-#X obj 72 69 #downscale_by 2 smoothly;
-#X obj 28 398 shunt 2;
-#X obj 82 265 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X restore 129 207 pd motion fade;
+#X obj 27 252 shunt 2;
+#X obj 71 58 #downscale_by 2 smoothly;
+#X obj 27 387 shunt 2;
+#X obj 81 254 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X obj 87 88 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X obj 86 77 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X obj 8 7 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1;
-#X obj 316 261 fork;
-#X obj 28 48 shunt 2;
-#X msg 286 243 256;
-#X obj 28 474 #out window;
-#X obj 84 49 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X obj 26 -36 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1
 ;
-#X obj 28 515 print;
-#X obj 285 284 #for 0 256 1;
-#X floatatom 316 242 5 0 0 0 - - -;
+#X obj 315 250 fork;
+#X obj 27 37 shunt 2;
+#X msg 285 232 256;
+#X obj 27 463 #out window;
+#X obj 83 38 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+;
+#X obj 27 504 print;
+#X obj 284 273 #for 0 256 1;
+#X floatatom 315 231 5 0 0 0 - - -;
 #N canvas 67 462 236 230 detect 0;
 #X obj 66 59 # * ( -1 -1 2 );
 #X obj 66 171 # max 0;
@@ -53,19 +54,19 @@
 #X connect 3 0 5 0;
 #X connect 4 0 3 0;
 #X connect 6 0 1 0;
-#X restore 437 236 pd detect blue;
-#X obj 72 285 #outer ignore ( 0 );
-#X obj 103 131 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
--1 -1 5700 1;
-#X obj 28 189 shunt 2;
-#X obj 170 335 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+#X restore 436 225 pd detect blue;
+#X obj 71 274 #outer ignore ( 0 );
+#X obj 102 120 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 27 178 shunt 2;
+#X obj 169 324 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
 1;
-#X obj 28 335 shunt 2;
-#X obj 28 495 fps detailed;
-#X obj 286 223 loadbang;
-#X obj 87 335 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X obj 27 324 shunt 2;
+#X obj 27 484 fps detailed;
+#X obj 285 212 loadbang;
+#X obj 86 324 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X obj 72 307 #store;
+#X obj 71 296 #store;
 #N canvas 81 205 480 500 sort 0;
 #X obj 10 305 # * ( 1 0 );
 #X obj 180 260 # * 255;
@@ -142,13 +143,13 @@
 #X connect 30 0 7 1;
 #X connect 31 0 27 0;
 #X connect 31 0 30 0;
-#X restore 87 355 pd sort me out;
-#X obj 285 304 # gamma;
-#X obj 72 129 # -;
-#X obj 82 191 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+#X restore 86 344 pd sort me out;
+#X obj 284 293 # gamma;
+#X obj 71 118 # -;
+#X obj 81 180 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
 ;
-#X text 74 238 enable gamma correction;
-#X obj 285 266 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X text 73 227 enable gamma correction;
+#X obj 284 255 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
 -1;
 #N canvas 372 198 399 273 motion 0;
 #X obj 15 113 # << 2;
@@ -180,10 +181,10 @@
 #X connect 11 0 10 1;
 #X connect 12 0 13 1;
 #X connect 13 0 3 1;
-#X restore 72 109 pd motion detection;
-#X obj 105 335 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -262144 -1
+#X restore 71 98 pd motion detection;
+#X obj 104 324 hradio 15 1 0 4 empty empty empty 0 -6 0 8 -241291 -1
 -1 0;
-#X text 126 149 noise reduction (on find-edges only);
+#X text 125 138 noise reduction (on find-edges only);
 #N canvas 67 462 236 230 detect 0;
 #X obj 66 171 # max 0;
 #X obj 66 31 inlet;
@@ -198,18 +199,18 @@
 #X connect 3 0 2 0;
 #X connect 5 0 0 0;
 #X connect 6 0 5 0;
-#X restore 437 217 pd detect red;
-#X obj 27 8 metro 33.3667;
-#X obj 28 69 t a a;
-#X text 101 49 Smaller Picture;
-#X obj 28 89 shunt 2;
-#X obj 211 96 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -1
+#X restore 436 206 pd detect red;
+#X obj 26 -8 metro 33.3667;
+#X obj 27 58 t a a;
+#X text 100 38 Smaller Picture;
+#X obj 27 78 shunt 2;
+#X obj 210 85 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
 -1 0;
-#X obj 163 427 #centroid;
-#X obj 163 448 #export_list;
-#X floatatom 165 487 5 0 0 0 - - -;
-#X obj 164 467 unpack 0 0;
-#X floatatom 229 487 5 0 0 0 - - -;
+#X obj 162 416 #centroid;
+#X obj 162 437 #export_list;
+#X floatatom 164 476 5 0 0 0 - - -;
+#X obj 163 456 unpack 0 0;
+#X floatatom 228 476 5 0 0 0 - - -;
 #N canvas 639 147 477 267 crosshair 0;
 #X obj 12 224 outlet;
 #X obj 12 9 inlet;
@@ -230,22 +231,31 @@
 #X connect 6 0 8 0;
 #X connect 7 0 6 0;
 #X connect 8 0 4 0;
-#X restore 72 428 pd crosshair;
-#X msg 128 8 open dc1394;
-#X msg 217 9 open mpeg file images/movies/washington_zoom_in.mpeg;
-#X msg 217 29 open xine images/movies/washington_zoom_in.mpeg;
-#X obj 28 27 #camera;
-#X obj 186 30 #in;
-#X obj 104 192 #fade;
-#X msg 145 194 32 16 4;
-#X obj 28 450 t a;
-#X text 231 110 emboss;
-#X text 230 96 hilite;
-#X text 110 397 designed to work with "hilite" above;
-#X obj 281 96 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -1
+#X restore 71 417 pd crosshair;
+#X msg 127 -9 open dc1394;
+#X msg 216 -8 open mpeg file images/movies/washington_zoom_in.mpeg
+;
+#X msg 216 12 open xine images/movies/washington_zoom_in.mpeg;
+#X obj 27 16 #camera;
+#X obj 185 13 #in;
+#X obj 103 181 #fade;
+#X msg 144 181 32 16 4;
+#X obj 27 439 t a;
+#X text 230 99 emboss;
+#X text 229 85 hilite;
+#X text 109 386 designed to work with "hilite" above;
+#X obj 280 85 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -241291 -1
 -1 0;
-#X text 300 96 motion;
-#X text 301 110 presence;
+#X text 299 85 motion;
+#X text 300 99 presence;
+#X obj -15 542 cnv 15 620 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text -7 550 GridFlow 0.8.0;
+#X text -7 550 GridFlow 0.8.0;
+#X obj -13 -85 cnv 15 620 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X text 0 -72 Copyright 2002 Mathieu Bouchard;
+#X text 0 -86 videodev_effects.pd;
 #X connect 0 0 5 1;
 #X connect 1 0 20 0;
 #X connect 2 0 3 0;
diff --git a/externals/gridflow/pd_examples/waves.pd b/externals/gridflow/pd_examples/waves.pd
index c9706ca4..14dd10e5 100644
--- a/externals/gridflow/pd_examples/waves.pd
+++ b/externals/gridflow/pd_examples/waves.pd
@@ -1,10 +1,8 @@
-#N canvas 366 97 753 590 10;
-#X obj 265 207 #greyscale_to_rgb;
-#X obj 251 350 # min 255;
-#X obj 271 5 loadbang;
-#X obj 211 25 fork;
-#X obj 251 389 #out x11;
-#X obj 313 409 print;
+#N canvas 461 0 783 699 10;
+#X obj 245 341 #greyscale_to_rgb;
+#X obj 167 66 loadbang;
+#X obj 107 85 fork;
+#X obj 241 497 print;
 #N canvas 23 304 369 368 mouse 0;
 #X text 109 189 coordinates;
 #X obj 56 189 outlet;
@@ -29,42 +27,41 @@
 #X connect 11 0 3 0;
 #X connect 11 1 12 0;
 #X connect 12 0 6 0;
-#X restore 251 428 pd mouse click/drag;
-#X obj 12 39 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
-;
-#N canvas 637 335 419 287 lighting 0;
-#X obj 56 243 outlet;
+#X restore 235 516 pd mouse click/drag;
+#X obj 10 49 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#N canvas 637 335 413 236 lighting 0;
+#X obj 56 203 outlet;
 #X obj 17 9 inlet;
-#X obj 86 138 #outer & ( -1 0 0 );
-#X text 91 100 produce red/cyan from horiz differences;
-#X text 64 160 produce white/black from vertical differences;
-#X obj 56 199 #outer & ( -1 -1 0 );
-#X obj 56 222 # +;
+#X text 91 65 produce red/cyan from horiz differences;
+#X text 64 123 produce white/black from vertical differences;
+#X obj 56 177 # +;
 #X obj 108 10 #dim;
 #X obj 140 10 #export_list;
-#X obj 56 29 #redim ( );
 #X obj 56 9 t a a;
 #X obj 56 49 t a a;
 #X msg 141 30 \$1 \$2;
-#X obj 86 117 #convolve ( 1 2 # ) \, op ignore \, fold inv+;
-#X obj 56 177 #convolve ( 2 1 # ) \, op ignore \, fold inv+;
-#X connect 1 0 10 0;
-#X connect 2 0 6 1;
+#X obj 56 29 #redim ();
+#X obj 86 82 #convolve (1 2 #) \, op ignore \, fold inv+;
+#X obj 86 101 #outer & (-1 0 0);
+#X obj 56 139 #convolve (2 1 #) \, op ignore \, fold inv+;
+#X obj 56 158 #outer & (-1 -1 0);
+#X connect 1 0 7 0;
+#X connect 4 0 0 0;
 #X connect 5 0 6 0;
-#X connect 6 0 0 0;
-#X connect 7 0 8 0;
-#X connect 8 0 12 0;
-#X connect 9 0 11 0;
-#X connect 10 0 9 0;
-#X connect 10 1 7 0;
-#X connect 11 0 14 0;
-#X connect 11 1 13 0;
-#X connect 12 0 9 1;
-#X connect 13 0 2 0;
-#X connect 14 0 5 0;
-#X restore 216 242 pd lighting;
-#X obj 251 447 # / 2;
-#X msg 138 46 \$1 \$2 1 # 0;
+#X connect 6 0 9 0;
+#X connect 7 0 10 0;
+#X connect 7 1 5 0;
+#X connect 8 0 13 0;
+#X connect 8 1 11 0;
+#X connect 9 0 10 1;
+#X connect 10 0 8 0;
+#X connect 11 0 12 0;
+#X connect 12 0 4 1;
+#X connect 13 0 14 0;
+#X connect 14 0 4 0;
+#X restore 235 362 pd lighting;
+#X obj 235 535 # / 2;
+#X msg 107 104 \$1 \$2 1 # 0;
 #N canvas 137 251 392 303 finger 0;
 #X obj 149 39 #redim ( 4 2 );
 #X obj 71 16 inlet;
@@ -87,11 +84,10 @@
 #X connect 7 0 5 1;
 #X connect 9 0 6 0;
 #X connect 10 0 3 0;
-#X restore 292 519 pd finger;
-#X obj 245 25 s size;
-#X obj 251 370 #scale_by 2;
-#X obj 80 142 #store;
-#X obj 312 389 fps detailed;
+#X restore 206 634 pd finger;
+#X obj 141 85 s size;
+#X obj 235 438 #scale_by 2;
+#X obj 10 168 #store;
 #N canvas 53 323 453 223 wave 0;
 #X obj 26 20 inlet;
 #X obj 28 182 outlet;
@@ -103,7 +99,7 @@
 #X obj 28 158 # *>>8 242;
 #X text 105 159 amortizing by ~5.5%;
 #X obj 24 46 t a a;
-#X obj 54 81 #convolve ( 3 3 # 1 4 1 4 0 4 ) \, seed 8;
+#X obj 54 81 #convolve (3 3 # 1 4 1 4 0 4) \, seed 8;
 #X connect 0 0 9 0;
 #X connect 5 0 7 0;
 #X connect 6 0 5 0;
@@ -111,38 +107,33 @@
 #X connect 9 0 5 1;
 #X connect 9 1 10 0;
 #X connect 10 0 6 0;
-#X restore 80 203 pd wave equation;
-#X obj 249 515 t a;
-#X obj 117 122 t a;
-#X obj 251 330 # max 0;
-#X obj 265 188 # >> 1;
-#X obj 31 63 s metro;
-#X msg 211 5 240 320;
-#X text 441 19 Copyright (c) 2003 \, 2004 by Mathieu Bouchard;
-#X text 481 72 (Best complemented with a touchscreen);
-#X text 441 2 waves.pd;
-#X obj 376 141 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -262144 -258699
--1 2;
-#X text 395 155 height greys;
-#X obj 298 103 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -258699
+#X restore 10 206 pd wave equation;
+#X obj 162 634 t a;
+#X obj 107 123 t a;
+#X obj 245 317 # >> 1;
+#X obj 36 85 s metro;
+#X msg 107 66 240 320;
+#X text 491 65 (Best complemented with a touchscreen);
+#X obj 341 244 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -262144 -258699
+-1 0;
+#X text 359 259 height greys;
+#X obj 294 205 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -258699
 -1 0;
-#X text 317 102 plain;
-#X text 318 118 line-art;
-#X text 315 46 smooth;
-#X obj 296 46 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -258699
+#X text 312 204 plain;
+#X text 312 220 line-art;
+#X text 309 153 smooth;
+#X obj 292 153 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -258699
 -1 0;
-#X text 316 60 raw;
-#X obj 443 379 hradio 18 1 1 4 empty empty _1__2__3__4_ 0 -4 0 8 -262144
--258699 -1 1;
-#X text 441 354 scale by...;
-#X obj 443 400 + 1;
-#X obj 664 129 loadbang;
-#X obj 557 331 #in;
-#X obj 584 305 #camera_control;
-#X obj 558 284 spigot;
-#X obj 605 285 tgl 15 0 empty empty empty 18 8 0 8 -241291 -1 -62784
-1 1;
-#X obj 558 264 r metro;
+#X text 310 167 raw;
+#X obj 417 503 hradio 18 1 1 4 empty empty _1__2__3__4_ 0 -4 0 8 -262144
+-258699 -1 0;
+#X text 415 482 scale by...;
+#X obj 417 523 + 1;
+#X obj 573 105 loadbang;
+#X obj 573 276 spigot;
+#X obj 620 277 tgl 15 0 empty empty empty 18 8 0 8 -241291 -1 -62784
+0 1;
+#X obj 573 256 r metro;
 #N canvas 242 284 365 231 line-art 0;
 #X obj 32 123 # << 8;
 #X obj 32 37 inlet;
@@ -159,181 +150,211 @@
 #X connect 5 0 6 0;
 #X connect 6 0 0 0;
 #X connect 7 0 5 0;
-#X restore 283 142 pd line-art;
-#X text 560 214 Background colour;
-#X text 625 285 enable video;
-#X msg 584 325 open r001.jpg \, bang;
-#X text 394 141 four-colour emboss;
-#X obj 142 402 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1
+#X restore 260 243 pd line-art;
+#X text 628 129 Background colour;
+#X text 637 277 enable video;
+#X text 357 244 four-colour emboss;
+#X obj 325 562 tgl 15 1 empty empty empty 0 -6 0 8 -241291 -1 -1 1
 1;
-#X obj 88 377 r metro;
-#X obj 88 441 @! rand;
-#X msg 87 421 240 320;
-#X text 160 399 rain;
-#X text 558 3 bundled with GridFlow 0.7.7;
-#X obj 240 100 # >> 2;
-#X text 378 36 Originally made for Alexandre Castonguay's "DIGITALE"
+#X obj 278 542 r metro;
+#X text 342 561 rain;
+#X obj 235 204 # >> 2;
+#X text 388 36 Originally made for Alexandre Castonguay's "DIGITALE"
 ;
-#X text 495 53 But suitable for a lot more uses :-);
-#X msg 599 129 3 # 128;
-#X obj 557 154 #color;
-#X obj 239 121 shunt 2;
-#X obj 239 59 shunt 2;
-#X obj 403 486 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
+#X text 505 50 But suitable for a lot more uses :-);
+#X msg 573 124 3 # 128;
+#X obj 573 143 #color;
+#X obj 235 223 shunt 2;
+#X obj 235 166 shunt 2;
+#X obj 349 618 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
 -262131 -1 -1 2 256;
-#X obj 403 503 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
+#X obj 349 632 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
 -262131 -1 -1 2 256;
-#X obj 359 519 #pack 2;
-#X obj 216 291 # +;
-#X obj 332 302 #store;
-#X obj 421 236 shunt 2;
-#X obj 477 232 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -258699
+#X obj 235 400 # +;
+#X obj 372 449 #store;
+#X obj 396 381 shunt 2;
+#X obj 452 376 vradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -258699
 -1 0;
-#X text 495 230 plain;
-#X text 495 248 refraction;
-#X obj 216 263 t a;
+#X text 470 375 plain;
+#X text 470 392 refraction;
+#X obj 235 381 t a;
 #N canvas 203 363 443 300 heightmap2indexmap 0;
-#X obj 48 279 outlet;
+#X obj 48 220 outlet;
 #X obj 9 8 inlet;
-#X obj 48 159 # +;
+#X obj 48 143 # +;
 #X obj 100 9 #dim;
 #X obj 132 9 #export_list;
-#X obj 48 28 #redim ( );
 #X obj 48 8 t a a;
 #X obj 48 48 t a a;
-#X msg 133 29 \$1 \$2;
-#X obj 78 92 #outer & ( -1 0 );
-#X obj 48 137 #outer & ( 0 -1 );
-#X obj 48 251 # +;
-#X obj 73 251 #for ( 0 0 ) ( 240 320 ) ( 1 1 );
-#X obj 116 229 loadbang;
-#X obj 84 229 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+#X msg 132 28 \$1 \$2;
+#X obj 48 201 # +;
+#X obj 90 181 loadbang;
+#X obj 73 181 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
-#X obj 48 182 # >> 1;
-#X obj 48 115 #convolve ( 2 1 # ) \, op ignore \, fold inv+;
-#X obj 78 71 #convolve ( 1 2 # ) \, op ignore \, fold inv+;
-#X connect 1 0 6 0;
-#X connect 2 0 15 0;
+#X obj 48 162 # >> 1;
+#X obj 78 67 #convolve (1 2 #) \, op ignore \, fold inv+;
+#X obj 78 86 #outer & (-1 0);
+#X obj 48 105 #convolve (2 1 #) \, op ignore \, fold inv+;
+#X obj 48 124 #outer & (0 -1);
+#X obj 73 201 #for (0 0) (240 320) (1 1);
+#X obj 48 28 #redim ();
+#X connect 1 0 5 0;
+#X connect 2 0 11 0;
 #X connect 3 0 4 0;
-#X connect 4 0 8 0;
-#X connect 5 0 7 0;
-#X connect 6 0 5 0;
-#X connect 6 1 3 0;
-#X connect 7 0 16 0;
-#X connect 7 1 17 0;
-#X connect 8 0 5 1;
-#X connect 9 0 2 1;
-#X connect 10 0 2 0;
-#X connect 11 0 0 0;
-#X connect 12 0 11 1;
-#X connect 13 0 12 0;
-#X connect 14 0 12 0;
-#X connect 15 0 11 0;
-#X connect 16 0 10 0;
-#X connect 17 0 9 0;
-#X restore 332 281 pd heightmap2indexmap;
-#X obj 11 63 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+#X connect 4 0 7 0;
+#X connect 5 0 17 0;
+#X connect 5 1 3 0;
+#X connect 6 0 14 0;
+#X connect 6 1 12 0;
+#X connect 7 0 17 1;
+#X connect 8 0 0 0;
+#X connect 9 0 16 0;
+#X connect 10 0 16 0;
+#X connect 11 0 8 0;
+#X connect 12 0 13 0;
+#X connect 13 0 2 1;
+#X connect 14 0 15 0;
+#X connect 15 0 2 0;
+#X connect 16 0 8 1;
+#X connect 17 0 6 0;
+#X restore 372 430 pd heightmap2indexmap;
+#X obj -8 82 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 372 411 spigot;
+#X text 359 274 no reflection;
+#X obj 235 286 shunt 3;
+#X obj 235 243 t a;
+#X obj 293 317 # put 0;
+#X obj 162 615 shunt 2;
+#X obj 206 596 shunt 2;
+#X obj 10 66 metro 33.3667;
+#X obj 10 187 shunt 2;
+#X text 80 188 freeze time;
+#X obj 63 188 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0 1
+;
+#X obj 132 123 r feedback;
+#X obj 162 653 s feedback;
+#X obj 10 226 t a;
+#X obj -13 5 cnv 15 780 30 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj -15 671 cnv 15 780 30 empty empty empty 20 12 0 14 -200249 -66577
+0;
+#X text -7 679 GridFlow 0.8.0;
+#X text -7 679 GridFlow 0.8.0;
+#X text 0 4 waves.pd;
+#X obj 573 296 #camera;
+#X obj 555 276 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
 -1;
-#X obj 332 228 spigot;
-#X text 397 170 no reflection;
-#X obj 239 167 shunt 3;
-#X obj 239 145 t a;
-#X obj 313 188 # put 0;
-#X obj 255 491 shunt 2;
-#X obj 325 493 shunt 2;
-#X obj 87 401 shunt 2;
-#X obj 31 39 metro 33.3667;
-#X obj 80 171 shunt 2;
-#X text 154 173 freeze time;
-#X obj 137 173 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 0
-1;
-#X obj 131 100 r feedback;
-#X obj 229 543 s feedback;
-#X obj 124 264 t a;
-#X obj 239 80 #convolve ( 2 2 # ) \, op ignore;
-#X obj 571 403 #yuv_to_rgb;
-#X text 500 501 pas de reflection \, + yuv;
-#X connect 0 0 70 0;
-#X connect 1 0 13 0;
-#X connect 2 0 22 0;
-#X connect 3 0 10 0;
-#X connect 3 1 12 0;
-#X connect 4 0 15 0;
-#X connect 4 0 6 0;
-#X connect 6 0 9 0;
-#X connect 6 1 79 0;
-#X connect 7 0 81 0;
-#X connect 8 0 70 0;
-#X connect 9 0 11 1;
-#X connect 10 0 18 0;
-#X connect 11 0 17 0;
-#X connect 13 0 4 0;
-#X connect 14 0 82 0;
-#X connect 15 0 5 0;
-#X connect 16 0 87 0;
-#X connect 17 0 86 0;
-#X connect 18 0 14 1;
-#X connect 18 0 60 0;
-#X connect 19 0 1 0;
-#X connect 20 0 0 0;
-#X connect 22 0 3 0;
-#X connect 26 0 75 1;
-#X connect 28 0 59 1;
-#X connect 32 0 60 1;
-#X connect 34 0 36 0;
-#X connect 36 0 9 1;
-#X connect 36 0 13 1;
-#X connect 37 0 57 0;
-#X connect 38 0 89 0;
-#X connect 39 0 38 0;
-#X connect 40 0 38 0;
-#X connect 41 0 40 1;
-#X connect 42 0 40 0;
-#X connect 43 0 76 0;
-#X connect 46 0 38 0;
-#X connect 48 0 78 1;
-#X connect 48 0 79 1;
-#X connect 48 0 80 1;
-#X connect 49 0 80 0;
-#X connect 50 0 11 1;
-#X connect 51 0 50 0;
-#X connect 54 0 59 0;
-#X connect 57 0 58 0;
-#X connect 58 0 66 0;
-#X connect 59 0 76 0;
-#X connect 59 1 43 0;
-#X connect 60 0 88 0;
-#X connect 60 1 59 0;
-#X connect 61 0 63 0;
-#X connect 62 0 63 1;
-#X connect 63 0 11 2;
-#X connect 64 0 19 0;
-#X connect 65 0 64 1;
-#X connect 66 0 64 1;
-#X connect 66 1 65 1;
-#X connect 67 0 66 1;
-#X connect 67 0 73 1;
-#X connect 70 0 64 0;
-#X connect 71 0 65 0;
-#X connect 72 0 21 0;
-#X connect 72 0 14 0;
-#X connect 73 0 71 0;
-#X connect 75 0 8 0;
-#X connect 75 1 20 0;
-#X connect 75 2 77 0;
-#X connect 76 0 75 0;
-#X connect 76 0 73 0;
-#X connect 77 0 0 0;
-#X connect 78 0 17 0;
-#X connect 78 1 11 0;
-#X connect 79 0 78 1;
-#X connect 80 1 51 0;
-#X connect 81 0 14 0;
-#X connect 81 0 21 0;
-#X connect 82 0 16 0;
-#X connect 82 1 87 0;
-#X connect 84 0 82 1;
-#X connect 85 0 18 0;
-#X connect 87 0 78 0;
-#X connect 88 0 54 0;
-#X connect 89 0 77 1;
+#X obj 573 315 spigot;
+#X obj 620 316 tgl 15 0 empty empty empty 18 8 0 8 -241291 -1 -62784
+0 1;
+#X text 637 315 test camera output;
+#X obj 10 85 t b;
+#X obj 278 561 spigot;
+#X obj 620 334 sel 0 1;
+#X msg 642 353 open window;
+#X obj 573 334 #out;
+#X msg 620 372 close;
+#X obj 241 478 fps detailed \, period 2;
+#X obj 574 226 #in;
+#X msg 574 207 load r001.jpg;
+#X obj 324 580 r size;
+#X obj 278 580 #store;
+#X obj 278 599 # rand;
+#X obj 235 457 #out window;
+#X obj 235 419 #clip;
+#X obj 235 185 #convolve (2 2 #) \, op ignore;
+#X obj 349 651 #pack 2;
+#X text 0 18 Copyright 2003 \, 2004 \, 2005 Mathieu Bouchard;
+#X connect 0 0 57 0;
+#X connect 1 0 18 0;
+#X connect 2 0 8 0;
+#X connect 2 1 10 0;
+#X connect 4 0 7 0;
+#X connect 4 1 66 0;
+#X connect 5 0 67 0;
+#X connect 6 0 57 0;
+#X connect 7 0 9 1;
+#X connect 8 0 15 0;
+#X connect 9 0 14 0;
+#X connect 11 0 96 0;
+#X connect 12 0 68 0;
+#X connect 13 0 73 0;
+#X connect 14 0 72 0;
+#X connect 15 0 12 1;
+#X connect 15 0 48 0;
+#X connect 16 0 0 0;
+#X connect 18 0 2 0;
+#X connect 20 0 62 1;
+#X connect 22 0 47 1;
+#X connect 26 0 48 1;
+#X connect 28 0 30 0;
+#X connect 30 0 7 1;
+#X connect 30 0 11 1;
+#X connect 31 0 45 0;
+#X connect 32 0 79 0;
+#X connect 33 0 32 1;
+#X connect 34 0 32 0;
+#X connect 35 0 63 0;
+#X connect 39 0 65 1;
+#X connect 39 0 66 1;
+#X connect 39 0 85 1;
+#X connect 40 0 85 0;
+#X connect 42 0 47 0;
+#X connect 45 0 46 0;
+#X connect 46 0 53 0;
+#X connect 47 0 63 0;
+#X connect 47 1 35 0;
+#X connect 48 0 98 0;
+#X connect 48 1 47 0;
+#X connect 49 0 99 0;
+#X connect 50 0 99 1;
+#X connect 51 0 97 0;
+#X connect 52 0 51 1;
+#X connect 53 0 51 1;
+#X connect 53 1 52 1;
+#X connect 54 0 53 1;
+#X connect 54 0 60 1;
+#X connect 57 0 51 0;
+#X connect 58 0 52 0;
+#X connect 59 0 84 0;
+#X connect 60 0 58 0;
+#X connect 62 0 6 0;
+#X connect 62 1 16 0;
+#X connect 62 2 64 0;
+#X connect 63 0 62 0;
+#X connect 63 0 60 0;
+#X connect 64 0 0 0;
+#X connect 65 0 14 0;
+#X connect 65 1 9 0;
+#X connect 66 0 65 1;
+#X connect 67 0 84 0;
+#X connect 68 0 13 0;
+#X connect 68 1 73 0;
+#X connect 70 0 68 1;
+#X connect 71 0 15 0;
+#X connect 73 0 65 0;
+#X connect 79 0 53 0;
+#X connect 79 0 81 0;
+#X connect 80 0 79 0;
+#X connect 81 0 88 0;
+#X connect 82 0 81 1;
+#X connect 82 0 86 0;
+#X connect 84 0 17 0;
+#X connect 84 0 12 0;
+#X connect 85 0 94 0;
+#X connect 86 0 89 0;
+#X connect 86 1 87 0;
+#X connect 87 0 88 0;
+#X connect 89 0 88 0;
+#X connect 90 0 3 0;
+#X connect 91 0 53 1;
+#X connect 92 0 91 0;
+#X connect 93 0 94 1;
+#X connect 94 0 95 0;
+#X connect 95 0 9 1;
+#X connect 96 0 4 0;
+#X connect 96 0 90 0;
+#X connect 97 0 11 0;
+#X connect 98 0 42 0;
+#X connect 99 0 9 2;
diff --git a/externals/gridflow/pd_help/@cast.pd b/externals/gridflow/pd_help/@cast.pd
index 92543dee..e8f18fa8 100644
--- a/externals/gridflow/pd_help/@cast.pd
+++ b/externals/gridflow/pd_help/@cast.pd
@@ -4,17 +4,17 @@
 the same values after type conversion. note that while casting to a
 smaller type \, overflowing values will be truncated.;
 #X text 626 13 gridflow;
-#X text 142 58 numbertypes are: uint8 \, int16 \, int32 \, int64 \,
+#X text 144 53 numbertypes are: uint8 \, int16 \, int32 \, int64 \,
 float32 \, float64. see doc/architecture.html for more info.;
 #X obj 126 90 nbx 8 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
--262144 -1 -1 3.1416 256;
+-262144 -1 -1 57.1416 256;
 #X obj 115 136 @pack 4 float32;
 #X obj 78 185 @store;
 #X obj 78 136 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
 -1;
 #X text 14 136 print it:;
 #X obj 136 234 @print;
-#X obj 78 205 t a a a a;
+#X obj 44 210 t a a a a;
 #X obj 78 354 @print;
 #X obj 97 314 @print;
 #X obj 116 254 @cast uint8;
@@ -22,21 +22,30 @@ float32 \, float64. see doc/architecture.html for more info.;
 #X obj 97 294 @cast int32;
 #X obj 78 334 @cast float64;
 #X obj 216 90 nbx 8 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
--262144 -1 -1 42 256;
+-262144 -1 -1 145 256;
 #X obj 126 110 nbx 8 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
--262144 -1 -1 2004 256;
+-262144 -1 -1 2027 256;
 #X obj 216 110 nbx 8 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
 -262144 -1 -1 1e+10 256;
 #X obj 118 158 @redim ( 2 2 );
 #X text 182 295 normally the default;
+#X floatatom 70 87 5 0 0 0 - - -;
+#X obj 60 60 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
+-262144 -1 -1 0 256;
+#X obj 255 176 display;
+#X obj 266 217 display;
+#X obj 332 217 display;
 #X connect 4 0 5 0;
 #X connect 5 0 20 0;
 #X connect 6 0 10 0;
 #X connect 7 0 6 0;
 #X connect 10 0 16 0;
+#X connect 10 0 26 0;
 #X connect 10 1 15 0;
 #X connect 10 2 13 0;
+#X connect 10 2 25 0;
 #X connect 10 3 9 0;
+#X connect 10 3 24 0;
 #X connect 13 0 14 0;
 #X connect 15 0 12 0;
 #X connect 16 0 11 0;
@@ -44,3 +53,5 @@ float32 \, float64. see doc/architecture.html for more info.;
 #X connect 18 0 5 2;
 #X connect 19 0 5 3;
 #X connect 20 0 6 1;
+#X connect 22 0 5 0;
+#X connect 23 0 5 1;
diff --git a/externals/gridflow/pd_help/help_record.pd b/externals/gridflow/pd_help/help_record.pd
new file mode 100644
index 00000000..9d963b3d
--- /dev/null
+++ b/externals/gridflow/pd_help/help_record.pd
@@ -0,0 +1,29 @@
+#N canvas 716 268 675 409 10;
+#X obj 79 104 #camera;
+#X obj 79 44 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 137 143 #out window;
+#X obj 154 44 hsl 128 15 20 300 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 0 1;
+#X obj 137 168 fps detailed;
+#X obj 137 192 print;
+#X obj 79 78 metro 100;
+#X obj 93 245 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 123 303 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 143 302 stop recording;
+#X text 113 243 select filename;
+#X text 128 273 start recording;
+#X obj 108 274 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 79 328 #record;
+#X connect 0 0 2 0;
+#X connect 0 0 13 0;
+#X connect 1 0 6 0;
+#X connect 2 0 4 0;
+#X connect 3 0 6 1;
+#X connect 4 0 5 0;
+#X connect 6 0 0 0;
+#X connect 7 0 13 1;
+#X connect 8 0 13 3;
+#X connect 12 0 13 2;
diff --git a/externals/gridflow/pd_help/live_video_feed.pd b/externals/gridflow/pd_help/live_video_feed.pd
new file mode 100644
index 00000000..04aff104
--- /dev/null
+++ b/externals/gridflow/pd_help/live_video_feed.pd
@@ -0,0 +1,38 @@
+#N canvas 526 77 450 614 10;
+#X obj 91 104 #camera;
+#X obj 248 302 #out window;
+#X obj 40 40 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X text 167 102 there is an [#in] within [#camera];
+#X obj 80 12 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
+#X obj 248 325 fps detailed;
+#X obj 248 351 print;
+#X obj 108 20 metro 50;
+#X obj 248 198 # -;
+#X obj 248 269 #clip;
+#X obj 248 220 @! abs;
+#X obj 248 244 # + 50;
+#X obj 164 141 trigger anything anything;
+#X text 281 197 230400 (240x320x3);
+#X obj 101 303 #rgb_to_greyscale;
+#X obj 101 326 #centroid;
+#X floatatom 122 377 5 0 0 0 - - -;
+#X floatatom 168 376 5 0 0 0 - - -;
+#X obj 85 375 display;
+#X connect 0 0 12 0;
+#X connect 1 0 5 0;
+#X connect 2 0 0 0;
+#X connect 4 0 7 0;
+#X connect 5 0 6 0;
+#X connect 7 0 0 0;
+#X connect 8 0 10 0;
+#X connect 9 0 1 0;
+#X connect 9 0 14 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 8 1;
+#X connect 12 1 8 0;
+#X connect 14 0 15 0;
+#X connect 15 0 18 0;
+#X connect 15 1 16 0;
+#X connect 15 2 17 0;
diff --git a/externals/gridflow/pd_help/modify_an_image.pd b/externals/gridflow/pd_help/modify_an_image.pd
new file mode 100644
index 00000000..619e561a
--- /dev/null
+++ b/externals/gridflow/pd_help/modify_an_image.pd
@@ -0,0 +1,33 @@
+#N canvas 270 176 450 432 10;
+#X obj 106 140 #in;
+#X msg 147 94 open babbage.jpg;
+#X obj 89 96 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
+;
+#X obj 106 311 #out window;
+#X text 34 368 What about getting rid of this cool acid stuff?;
+#N canvas 0 0 450 300 next_patch 0;
+#X restore 36 396 pd next_patch;
+#X obj 169 153 hsl 128 15 0 1000 0 0 empty empty empty -2 -6 0 8 -260818
+-1 -1 7200 1;
+#X obj 38 52 metro 33.33;
+#X obj 38 24 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 1 1;
+#X obj 106 288 #clip;
+#X obj 226 241 # - 42;
+#X obj 143 189 # - 42;
+#X text 293 386 do [#clip];
+#X text 293 402 clip is an abstraction;
+#X obj 129 257 #scale_by;
+#X obj 233 286 #color;
+#X obj 101 215 # * 0.2;
+#X obj 209 185 / 1000;
+#X floatatom 220 213 5 0 0 0 - - -;
+#X connect 0 0 16 0;
+#X connect 1 0 0 0;
+#X connect 2 0 0 0;
+#X connect 6 0 17 0;
+#X connect 7 0 0 0;
+#X connect 8 0 7 0;
+#X connect 9 0 3 0;
+#X connect 16 0 9 0;
+#X connect 17 0 16 1;
+#X connect 17 0 18 0;