From 4ce74121dc9b4691efafebab313718ba11e6ee3c Mon Sep 17 00:00:00 2001
From: "Mirar (Pontus Hagland)" <pike@sort.mirar.org>
Date: Thu, 29 May 1997 21:38:30 +0200
Subject: [PATCH] documentation fix: $ is in the main note...

Rev: src/modules/Image/blit.c:1.10
Rev: src/modules/Image/blit_layer_include.h:1.3
Rev: src/modules/Image/colortable.c:1.3
Rev: src/modules/Image/dct.c:1.8
Rev: src/modules/Image/doc/Image.font.html:1.3
Rev: src/modules/Image/doc/Image.html:1.4
Rev: src/modules/Image/doc/Image.image.html:1.7
Rev: src/modules/Image/font.c:1.13
Rev: src/modules/Image/image.c:1.31
Rev: src/modules/Image/image.h:1.8
Rev: src/modules/Image/lzw.c:1.2
Rev: src/modules/Image/lzw.h:1.3
Rev: src/modules/Image/matrix.c:1.6
Rev: src/modules/Image/operator.c:1.8
Rev: src/modules/Image/pattern.c:1.5
Rev: src/modules/Image/pnm.c:1.5
Rev: src/modules/Image/polyfill.c:1.4
Rev: src/modules/Image/quant.c:1.10
Rev: src/modules/Image/togif.c:1.15
---
 .gitattributes                         |   3 +
 src/modules/Image/blit.c               |   4 +-
 src/modules/Image/blit_layer_include.h |   9 +-
 src/modules/Image/colortable.c         |   4 +-
 src/modules/Image/dct.c                |   4 +-
 src/modules/Image/doc/Image.font.html  |  11 +-
 src/modules/Image/doc/Image.html       |  22 ++++
 src/modules/Image/doc/Image.image.html | 173 ++++++++++++++++++++++++-
 src/modules/Image/font.c               |   7 +-
 src/modules/Image/image.c              |  12 +-
 src/modules/Image/image.h              |   8 +-
 src/modules/Image/lzw.c                |   8 +-
 src/modules/Image/lzw.h                |   8 +-
 src/modules/Image/matrix.c             |   4 +-
 src/modules/Image/operator.c           |   4 +-
 src/modules/Image/pattern.c            |  51 +++++++-
 src/modules/Image/pnm.c                |   4 +-
 src/modules/Image/polyfill.c           |   4 +-
 src/modules/Image/quant.c              |  12 +-
 src/modules/Image/togif.c              |   6 +-
 20 files changed, 313 insertions(+), 45 deletions(-)

diff --git a/.gitattributes b/.gitattributes
index 68c9f23c1c..610fac07cd 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -45,6 +45,8 @@ testfont binary
 /src/modules/Image/blit_layer_include.h foreign_ident
 /src/modules/Image/colortable.c foreign_ident
 /src/modules/Image/dct.c foreign_ident
+/src/modules/Image/doc/Image.html foreign_ident
+/src/modules/Image/font.c foreign_ident
 /src/modules/Image/image.c foreign_ident
 /src/modules/Image/image.h foreign_ident
 /src/modules/Image/lzw.c foreign_ident
@@ -53,6 +55,7 @@ testfont binary
 /src/modules/Image/operator.c foreign_ident
 /src/modules/Image/pattern.c foreign_ident
 /src/modules/Image/pnm.c foreign_ident
+/src/modules/Image/polyfill.c foreign_ident
 /src/modules/Image/quant.c foreign_ident
 /src/modules/Image/togif.c foreign_ident
 /src/modules/Image/x.c foreign_ident
diff --git a/src/modules/Image/blit.c b/src/modules/Image/blit.c
index 0fb1976871..6fa6f0d883 100644
--- a/src/modules/Image/blit.c
+++ b/src/modules/Image/blit.c
@@ -1,8 +1,10 @@
-/* $Id: blit.c,v 1.9 1997/05/19 22:50:24 hubbe Exp $ */
+/* $Id: blit.c,v 1.10 1997/05/29 19:37:11 mirar Exp $ */
 #include "global.h"
 
 /*
 **! module Image
+**! note
+**!	$Id: blit.c,v 1.10 1997/05/29 19:37:11 mirar Exp $<br>
 **! class image
 */
 
diff --git a/src/modules/Image/blit_layer_include.h b/src/modules/Image/blit_layer_include.h
index 109dacafea..6dd4c1d179 100644
--- a/src/modules/Image/blit_layer_include.h
+++ b/src/modules/Image/blit_layer_include.h
@@ -1,6 +1,13 @@
-/* $Id: blit_layer_include.h,v 1.2 1997/03/25 06:59:10 mirar Exp $ */
+/* $Id: blit_layer_include.h,v 1.3 1997/05/29 19:37:16 mirar Exp $ */
 /* included w/ defines in blit.c, image_add_layer() */
 
+/*
+**! module Image
+**! note
+**!	$Id: blit_layer_include.h,v 1.3 1997/05/29 19:37:16 mirar Exp $<br>
+**! class image
+*/
+
 
    i=(y2-y1+1);
    while (i--)
diff --git a/src/modules/Image/colortable.c b/src/modules/Image/colortable.c
index c6a5294d1b..36fe562589 100644
--- a/src/modules/Image/colortable.c
+++ b/src/modules/Image/colortable.c
@@ -1,9 +1,11 @@
 #include <config.h>
 
-/* $Id: colortable.c,v 1.2 1997/05/19 22:50:24 hubbe Exp $ */
+/* $Id: colortable.c,v 1.3 1997/05/29 19:37:21 mirar Exp $ */
 
 /*
 **! module Image
+**! note
+**!	$Id: colortable.c,v 1.3 1997/05/29 19:37:21 mirar Exp $<br>
 **! class colortable
 **!
 **!	This object keeps colortable information,
diff --git a/src/modules/Image/dct.c b/src/modules/Image/dct.c
index 9cd2cd5f1c..93b38d43ae 100644
--- a/src/modules/Image/dct.c
+++ b/src/modules/Image/dct.c
@@ -1,7 +1,9 @@
-/* $Id: dct.c,v 1.7 1997/05/19 22:50:24 hubbe Exp $ */
+/* $Id: dct.c,v 1.8 1997/05/29 19:37:25 mirar Exp $ */
 
 /*
 **! module Image
+**! note
+**!	$Id: dct.c,v 1.8 1997/05/29 19:37:25 mirar Exp $<br>
 **! class image
 */
 
diff --git a/src/modules/Image/doc/Image.font.html b/src/modules/Image/doc/Image.font.html
index 1f8b59acc7..18e05c7c13 100644
--- a/src/modules/Image/doc/Image.font.html
+++ b/src/modules/Image/doc/Image.font.html
@@ -2,8 +2,10 @@
 <h2>Image.font</h2>
 
 
+<h4>NOTE</h4>
 <blockquote>
-This object adds the text-drawing and -creation
+Short technical documentation on a font file:
+     This object adds the text-drawing and -creation
      capabilities of the <tt><a href=Image.html>Image</a></tt> module.
 
 <p>     For simple usage, see
@@ -14,12 +16,7 @@ This object adds the text-drawing and -creation
      <tt><a href=Image.font.html#set_xspacing_scale>set_xspacing_scale</a></tt>,
      <tt><a href=Image.font.html#set_yspacing_scale>set_yspacing_scale</a></tt>,
      <tt><a href=Image.font.html#text_extents>text_extents</a></tt>
-</blockquote>
-
-
-<h4>NOTE</h4>
-<blockquote>
-Short technical documentation on a font file:
+     
      <pre>
             struct file_head 
             {
diff --git a/src/modules/Image/doc/Image.html b/src/modules/Image/doc/Image.html
index 3624cd3ee4..06d658ed94 100644
--- a/src/modules/Image/doc/Image.html
+++ b/src/modules/Image/doc/Image.html
@@ -8,6 +8,28 @@ This module adds image-drawing and -manipulating
 </blockquote>
 
 
+<h4>NOTE</h4>
+<blockquote>
+$Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+
+<p>     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+     $Id: Image.html,v 1.4 1997/05/29 19:38:25 mirar Exp $<br>
+</blockquote>
+
+
 <h4>SEE ALSO</h4>
 <blockquote>     <tt><a href=Image.font.html>Image.font</a></tt>,
      <tt><a href=Image.image.html>Image.image</a></tt>
diff --git a/src/modules/Image/doc/Image.image.html b/src/modules/Image/doc/Image.image.html
index 65b32301af..77b240301a 100644
--- a/src/modules/Image/doc/Image.image.html
+++ b/src/modules/Image/doc/Image.image.html
@@ -59,6 +59,8 @@ The main object of the <tt><a href=Image.html>Image</a></tt> module, this object
      <tt><a href=Image.image.html#map_fast>map_fast</a></tt>, 
      <tt><a href=Image.image.html#modify_by_intensity>modify_by_intensity</a></tt>,
      <tt><a href=Image.image.html#select_from>select_from</a></tt> 
+     <tt><a href=Image.image.html#rgb_to_hsv>rgb_to_hsv</a></tt> 
+     <tt><a href=Image.image.html#hsv_to_rgb>hsv_to_rgb</a></tt> 
 
 <p>     converting to other datatypes: <tt><a href=Image.image.html#cast>cast</a></tt>,
      <tt><a href=Image.image.html#fromgif>fromgif</a></tt>, 
@@ -70,6 +72,7 @@ The main object of the <tt><a href=Image.html>Image</a></tt> module, this object
      <tt><a href=Image.image.html#gif_begin>gif_begin</a></tt>,
      <tt><a href=Image.image.html#gif_end>gif_end</a></tt>,
      <tt><a href=Image.image.html#gif_netscape_loop>gif_netscape_loop</a></tt>,
+     <tt><a href=Image.image.html#gif_transparency>gif_transparency</a></tt>,
      <tt><a href=Image.image.html#to8bit>to8bit</a></tt>,
      <tt><a href=Image.image.html#to8bit_closest>to8bit_closest</a></tt>, 
      <tt><a href=Image.image.html#to8bit_fs>to8bit_fs</a></tt>,
@@ -80,6 +83,10 @@ The main object of the <tt><a href=Image.html>Image</a></tt> module, this object
      <tt><a href=Image.image.html#togif_fs>togif_fs</a></tt>, 
      <tt><a href=Image.image.html#toppm>toppm</a></tt>,
      <tt><a href=Image.image.html#tozbgr>tozbgr</a></tt>
+
+<p>     special pattern drawing:
+     <tt><a href=Image.image.html#noise>noise</a></tt>,
+     <tt><a href=Image.image.html#turbulence>turbulence</a></tt>
 </blockquote>
 
 
@@ -1282,6 +1289,39 @@ a gif chunk that defines that the GIF animation should loop
 </blockquote>
 
 
+<h4>SEE ALSO</h4>
+<blockquote>     <tt><a href=Image.image.html#gif_add>gif_add</a></tt>,
+     <tt><a href=Image.image.html#gif_begin>gif_begin</a></tt>,
+     <tt><a href=Image.image.html#gif_end>gif_end</a></tt>
+</blockquote>
+
+<hr>
+<a name=gif_transparency> </a>
+<h4>SYNOPSIS</h4>
+<blockquote>
+<tt>string <b>gif_transparency</b>(int&nbsp;color)</tt>
+</blockquote>
+
+<h4>ARGUMENTS</h4>
+<blockquote><dl>
+<dt><tt>int color</tt>
+  <dd>index of color in the palette
+</dl></blockquote>
+<h4>RETURNS</h4>
+
+
+<blockquote>
+a gif chunk that transparent a color in the next image chunk
+</blockquote>
+
+
+<h4>NOTE</h4>
+<blockquote>
+Yes - i know this function is too hard to use. :/
+     The palette _is_ unknown mostly...
+</blockquote>
+
+
 <h4>SEE ALSO</h4>
 <blockquote>     <tt><a href=Image.image.html#gif_add>gif_add</a></tt>,
      <tt><a href=Image.image.html#gif_begin>gif_begin</a></tt>,
@@ -1324,6 +1364,56 @@ the new image object
      <tt><a href=Image.image.html#modify_by_intensity>modify_by_intensity</a></tt>
 </blockquote>
 
+<hr>
+<a name=hsv_to_rgb> </a>
+<a name=rgb_to_hsv> </a>
+<h4>SYNOPSIS</h4>
+<blockquote>
+<tt>object <b>rgb_to_hsv</b>()<br>
+object <b>hsv_to_rgb</b>()</tt>
+</blockquote>
+
+<h4>DESCRIPTION</h4>
+
+
+<blockquote>
+Converts RGB data to HSV data, or the other way around.
+    When converting to HSV, the resulting data is stored like this:
+     pixel.r = h; pixel.g = s; pixel.b = v;
+
+<p>    When converting to RGB, the input data is asumed to be placed in
+    the pixels as above.
+
+<p>    HSV to RGB calculation:
+    <pre>
+    in = input pixel
+    out = destination pixel
+    h=-pos*c_angle*3.1415/(float)NUM_SQUARES;
+    out.r=(in.b+in.g*cos(in.r));
+    out.g=(in.b+in.g*cos(in.r + pi*2/3));
+    out.b=(in.b+in.g*cos(in.r + pi*4/3));
+    </pre>
+
+<p>    RGB to HSV calculation: Hmm.
+    <pre>
+    </pre>
+
+<p>     Example: Nice rainbow.
+    <pre>
+     object i = Image.image(200,200);
+     i = i->tuned_box(0,0, 200,200,
+                      ({ ({ 255,255,128 }), ({ 0,255,128 }),
+                         ({ 255,255,255 }), ({ 0,255,255 })}))
+          ->hsv_to_rgb();
+     </pre>
+</blockquote>
+<h4>RETURNS</h4>
+
+
+<blockquote>
+the new image object
+</blockquote>
+
 <hr>
 <a name=invert> </a>
 <h4>SYNOPSIS</h4>
@@ -1614,6 +1704,39 @@ the new image object
      <tt><a href=Image.image.html#color>color</a></tt>
 </blockquote>
 
+<hr>
+<a name=noise> </a>
+<h4>SYNOPSIS</h4>
+<blockquote>
+<tt>void <b>noise</b>(array(float|int|array(int))&nbsp;colorrange)<br>
+void <b>noise</b>(array(float|int|array(int))&nbsp;colorrange, float&nbsp;scale, float&nbsp;xdiff, float&nbsp;ydiff, float&nbsp;cscale)</tt>
+</blockquote>
+
+<h4>DESCRIPTION</h4>
+
+
+<blockquote>
+gives a new image with the old image's size,
+     filled width a 'noise' pattern
+</blockquote>
+<h4>ARGUMENTS</h4>
+<blockquote><dl>
+<dt><tt>array(float|int|array(int)) colorrange</tt>
+  <dd>colorrange table
+<dt><tt>float scale</tt>
+  <dd>default value is 0.1
+<dt><tt>float xdiff</tt>
+<dt><tt>float ydiff</tt>
+  <dd>default value is 0,0
+<dt><tt>float cscale</tt>
+  <dd>default value is 1
+</dl></blockquote>
+
+
+<h4>SEE ALSO</h4>
+<blockquote>     <tt><a href=Image.image.html#turbulence>turbulence</a></tt>
+</blockquote>
+
 <hr>
 <a name=paste> </a>
 <h4>SYNOPSIS</h4>
@@ -1807,9 +1930,6 @@ fills an area with the current color
 
 <p>     If any given curve is inside another, it
      will make a hole.
-
-<p> NOTE
-     This function is new (april-97) and rather untested.
 </dl></blockquote>
 <h4>RETURNS</h4>
 
@@ -1819,6 +1939,12 @@ the current object
 </blockquote>
 
 
+<h4>NOTE</h4>
+<blockquote>
+This function is new (april-97) and rather untested.
+</blockquote>
+
+
 <h4>SEE ALSO</h4>
 <blockquote>     <tt><a href=Image.image.html#box>box</a></tt>,
      <tt><a href=Image.image.html#setcolor>setcolor</a></tt>
@@ -2262,9 +2388,9 @@ the GIF data
 
 
 <h4>SEE ALSO</h4>
-<blockquote>     <tt><a href=Image.image.html#togif_begin>togif_begin</a></tt>,
-     <tt><a href=Image.image.html#togif_add>togif_add</a></tt>,
-     <tt><a href=Image.image.html#togif_end>togif_end</a></tt>,
+<blockquote>     <tt><a href=Image.image.html#gif_begin>gif_begin</a></tt>,
+     <tt><a href=Image.image.html#gif_add>gif_add</a></tt>,
+     <tt><a href=Image.image.html#gif_end>gif_end</a></tt>,
      <tt><a href=Image.image.html#toppm>toppm</a></tt>,
      <tt><a href=Image.image.html#fromgif>fromgif</a></tt>
 </blockquote>
@@ -2381,6 +2507,41 @@ Draws a filled rectangle with colors (and alpha values) tuned
 the object called
 </blockquote>
 
+<hr>
+<a name=turbulence> </a>
+<h4>SYNOPSIS</h4>
+<blockquote>
+<tt>void <b>turbulence</b>(array(float|int|array(int))&nbsp;colorrange)<br>
+void <b>turbulence</b>(array(float|int|array(int))&nbsp;colorrange, int&nbsp;octaves, float&nbsp;scale, float&nbsp;xdiff, float&nbsp;ydiff, float&nbsp;cscale)</tt>
+</blockquote>
+
+<h4>DESCRIPTION</h4>
+
+
+<blockquote>
+gives a new image with the old image's size,
+     filled width a 'turbulence' pattern
+</blockquote>
+<h4>ARGUMENTS</h4>
+<blockquote><dl>
+<dt><tt>array(float|int|array(int)) colorrange</tt>
+  <dd>colorrange table
+<dt><tt>int octaves</tt>
+  <dd>default value is 3
+<dt><tt>float scale</tt>
+  <dd>default value is 0.1
+<dt><tt>float xdiff</tt>
+<dt><tt>float ydiff</tt>
+  <dd>default value is 0,0
+<dt><tt>float cscale</tt>
+  <dd>default value is 1
+</dl></blockquote>
+
+
+<h4>SEE ALSO</h4>
+<blockquote>     <tt><a href=Image.image.html#noise>noise</a></tt>
+</blockquote>
+
 <hr>
 <a name=xsize> </a>
 <h4>SYNOPSIS</h4>
diff --git a/src/modules/Image/font.c b/src/modules/Image/font.c
index 42d00faebb..c62f74a200 100644
--- a/src/modules/Image/font.c
+++ b/src/modules/Image/font.c
@@ -1,9 +1,14 @@
+/* $Id: font.c,v 1.13 1997/05/29 19:37:29 mirar Exp $ */
 #include <config.h>
 
 /*
 **! module Image
+**! note
+**!	$Id: font.c,v 1.13 1997/05/29 19:37:29 mirar Exp $<br>
 **! class font
 **!
+**! note
+**! 	Short technical documentation on a font file:
 **!	This object adds the text-drawing and -creation
 **!	capabilities of the <ref>Image</ref> module.
 **!
@@ -16,8 +21,6 @@
 **!	<ref>set_yspacing_scale</ref>,
 **!	<ref>text_extents</ref>
 **!	
-**! note
-**! 	Short technical documentation on a font file:
 **!	<pre>
 **!	       struct file_head 
 **!	       {
diff --git a/src/modules/Image/image.c b/src/modules/Image/image.c
index 91d7d864cd..68787dffc7 100644
--- a/src/modules/Image/image.c
+++ b/src/modules/Image/image.c
@@ -1,11 +1,12 @@
-/* $Id: image.c,v 1.30 1997/05/28 16:04:14 mirar Exp $ */
+/* $Id: image.c,v 1.31 1997/05/29 19:37:34 mirar Exp $ */
 
 /*
 **! module Image
 **!
 **!     This module adds image-drawing and -manipulating
 **!	capabilities to pike. 
-**!
+**! note
+**!	$Id: image.c,v 1.31 1997/05/29 19:37:34 mirar Exp $<br>
 **! see also: Image.font, Image.image
 **!
 **! class image
@@ -79,6 +80,7 @@
 **!	<ref>gif_begin</ref>,
 **!	<ref>gif_end</ref>,
 **!	<ref>gif_netscape_loop</ref>,
+**!	<ref>gif_transparency</ref>,
 **!	<ref>to8bit</ref>,
 **!	<ref>to8bit_closest</ref>, 
 **!	<ref>to8bit_fs</ref>,
@@ -90,6 +92,10 @@
 **!	<ref>toppm</ref>,
 **!	<ref>tozbgr</ref>
 **!
+**!	special pattern drawing:
+**!	<ref>noise</ref>,
+**!	<ref>turbulence</ref>
+**!
 **! see also: Image, Image.font
 */
 
@@ -100,7 +106,7 @@
 
 #include "stralloc.h"
 #include "global.h"
-RCSID("$Id: image.c,v 1.30 1997/05/28 16:04:14 mirar Exp $");
+RCSID("$Id: image.c,v 1.31 1997/05/29 19:37:34 mirar Exp $");
 #include "pike_macros.h"
 #include "object.h"
 #include "constants.h"
diff --git a/src/modules/Image/image.h b/src/modules/Image/image.h
index 57cf29c1d9..89b1a51232 100644
--- a/src/modules/Image/image.h
+++ b/src/modules/Image/image.h
@@ -1,4 +1,10 @@
-/* $Id: image.h,v 1.7 1997/04/30 01:46:47 mirar Exp $ */
+/* $Id: image.h,v 1.8 1997/05/29 19:37:38 mirar Exp $ */
+
+/*
+**! module Image
+**! note
+**!	$Id: image.h,v 1.8 1997/05/29 19:37:38 mirar Exp $<br>
+*/
 
 #define MAX_NUMCOL 32768
 
diff --git a/src/modules/Image/lzw.c b/src/modules/Image/lzw.c
index 31e01592ef..853c0ce357 100644
--- a/src/modules/Image/lzw.c
+++ b/src/modules/Image/lzw.c
@@ -1,4 +1,4 @@
-/* $Id: lzw.c,v 1.1 1997/02/11 08:35:44 hubbe Exp $ */
+/* $Id: lzw.c,v 1.2 1997/05/29 19:37:43 mirar Exp $ */
 
 /*
 
@@ -12,6 +12,12 @@ the existanse of #define GIF_LZW is for that purpose. :-)
 
 */
 
+/*
+**! module Image
+**! note
+**!	$Id: lzw.c,v 1.2 1997/05/29 19:37:43 mirar Exp $<br>
+*/
+
 #include "global.h"
 
 #include "lzw.h"
diff --git a/src/modules/Image/lzw.h b/src/modules/Image/lzw.h
index ab3d58aa63..a7ebafb652 100644
--- a/src/modules/Image/lzw.h
+++ b/src/modules/Image/lzw.h
@@ -1,4 +1,10 @@
-/* $Id: lzw.h,v 1.2 1997/05/14 00:40:58 per Exp $ */
+/* $Id: lzw.h,v 1.3 1997/05/29 19:37:47 mirar Exp $ */
+
+/*
+**! module Image
+**! note
+**!	$Id: lzw.h,v 1.3 1997/05/29 19:37:47 mirar Exp $<br>
+*/
 
 #define GIF_LZW
 
diff --git a/src/modules/Image/matrix.c b/src/modules/Image/matrix.c
index 338e289928..a8a9891e41 100644
--- a/src/modules/Image/matrix.c
+++ b/src/modules/Image/matrix.c
@@ -1,7 +1,9 @@
-/* $Id: matrix.c,v 1.5 1997/05/19 22:50:26 hubbe Exp $ */
+/* $Id: matrix.c,v 1.6 1997/05/29 19:37:52 mirar Exp $ */
 
 /*
 **! module Image
+**! note
+**!	$Id: matrix.c,v 1.6 1997/05/29 19:37:52 mirar Exp $<br>
 **! class image
 */
 
diff --git a/src/modules/Image/operator.c b/src/modules/Image/operator.c
index 0b7f1f59e8..75f164beb0 100644
--- a/src/modules/Image/operator.c
+++ b/src/modules/Image/operator.c
@@ -1,7 +1,9 @@
-/* $Id: operator.c,v 1.7 1997/05/19 22:50:26 hubbe Exp $ */
+/* $Id: operator.c,v 1.8 1997/05/29 19:37:56 mirar Exp $ */
 
 /*
 **! module Image
+**! note
+**!	$Id: operator.c,v 1.8 1997/05/29 19:37:56 mirar Exp $<br>
 **! class image
 */
 
diff --git a/src/modules/Image/pattern.c b/src/modules/Image/pattern.c
index 2dd80e8624..df57e9a36f 100644
--- a/src/modules/Image/pattern.c
+++ b/src/modules/Image/pattern.c
@@ -1,4 +1,11 @@
-/* $Id: pattern.c,v 1.4 1997/05/19 22:50:26 hubbe Exp $ */
+/* $Id: pattern.c,v 1.5 1997/05/29 19:38:01 mirar Exp $ */
+
+/*
+**! module Image
+**! note
+**!	$Id: pattern.c,v 1.5 1997/05/29 19:38:01 mirar Exp $<br>
+**! class image
+*/
 
 #include "global.h"
 
@@ -181,14 +188,25 @@ static void init_colorrange(rgb_group *cr,struct svalue *s,char *where)
 	      : ( error("illegal argument(s) to "where"\n"), 0.0 ) ) ) \
       : def )
 
+/*
+**! method void noise(array(float|int|array(int)) colorrange)
+**! method void noise(array(float|int|array(int)) colorrange,float scale,float xdiff,float ydiff,float cscale)
+**! 	gives a new image with the old image's size,
+**!	filled width a 'noise' pattern
+**! arg array(float|int|array(int)) colorrange
+**! 	colorrange table
+**! arg float scale
+**!	default value is 0.1
+**! arg float xdiff
+**! arg float ydiff
+**!	default value is 0,0
+**! arg float cscale
+**!	default value is 1
+**! see also: turbulence
+*/
+
 void image_noise(INT32 args)
 {
-/* parametrar: 	array(float|int|array(int)) colorrange,
-                float scale=0.1,
-		float xdiff=0,
-		float ydiff=0,
-   		float cscale=1
-*/
    int x,y;
    rgb_group cr[COLORRANGE_LEVELS];
    double scale,xdiff,ydiff,cscale,xp,yp;
@@ -234,6 +252,25 @@ void image_noise(INT32 args)
    push_object(o);
 }
 
+/*
+**! method void turbulence(array(float|int|array(int)) colorrange)
+**! method void turbulence(array(float|int|array(int)) colorrange,int octaves,float scale,float xdiff,float ydiff,float cscale)
+**! 	gives a new image with the old image's size,
+**!	filled width a 'turbulence' pattern
+**! arg array(float|int|array(int)) colorrange
+**! 	colorrange table
+**! arg int octaves
+**!	default value is 3
+**! arg float scale
+**!	default value is 0.1
+**! arg float xdiff
+**! arg float ydiff
+**!	default value is 0,0
+**! arg float cscale
+**!	default value is 1
+**! see also: noise
+*/
+
 void image_turbulence(INT32 args)
 {
 /* parametrar: 	array(float|int|array(int)) colorrange,
diff --git a/src/modules/Image/pnm.c b/src/modules/Image/pnm.c
index 9ed34a94ce..4e2cce4682 100644
--- a/src/modules/Image/pnm.c
+++ b/src/modules/Image/pnm.c
@@ -1,7 +1,9 @@
-/* $Id: pnm.c,v 1.4 1997/05/19 22:50:27 hubbe Exp $ */
+/* $Id: pnm.c,v 1.5 1997/05/29 19:38:05 mirar Exp $ */
 
 /*
 **! module Image
+**! note
+**!	$Id: pnm.c,v 1.5 1997/05/29 19:38:05 mirar Exp $<br>
 **! class image
 */
 
diff --git a/src/modules/Image/polyfill.c b/src/modules/Image/polyfill.c
index 5dbdc3c414..9710aa9c95 100644
--- a/src/modules/Image/polyfill.c
+++ b/src/modules/Image/polyfill.c
@@ -24,6 +24,8 @@
 
 /*
 **! module Image
+**! note
+**!	$Id: polyfill.c,v 1.4 1997/05/29 19:38:09 mirar Exp $<br>
 **! class image
 */
 
@@ -39,7 +41,7 @@
 **!	If any given curve is inside another, it
 **!	will make a hole.
 **!
-**! NOTE
+**! note
 **!	This function is new (april-97) and rather untested.
 **! see also: box, setcolor
 */
diff --git a/src/modules/Image/quant.c b/src/modules/Image/quant.c
index ef871d8703..f36e59046a 100644
--- a/src/modules/Image/quant.c
+++ b/src/modules/Image/quant.c
@@ -1,13 +1,11 @@
 #include <config.h>
-/* $Id: quant.c,v 1.9 1997/05/19 23:32:02 hubbe Exp $ */
+/* $Id: quant.c,v 1.10 1997/05/29 19:38:13 mirar Exp $ */
+/* (optimized) color quantization and following lookup */
 
 /*
-
-quant, used by image when making gif's (mainly)
-
-Pontus Hagland, law@infovav.se
-David Kågedal, kg@infovav.se
-
+**! module Image
+**! note
+**!	$Id: quant.c,v 1.10 1997/05/29 19:38:13 mirar Exp $<br>
 */
 
 #ifdef HAVE_UNISTD_H
diff --git a/src/modules/Image/togif.c b/src/modules/Image/togif.c
index 16cb3cc9d5..19fcf8063d 100644
--- a/src/modules/Image/togif.c
+++ b/src/modules/Image/togif.c
@@ -4,12 +4,14 @@ togif
 
 Pontus Hagland, law@infovav.se
 
-$Id: togif.c,v 1.14 1997/05/29 17:03:27 mirar Exp $ 
+$Id: togif.c,v 1.15 1997/05/29 19:38:18 mirar Exp $ 
 
 */
 
 /*
 **! module Image
+**! note
+**!	$Id: togif.c,v 1.15 1997/05/29 19:38:18 mirar Exp $<br>
 **! class image
 */
 
@@ -784,7 +786,7 @@ void image_gif_add_fs_nomap(INT32 args)
 **! arg int trans_g
 **! arg int trans_b
 **!	one color, that is to be transparent.
-**! see also: togif_begin, togif_add, togif_end, toppm, fromgif
+**! see also: gif_begin, gif_add, gif_end, toppm, fromgif
 */
 
 
-- 
GitLab