Anonymous user
Pinstripe/Display: Difference between revisions
m
→{{header|J}}
(Added Mathematica) |
m (→{{header|J}}) |
||
Line 359:
<lang j> load'viewmat'
NB. size=. 2{.".wd'qm' NB. J6
NB. size=. getscreenwh_jgtk_ '' NB. J7
size=. 3{".wd'qscreen' NB. J8
'rgb'viewmat- (4<.@%~{:size)# ({.size) $&> 1 2 3 4#&.> <0 1</lang>
|