From mboxrd@z Thu Jan  1 00:00:00 1970
Received: (from majordomo@localhost) by pauillac.inria.fr (8.7.6/8.7.3) id JAA30496; Mon, 23 Dec 2002 09:55:01 +0100 (MET)
X-Authentication-Warning: pauillac.inria.fr: majordomo set sender to owner-caml-list@pauillac.inria.fr using -f
Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id JAA30250 for <caml-list@pauillac.inria.fr>; Mon, 23 Dec 2002 09:55:00 +0100 (MET)
Received: from swordfish ([216.241.35.41])
	by concorde.inria.fr (8.11.1/8.11.1) with ESMTP id gBN8sxH14692
	for <caml-list@inria.fr>; Mon, 23 Dec 2002 09:54:59 +0100 (MET)
Received: from matt by swordfish with local (Exim 3.35 #1 (Debian))
	id 18QOM2-0002mL-00
	for <caml-list@inria.fr>; Mon, 23 Dec 2002 01:54:30 -0700
Date: Mon, 23 Dec 2002 01:54:30 -0700
From: Matt Gushee <mgushee@havenrock.com>
To: caml-list@inria.fr
Subject: [Caml-list] OCamlplot puzzle
Message-ID: <20021223085430.GA32693@swordfish>
Reply-To: Matt Gushee <mgushee@havenrock.com>
Mail-Followup-To: caml-list@inria.fr
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
User-Agent: Mutt/1.3.27i
Sender: owner-caml-list@pauillac.inria.fr
Precedence: bulk

Hello, all--

I am trying to learn the OCamlplot API, and as a first step I have
written a simple program that is supposed to generate a PNG image with a
single colored rectangle (see code below). Well, the output is indeed a
PNG image, but there is no colored rectangle; the image is just solid
white. And apparently the image's colorspace is a 1-bit grayscale:

  bash-2.05a$ file /var/tmp/test.png 
  /var/tmp/test.png: PNG image data, 570 x 570, 1-bit grayscale,\
      non-interlaced

(? 1-bit grayscale? Didn't know there was such a thing. Doesn't 1-bit
mean monochrome by definition?)

I have been looking through the libplot documentation, and I can't find
anything about colorspace. I suppose I must be missing some simple step
in my program.

Any ideas what the problem is? 

  [ I'm running OCaml 3.06 on Debian GNU/Linux 3.0, with
    ocamlplot 0.4 and libplot 2.4.1 ]

Here's the code:

------ tryplot.ml ---------------------------------------------------

let out = open_out "/var/tmp/test.png" in
let pl = Plot.makepl Plot.PNG out [] in
Plot.openpl pl;
Plot.pencolor pl (Plot.Colorname "blue");
Plot.fillcolor pl (Plot.Colorname "red");
Plot.linewidth pl 2.;
Plot.filltype pl 1;
(*
let pt0 = { Plot.x = 20. ; Plot.y = 20. }
and pt1 = { Plot.x = 300. ; Plot.y = 200. } in
Plot.box pl ~p0:pt0 ~p1:pt1;
*)
Plot.fbox pl 20. 20. 300. 200.;
Plot.closepl pl;
Plot.deletepl pl;
close_out out

---------------------------------------------------------------------
  
-- 
Matt Gushee                 When a nation follows the Way,
Englewood, Colorado, USA    Horses bear manure through
mgushee@havenrock.com           its fields;
http://www.havenrock.com/   When a nation ignores the Way,
                            Horses bear soldiers through
                                its streets.
                                
                            --Lao Tzu (Peter Merel, trans.)
-------------------
To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr
Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/
Beginner's list: http://groups.yahoo.com/group/ocaml_beginners