~ubuntu-branches/debian/sid/eso-midas/sid

« back to all changes in this revision

Viewing changes to stdred/long/src/splinadd.c

  • Committer: Package Import Robot
  • Author(s): Ole Streicher
  • Date: 2015-06-10 14:20:37 UTC
  • mfrom: (1.2.1) (6.1.9 experimental)
  • Revision ID: package-import@ubuntu.com-20150610142037-6iowpbtyjrpou36o
Tags: 15.02pl1.3-1
* New upstream version
* Add CI tests
* Move back to unstable

Show diffs side-by-side

added added

removed removed

Lines of Context:
39
39
 
40
40
------------------------------------------------------------*/
41
41
 
42
 
#include <stdio.h>
43
 
#include <math.h>
44
 
 
45
42
#include <midas_def.h>
46
43
 
47
44
#include <gl_defs.h>
48
45
#include <spec_defs.h>
 
46
#include <fitnol.h>
 
47
#include <nrutil.h>
 
48
 
 
49
#include <stdio.h>
 
50
#include <math.h>
49
51
 
50
52
#define GRAVITY         0
51
53
#define GAUSSIAN        1
80
82
 
81
83
int     GaussErr = FALSE;
82
84
 
83
 
extern void free_fvector(), fit_gauss();
84
85
extern int file_exists();
85
86
 
86
87
 
221
222
                    Xgaus[k] = x[j];
222
223
                    Ygaus[k] = line[j];
223
224
                }
224
 
                fit_gauss( Xgaus, Ygaus, Width, A );
 
225
                fit_gauss( Xgaus, Ygaus, Width, A, 3);
225
226
                if ( GaussErr ) {
226
227
                    GaussErr = FALSE;
227
228
                    continue;