/*****************************************************************************/

/***                                                                       ***/

/***                            write_cols()                               ***/

/***   	         Writes out colour file for morphometric features          ***/

/***               Jo Wood, Project ASSIST, 21st February 1995             ***/

/***                                                                       ***/

/*****************************************************************************/

#include <grass/raster.h>
#include "param.h"


void write_cols(void)
{
    struct Colors colours;
    CELL val1, val2;
    Rast_init_colors(&colours);

    val1 = FLAT;
    val2 = PIT;
    Rast_add_c_color_rule(&val1, 180, 180, 180,	/* White      */
			  &val2, 0, 0, 0, &colours);	/* Black      */
    val1 = CHANNEL;
    val2 = PASS;
    Rast_add_c_color_rule(&val1, 0, 0, 255,	/* Blue       */
			  &val2, 0, 255, 0, &colours);	/* Green      */
    val1 = RIDGE;
    val2 = PEAK;
    Rast_add_c_color_rule(&val1, 255, 255, 0,	/* Yellow     */
			  &val2, 255, 0, 0, &colours);	/* Red        */

    Rast_write_colors(rast_out_name, G_mapset(), &colours);

    Rast_free_colors(&colours);

}