sinfo_svd.h

00001 #ifndef SINFO_SVD_H
00002 #define SINFO_SVD_H
00003 /*
00004  * This file is part of the ESO SINFONI Pipeline
00005  * Copyright (C) 2004,2005 European Southern Observatory
00006  *
00007  * This program is free software; you can redistribute it and/or modify
00008  * it under the terms of the GNU General Public License as published by
00009  * the Free Software Foundation; either version 2 of the License, or
00010  * (at your option) any later version.
00011  *
00012  * This program is distributed in the hope that it will be useful,
00013  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00014  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00015  * GNU General Public License for more details.
00016  *
00017  * You should have received a copy of the GNU General Public License
00018  * along with this program; if not, write to the Free Software
00019  * Foundation, 51 Franklin St, Fifth Floor, Boston, MA  02111-1307  USA
00020  */
00021 /*******************************************************************************
00022 * E.S.O. - VLT project
00023 *
00024 * "@(#) $Id: sinfo_svd.h,v 1.2 2006/10/25 06:46:09 amodigli Exp $"
00025 *
00026 * who       when      what
00027 * --------  --------  ----------------------------------------------
00028 * schreib  16/04/03  created
00029 */
00030 
00031 /************************************************************************
00032  * sinfo_svd.h
00033  * singular value decomposition fit routines
00034  *----------------------------------------------------------------------
00035  */
00036 
00037 /*
00038  * header files
00039  */
00040 
00041 /*
00042 #include <stdio.h>
00043 #include "eclipse.h"
00044 */
00045 #include <math.h>
00046 #include <cpl.h>
00047 
00048 /*----------------------------------------------------------------------------
00049  *                      Function ANSI C prototypes
00050  *--------------------------------------------------------------------------*/
00051 
00052 void sinfo_fpol(float x, float *p, int np) ;
00053 
00054 void 
00055 sinfo_svb_kas(float **u, float w[], float **v, int m, 
00056               int n, float b[],float x[]) ;
00057 
00058 void sinfo_svd_variance(float **v , int ma , float w[] , float **cvm) ;
00059 
00060 void sinfo_svd_fitting ( float *x,
00061                    float *y,
00062                    float *sig,
00063                    int   ndata,
00064                    float *a,
00065                    int   ma,
00066                    float **u,
00067                    float **v,
00068                    float *w,
00069                    float **cvm,
00070                    float *chisq,
00071                    void (*funcs)(float,float *,int) ) ;
00072 
00073 void sinfo_svd_compare(float **a,int m,int n,float w[],float **v) ;
00074 
00075 void sinfo_nerror(const char error_text[]) ;
00076 
00077 float *sinfo_vector(long nl, long nh) ;
00078 
00079 void sinfo_free_vector(float *v, long nl /*, long nh*/) ;
00080 
00081 float **sinfo_matrix(long nrl, long nrh, long ncl, long nch) ;
00082 
00083 void 
00084 sinfo_free_matrix(float **m,long nrl/*, long nrh*/, long ncl/*, long nch*/) ;
00085 
00086 
00087 #endif 
00089 /*--------------------------------------------------------------------------*/

Generated on Wed Jan 17 08:33:44 2007 for SINFONI Pipeline Reference Manual by  doxygen 1.4.4