new file mode 100644
--- /dev/null
+++ b/test/g100i.ijs
@@ -0,0 +1,113 @@
+NB. +/ B ----------------------------------------------------------------
+
+f=: 3 : 'y -: +/y$1'
+f"0 ?2 10$1e5
+f"0 i.4 10
+f"0 [_1 0 1+  255
+f"0 [_1 0 1+4*255
+f"0 [_1 0 1+8*255
+
+f=: 3 : 'y -: +/(i.5e3) e. y?5e3'
+f"0 ?2 10$4e3
+f"0 i.4 10
+f"0 [_1 0 1+  255
+f"0 [_1 0 1+4*255
+f"0 [_1 0 1+8*255
+
+f=: 3 : 'n  -: +/(i.y) e. (n=.<.-:y)?y'
+f"0 ?2 10$1e4
+f"0 i.4 10
+f"0 [_1 0 1+  255
+f"0 [_1 0 1+4*255
+f"0 [_1 0 1+8*255
+
+f=: 3 : '($/|.y) -: +/y$1'
+,f"1 ,."0 1~i.10
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+  255
+,f"1 |."1 x
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+4*255
+,f"1 |."1 x
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+8*255
+,f"1 |."1 x
+
+f=: 3 : '200 -: +/+/(i.y) e. 200?*/y'
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+  255
+,f"1 |."1 x
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+4*255
+,f"1 |."1 x
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+8*255
+,f"1 |."1 x
+
+plus=: 4 : 'x+y'
+
+f=: 3 : '(+/ -: plus/) y ?@$ 2'
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+  255
+,f"1 |."1 x
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+4*255
+,f"1 |."1 x
+,f"1 x=:7 8 9,."0 1 [ _1 0 1+8*255
+,f"1 |."1 x
+
+
+NB. +/ I ----------------------------------------------------------------
+
+plus=: 4 : 'x+y'
+
+(+/ -: plus/) x=:1 2 3 1e9 2e9
+(+/ -: plus/) |.x
+
+(+/   -: plus/  ) x=:_1e4+?    23$2e4
+(+/   -: plus/  ) x=:_1e4+?4   23$2e4
+(+/"1 -: plus/"1) x
+(+/   -: plus/  ) x=:_1e4+?7 5 23$2e4
+(+/"1 -: plus/"1) x
+(+/"2 -: plus/"2) x
+
+(+/   -: plus/  ) x=:_1e9+?    23$2e9
+(+/   -: plus/  ) x=:_1e9+?4   23$2e9
+(+/"1 -: plus/"1) x
+(+/   -: plus/  ) x=:_1e9+?7 5 23$2e9
+(+/"1 -: plus/"1) x
+(+/"2 -: plus/"2) x
+
+
+NB. +/ D ----------------------------------------------------------------
+
+plus=: 4 : 'x+y'
+
+(+/   -: plus/  ) x=:0.01*_1e9+?    11$2e9
+(+/   -: plus/  ) x=:0.01*_1e9+?4   11$2e9
+(+/"1 -: plus/"1) x
+(+/   -: plus/  ) x=:0.01*_1e9+?7 5 11$2e9
+(+/"1 -: plus/"1) x
+(+/"2 -: plus/"2) x
+
+
+NB. +/ Z ----------------------------------------------------------------
+
+plus=: 4 : 'x+y'
+
+(+/   -: plus/  ) x=:j./0.01*_1e9+?2     11$2e9
+(+/   -: plus/  ) x=:j./0.01*_1e9+?2 4   11$2e9
+(+/"1 -: plus/"1) x
+(+/   -: plus/  ) x=:j./0.01*_1e9+?2 7 5 11$2e9
+(+/"1 -: plus/"1) x
+(+/"2 -: plus/"2) x
+
+
+NB. +/ X ----------------------------------------------------------------
+
+(+/   -: +/  @:x:) x=:_1e5+?2 7 5 23$2e5
+(+/"1 -: +/"1@:x:) x
+(+/"2 -: +/"2@:x:) x
+(+/"3 -: +/"3@:x:) x
+
+'domain error' -: +/   etx 3 4$'abc'
+'domain error' -: +/"1 etx 3 4$'abc'
+'domain error' -: +/   etx ;:'modus operandi'
+'domain error' -: +/"1 etx 3 4$;:'I think not'
+
+
+4!:55 ;:'f plus x'
+
+