summaryrefslogtreecommitdiffstats
path: root/kstars/kstars/ksutils.cpp
blob: b8db47f6134bfd969802a00ea2455fb6397edc21 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
/***************************************************************************
                          ksutils.cpp  -  K Desktop Planetarium
                             -------------------
    begin                : Mon Jan  7 10:48:09 EST 2002
    copyright            : (C) 2002 by Mark Hollomon
    email                : mhh@mindspring.com
 ***************************************************************************/

/***************************************************************************
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/

#include <kstandarddirs.h>
#include <qfile.h>
#include "ksutils.h"

bool KSUtils::openDataFile( QFile &file, const QString &s ) {
	bool result;
	QString FileName = locate( "appdata", s );

	if ( !FileName.isNull() ) {
		file.setName( FileName );
		if ( !file.open( IO_ReadOnly ) ) {
			result = false;
		} else {
			result = true;
		}
	} else {
		result = false;
	}

	return result;
}

long double KSUtils::lagrangeInterpolation( const long double x[], const long double v[], int n, long double xval) {
	long double value = 0;
	for (int i=1; i<n; ++i) {
		long double c = 1.0;
		for (int j = 1; j<n;++j) 
			if (i != j)
				c *= (xval - x[j]) / (x[i] - x[j]);
		value += c *v[i];
	}
	
	return value;
}