This script worked just before the new JAL upgrade was made. It worked (differently) in both j701jhs and j701gtk. After I upgtraded viewmat it no longer worked on j701gtk.
Linda -----Original Message----- From: programming-boun...@jsoftware.com [mailto:programming-boun...@jsoftware.com] On Behalf Of bill lam Sent: Wednesday, July 04, 2012 10:44 AM To: programming@jsoftware.com Subject: Re: [Jprogramming] Viewmat When did this work last time? Срд, 04 Июл 2012, R.E. Boss писал(а): > In J6.02 > > viewmat {"2 m b 3 > |domain error: wd > | wd'pc jvm;pn *',TITLE > > but > > viewmat "2 m b 3 > > works > > > R.E. Boss > > > > -----Oorspronkelijk bericht----- > > Van: programming-boun...@jsoftware.com > > [mailto:programming-boun...@jsoftware.com] Namens Linda Alvord > > Verzonden: woensdag 4 juli 2012 9:30 > > Aan: 'Programming forum' > > Onderwerp: [Jprogramming] Viewmat > > > > I upgraded viewmat using jal this morning and now the gtk version no > > longer works to provide the images at all. > > > > > > > > In the past the were all in separate windows. > > > > > > > > Here is the current error: (I'm using the script from my recent > > challenge > > 13) > > > > > > > > viewmat {"2 m b 2 > > > > |value error: IFARM > > > > | GUI*.-.IFGTK > > > > > > > > Here is the script. I thought I could attach a .ijs but it didn't work. > > It seems fine in jhs. > > > > > > > > p=: 13 :'?(x,2)$y' > > > > N=:26 > > > > P=:N p N > > > > lat=: 13 :'(y,+:y)$''. ''' > > > > lat 5 > > > > dots=: 13 :'<"1 (0{"1 y),.2*1{"1 y' > > > > dots 4 p 8 > > > > spots=: 13 :'((i.x){(65+i.26){a.)(dots x p y)}lat y' > > > > 5 spots 11 > > > > 12 spots 4 > > > > N spots N > > > > > > > > load 'viewmat' > > > > NB. (number of points) voronoi (shape) > > > > NB. Generates an array of indices of the nearest point > > > > b=: 13 :'(i.y),."0 1 i.y' > > > > p=: 13 :'?(y,2)$ y' > > > > m=: 13 :'(i.<./)"1 +/"1 *:x-"1/~y' > > > > > > > > NB. Palettes of colors used in the examples below viewmat {"2 m b 2 > > > > > > > > viewmat {"2 m b 3 > > > > > > > > viewmat {"2 m b 4 > > > > > > > > viewmat {"2 m b 5 > > > > > > > > viewmat {"2 m b 6 > > > > > > > > viewmat {"2 m b 7 > > > > > > > > viewmat {"2 m b 8 > > > > > > > > viewmat {"2 m b 9 > > > > > > > > NB. Regions > > > > viewmat (p 2) m b 2 > > > > > > > > viewmat (p 3) m b 3 > > > > > > > > viewmat (p 4) m b 4 > > > > > > > > viewmat (p 5) m b 5 > > > > > > > > viewmat (p 6) m b 6 > > > > > > > > viewmat (p 7) m b 7 > > > > > > > > viewmat (p 8) m b 8 > > > > > > > > viewmat Q=:(P=:p 9) m b 9 > > > > P > > > > Q > > > > > > > > > > > > Linda > > > > -------------------------------------------------------------------- > > -- For information about J forums see > > http://www.jsoftware.com/forums.htm > > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm -- regards, ==================================================== GPG key 1024D/4434BAB3 2008-08-24 gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
