08.12.2012 Aufrufe

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

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

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

MEHR ANZEIGEN
WENIGER ANZEIGEN

Erfolgreiche ePaper selbst erstellen

Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.

A Quelltexte <strong>de</strong>r C++-Programm 133<br />

/*FEHLERTEST*/<br />

FehlerBehandlung.IstGroesser(term1, MAX, "Formel 1: Term<br />

1", i, j, k, l);<br />

term2 = pow(<br />

(alphaI*alphaJ*alphaK*alphaL/(pow(((alphaI+alphaK)/2.0), 2)<br />

*pow(((alphaJ+alphaL)/2.0), 2))), (5.0/4.0) );<br />

/*FEHLERTEST*/<br />

FehlerBehandlung.IstGroesser(term2, MAX, "Formel 1: Term<br />

2", i, j, k, l);<br />

//Begin term3<br />

term3 = -(alphaI * alphaK * rik2/(alphaI + alphaK)<br />

+ alphaJ * alphaL * rjl2/(alphaJ + alphaL));<br />

// exp(term3)=0..1<br />

/*FEHLERTEST*/<br />

FehlerBehandlung.IstGroesser(term3, MAX, "Formel 1: Term<br />

in exp", i, j, k, l);<br />

term3 = exp(term3);<br />

/*FEHLERTEST*/<br />

FehlerBehandlung.NichtImBereich(term3, 0, 1, "Formel 1:<br />

exp(..)", i, j, k, l);<br />

//En<strong>de</strong> term3<br />

//Beginn term4<br />

a = -1.0; //0<br />

c = a + b; //>0 o<strong>de</strong>r

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!