Another update from ingydotnet^djgoku

2015-11-18 06:14:39 +00:00 · 2015-11-18 06:14:39 +00:00 · 948b86eafa
commit 948b86eafa
parent 91df62d461
7604 changed files with 108452 additions and 22726 deletions
--- a/Task/Bitmap-Write-a-PPM-file/J/bitmap-write-a-ppm-file-2.j
+++ b/Task/Bitmap-Write-a-PPM-file/J/bitmap-write-a-ppm-file-2.j
@ -1,4 +1,5 @@
   NB. create 10 by 10 block of magenta pixels in top right quadrant of a 300 wide by 600 high green image
-   myimg=: ((145 + pixellist) ; 255 0 255) setPixels 0 255 0 makeRGB 600 200
+   pixellist=: >,{;~i.10
+   myimg=: ((150 + pixellist) ; 255 0 255) setPixels 0 255 0 makeRGB 600 300
   myimg writeppm jpath '~temp/myimg.ppm'
-360015
+540015