blob: 3e858789d557c8b33bf35fc9718314e954f878ab (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# ING_UCOLON -- User default colon commands
procedure ing_ucolon$t (in, gp, gt, nl, x, y, wts, npts, nvars, newgraph)
pointer in # INLFIT pointer
pointer gp # GIO pointer
pointer gt # GTOOLS pointer
pointer nl # NLFIT pointer
PIXEL x[ARB] # Independent variables
PIXEL y[npts] # Dependent variables
PIXEL wts[npts] # Weights
int npts # Number of points
int nvars # Number of variables
int newgraph # New graph ? (output)
begin
# Ring bell
call printf ("\07\n")
end
|