blob: 909800cf39c5f0ee8d086a31c9b88ed7d87e35b6 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <gset.h>
# GSPMCI -- Set polymarker colour index. This function is currently
# implemented as setting the polymarker width, not color.
procedure gspmci (coli)
int coli # Polymarker colour index.
begin
call gsawr (G_PMCOLOR, real (coli))
end
|
