blob: 419bde094848e672ab9d5149e9602a66aee49956 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
include "nlfitdefd.h"
# NLPGET - Retreive parameter values
procedure nlpgetd (nl, params, nparams)
pointer nl # pointer to the nlfit structure
double params[ARB] # parameter array
int nparams # the number of the parameters
begin
nparams = NL_NPARAMS(nl)
call amovd (PARAM(NL_PARAM(nl)), params, nparams)
end
|