Nullfeldaufspaltung von Benzol und Naphthalin im ... - ScienceUp.de

152
#include "new.hpp"
#include "fstream.h"
#include "stdlib.h"
#include "math.h"
#include "string.h"
A Quelltexte der C++-Programme
class MDaten
{
public:
MDaten();
~MDaten();
void Calc_DS1S2Ntype(USHORT s1, USHORT s2, USHORT ntype);
double GetDS1S2Ntype() const {return itsDS1S2Ntype;}
private:
Fehler FehlerBehandlung;
double itsDS1S2Ntype;
USHORT itsS1,itsS2,itsNtype;
USHORT itsStart;
double itsMax;
double SCInt[N][N][N][N]; //D-Integrale bzgl. der SCOs,
//berechnet mit scintegral.C
double SCKoef[FSN]; //EV bzgl. der SC-Strukturen
double itsC[FSN][NTYPE][N][N][N][N]; //Daten aus CFILEBIN
//Fkt.en, die Calc_DS1S2Ntype aufruft
void C_Lesen(); //C aus CFILEBIN: c^ntype_ijkl(ny, eta)
void SCInt_Lesen();
//SCInt aus SCINTFILEBIN: SCInt(i,j,k,l)
void SC_Koef_Lesen(); //SCKoef aus MRFILE: cNy und cEta
inline void Calc(); //itsDS1S2Ntype
};
/*-------------------------------------------------------*/
//constructor, destructor
/*-------------------------------------------------------*/
MDaten::MDaten() //constructor
{
USHORT fehlerTest = true; //Test auf Ausloeschung und
// bes. grosse Zahlen
USHORT abfrage = false; //Falls bei Fehlermeldung auf