blob: 1d9239e50a5d209f49f62447bb632f1bb45fcdfa (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
# GPLOTV -- Plot a vector. This routine is provided for the convenience of
# the user who does not need to exercise fine control over the details of
# how the plot is generated.
procedure gplotv (v, npts, x1, x2, title)
real v[ARB] # data vector
int npts # number of data points
real x1, x2 # range of X in data vector
char title[ARB] # plot title
pointer gp
pointer gopen()
errchk gopen, gploto
begin
gp = gopen ("stdgraph", NEW_FILE, STDGRAPH)
call gploto (gp, v, npts, x1, x2, title)
call gclose (gp)
end
|
