/* Sets line colour */

#include "plplot.h"

void plcol(colour)
int colour;
{
      int font,col;

      int level;
      glev(&level);
      if (level < 1)  fatal("Please call PLSTAR before calling PLCOL.");
      if (colour < 0)  fatal("Invalid colour in PLCOL.");

      gatt(&font,&col);
      satt(font,colour);
      grcol();
}