blob: f3517358b8c7c057851e8fd32d141ab939651570 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
# GSETI -- Set any GIO parameter of type integer or real. Precision may be
# lost if the actual parameter is of type real (call GSETR instead in such
# a case).
procedure gseti (gp, param, value)
pointer gp # graphics descriptor
int param # parameter to be set
int value # new value for parameter
begin
call gsetr (gp, param, real(value))
end
|
