Mercurial > hg > octave-lyh

comparison scripts/image/saveimage.m @ 5446:4a00f3a31857

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-09-12 17:18:04 by jwe]
author jwe
date Mon, 12 Sep 2005 17:18:04 +0000
parents ec8c33dcd1bf
children 2618a0750ae6
comparison
equal deleted inserted replaced
5445:1d7ef19081e8 5446:4a00f3a31857
186 tmp(i,:) = sum (bwimg(8*(i-1)+1:8*i,:) .* b); 186 tmp(i,:) = sum (bwimg(8*(i-1)+1:8*i,:) .* b);
187 endfor 187 endfor
188 188
189 fid = fopen (filename, "wb"); 189 fid = fopen (filename, "wb");
190 fprintf (fid, "P4\n%s\n%d %d\n", tagline, img_nr, img_nc); 190 fprintf (fid, "P4\n%s\n%d %d\n", tagline, img_nr, img_nc);
191 fwrite (fid, tmp, "char"); 191 fwrite (fid, tmp, "uchar");
192 fprintf (fid, "\n"); 192 fprintf (fid, "\n");
193 fclose (fid); 193 fclose (fid);
194 194
195 elseif (grey) 195 elseif (grey)
196 196