🚀 go-pugleaf

glenn@rightbrain.com (Glenn Reid) writes: 
> In a related (and silly) thread, I'm curious as to who has written the
> most deeply-nested "ifelse" or other statment in PostScript in a legitimate
> piece of PostScript code (e.g. not as an entry in the Most Obfuscated
> PostScript Contest).  LaserPrep doesn't count :-)

This is where the NeWS `case' operator makes a big difference...

/IsSmallishPrime {
    {
	3 5 7 11 13 17 19 {
	    true
	}

	1 2 {
	    random 0.5 gt {
		true
	    } {
		true % change this to false if you are undecided
	    }
	}

	/Default { false }

    } case
} def


Lee

-- 
Liam Quin, lee@sq.com, SoftQuad, Toronto, 416 239-4801; the barefoot programmer
  lq-text (Unix text retrieval package) mailing list: lq-text-request@sq.com
  latest released version: 1.10; ftp: ftp.cs.toronto.edu in directory: pub
  If Adultery is for Adults, is Juvenal for Juveniles?