blob: 1a7de7a5144dff2c65757d2b4ccd4cff64c7b764 (
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_ucolonr (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
real x[ARB] # Independent variables
real y[npts] # Dependent variables
real 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
|
