diff test/gspj.ijs @ 0:e0bbaa717f41 draft default tip

lol J
author Jordi GutiƩrrez Hermoso <jordigh@octave.org>
date Mon, 25 Nov 2013 11:56:30 -0500 (2013-11-25)
parents
children
line wrap: on
line diff
new file mode 100644
--- /dev/null
+++ b/test/gspj.ijs
@@ -0,0 +1,16 @@
+NB. j. ------------------------------------------------------------------
+
+(scheck j. $.x), (j. -: j.&.$.) x=:     _10+?    405$2
+(scheck j. $.x), (j. -: j.&.$.) x=:     _10+?  3 4 5$21
+(scheck j. $.x), (j. -: j.&.$.) x=:   o._10+?  3 4 5$21
+(scheck j. $.x), (j. -: j.&.$.) x=:j./o._10+?2 3 4 5$21
+
+0 -: 3 $. j. $. 0 1 0
+0 -: 3 $. j. $. 2 3 4
+0 -: 3 $. j. $. 2 3.4
+0 -: 3 $. j. $. 2 3j4
+
+
+4!:55 ;:'x'
+
+