zurück   weiter

5.4 Verzeichnis der FORTRAN-Routinen

Das Routinenverzeichnis bildet den Zugriff der einzelnen Routinen aufeinander in beide Richtungen ab. Es gibt im Überblick Auskunft über den Zugriff auf die gemeinsamen Datenressourcen, die in den Common-Blöcken abgelegt sind. In der 6.Spalte ist außerdem für jede einzelne Routine vermerkt, welche Parameter sie für die Festlegung der Datenfeldgrößen in der jeweiligen Routine benötigt. Deshalb ist dieses Verzeichnis ein wichtiges Instrument bei der weiteren Bearbeitung des Programms und sollte deshalb akribisch auf dem aktuellen Stand gehalten werden.

Die in Klammern gesetzten Routinen in grauer Schrift gehören nicht zur aktuellen Standardversion des Programm. Sie wurden erzeugt im Rahmen der Programmentwicklung als Zwischenschritte der Entwicklung oder zusätzliche Anzeige von Zwischenergebnissen und können durch wenige Änderungen im Quelltext wieder aktiviert werden. So stehen sie bei künftigen Programmbearbeitungen weiterhin zur Verfügung als Hilfsmittel zum Testen des Programms und zur Fehleranalyse.

Tabelle 5.4: Verzeichnis der FORTRAN-Routinen

RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
-Liste aller Parameter zur Festlegung der Datenfeldgrößen:=>=>=>NXZMax NTMax
NTaMax
NTyp
NPaMax
NChpMax
(NGleiMax)
SIRIUS (Routinenname)
1-Sirius.f (Dateiname)
Hauptroutine PreProzessor
Solver
PostProzessor
-Text
Steuerparameter
(Alle anderen Common-blöcke sind hier als Kommentarzeilen vollständig angegeben)
(NXZMax)
(NTMax)
(NTaMax)
(NTyp)
(NPaMax)
(NChpMax)
(NGleiMax)
A Anz Aus B D F G H I K L M P R S U V
AbflussBerechnet den Ölstrom über den Lagerrand zum Zeitpunkt JTSpaGeo4AnzeigeSpalt­Bilanz AnzeigeSpalt­bilanz­Dim Steuerparameter
konstanteParameter
variableParameter
aktuelleVarParameter
NXZMax
NTMax
AbleiAbleitung ∂Y/∂T bei nicht-äquidistanter Schrittweite ΔT(JT)-Komplettieren--
AbleiDeltaHPPartielle Ableitungen der Verformung DeltaHP(AusgabeFeldY) Druckverlauf2
Druckverlauf1
VerlagBahn2
VerlagBahn1
Steuerparameter
aktuelleVarParameter
-
AbleiPXAbleitung PX des Druckes P nach X- FilmDruck2
(FilmDruck2­_unpack.f)
Lagerreibung
--
AbleiPZAbleitung PZ des Druckes P nach Z-Lagerreibung--
AbleiRadiantAbleitung Y/ T bei nicht-äquidistanter Schrittweite T(JT), die Funktionswerte Y sind Winkel, gemessen in Radiant-Komplettieren--
AktualRegisterAktualisierung der Kennzahlen der primären Ein- und Ausgabedaten im Datenregister- PreProzessor
PostProzessor
Steuerparameter
Datenregister
Schmierung
-
AnfangsdatenAnfangsdatensatz festlegen PAnfang3
AuswahlStandard
Umrechnungs­faktoren
Preprozessor Text
Steuerparameter
Steuerfelder
Datenregister
interneParameter
konstanteParameter
VersatzLager
Belastungsfunktionen
SpaGeo
ElastVerform
Schmierung
Geraetevarianten
variableParameter
konstVarParameter
DruckZeit
Bezugsparameter
NXZMax
NTMax
NTaMax
NTyp
NPaMax
NChpMax
Anima_2d_AxAusgabe der Datendateien für Gnuplot zur Animation von 2D-Bildern im Axialschnitt über die ZeitSpaGeoH
GeoSchale
PostProzessor Steuerfelder
variableParameter
aktuelleVarParameter
Bezugsparameter
NXZMax
NTMax
Anima_2d_QuerAusgabe der Datendateien für Gnuplot zur Animation von 2D-Bildern im Querschnitt über die ZeitSpaGeoH
GeoSchale
PostProzessor Steuerfelder
variableParameter
aktuelleVarParameter
Bezugsparameter
NXZMax
NTMax
Anima_3dAusgabe der Datendateien für Gnuplot zur Animation von 3D-Bildern über die ZeitSpaGeoHPostProzessorvariableParameter
aktuelleVarParameter
Bezugsparameter
NXZMax
NTMax
Anima_3d_SpielAusgabe der Datendateien für Gnuplot zur Animation der Lagerspielraums über die ZeitSpaGeoHPostProzessor Steuerparameter
konstanteParameter
variableParameter
aktuelleVarParameter
NTMax
Anima_VarParaAusgabe der Datendateien für Gnuplot zur Animation der zeitabhängigen Parameter -PostProzessor variableParameter
Bezugsparameter
NTMax
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
AnzeigeDeltaHPAnzeigen der elastischen Verformung DeltaHP zu einem ausgewählten Zeitpunkt JT auf dem Bildschirm-PostprozessorBezugsparameter-
AnzeigeDruckPAnzeigen der Ergebnisse vom Zeitpunkt JT-PostProzessorBezugsparameter-
AnzeigeKonst­Para Anzeigen der relevanten konstanten dimensionslosen Parameter- PostProzessor
AusgabeProtokoll
Steuerparameter
konstanteParameter
VersatzLager
Belastungsfunktionen
konstVarParameter
Bezugsparameter
-
AnzeigeKonst­Para­Dim Anzeigen der relevanten konstanten dimensionsbehafteten Parameter-PostProzessor
AusgabeProtokoll
Steuerparameter
konstanteParameter
VersatzLager
Belastungsfunktionen
konstVarParameter
Bezugsparameter
-
AnzeigeSchmier­Bilanz Anzeige der Ölstrom- und Leistungsbilanz des Schmiersystems-Postprozessor
AusgabeSchmier­daten
Schmierung
Geraetevarianten
NTaMax
NTyp
NPaMax
AnzeigeSchmier­Bilanz­DimAnzeige der Ölstrom- und Leistungsbilanz des Schmiersystems-Postprozessor
AusgabeSchmier­daten
Schmierung
Geraetevarianten
Bezugsparameter
NTaMax
NTyp
NPaMax
AnzeigeSchmier­system Universalschmiersystem anzeigen, dimensionsbehaftet-Schmiersystem
AusgabeProtokoll
Schmierung
Geraetevarianten
Bezugsparameter
NTaMax
NTyp
NPaMax
AnzeigeSpalt­Bilanz Berechnen und Anzeigen der Ströme, Drücke und Leistungen am SchmierspaltAbfluss,
Lagerreibung
Spaltvolumen
PostProzessor
AusgabeSchmier­daten
Steuerparameter
Steuerfelder
konstanteParameter Schmierung
NTaMax
AnzeigeSpalt­Bilanz­Dim Berechnen und Anzeigen der Ströme, Drücke und Leistungen am SchmierspaltAbfluss
Lagerreibung
Spaltvolumen
PostProzessor
AusgabeSchmier­daten
Steuerparameter
Steuerfelder
konstanteParameter
Schmierung
Bezugsparameter
NTaMax
AnzeigeSpaltHAnzeigen der Spalthöhe zu einem ausgewählten Zeitpunkt JT auf dem BildschirmSpaGeoHPostProzessorvariableParameter
aktuelleVarParameter
Bezugsparameter
NTMax
AnzeigeVarParaAnzeigen der ausgewählten zeitvariablen ParameterAnzeigeVarPara­Ein
Kippmoment2
DruckMax
PostProzessor
Solver
Steuerparameter
Datenregister
Anzeigeauswahl
konstanteParameter
variableParameter
DruckZeit
Bezugsparameter
NXZMax
NTMax
AnzeigeVarPara­Ein Anzeigen der relevanten variablen Parameter-AnzeigeVarPara
VarPara
--
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
AusgabeDruckPAusgabe eines dimensionslosen Druckverlaufs aus P in eine Text-DateiDateiAufruf1PostProzessorSteuerparameter
Bezugsparameter
-
AusgabeFeldYAusgabe des Funktionsverlaufes Y(Z,X) auf der Ausgabeeinheit u-AbleiDeltaHP
GeoSchale
Komplettieren
SpaGeo4
--
AusgabeKXAusgabe des reduzierten Steuerfeldes KX-AusgabeKX00
Schmiertaschen
--
AusgabeKX00Ausgabe eines einzelnen reduzierten Steuerfeldes KX in eine DateiAusgabeKX
DateiAufruf1
Schmiertaschen--
AusgabeMatrix­Chp Ausgabe der Elastizitätsmatrix Chp(NZ,NX,NZZ,NXX), wahlweise dimensionslos oder dimensionsbehaftetDateiAufruf1MatrixChpSteuerparameter
Bezugsparameter
-
AusgabePara5Ausgabe aller Eingabe- und Ergebnissedaten in eine DateiAusgabeKX
DateiAufruf1
PostProzessor
PreProzessor
Text
Steuerparameter
Datenregister
konstanteParameter
VersatzLager
Belastungsfunktionen
Schmierung
Geraetevarianten
variableParameter
konstVarParameter
Bezugsparameter
NTMax
NTaMax
NTyp
NPaMax
AusgabeProtokollAusgabe aller Eingabe- und Ergebnissdaten in eine manuell lesbare DateiAnzeigeKonst­Para
AnzeigeKonst­Para­Dim
AnzeigeSchmier­system
AusgabeKX
AnzeigeVarPara
DateiAufruf1
PostProzessorText
Steuerparameter
Schmierung
Bezugsparameter
-
(Ausgabe­Schalen­form) Ausgabe der Schalengeometrie punktweise in eine Datei
(nur für Testzwecke)
DateiAufruf1PostProzessorSteuerparameter
KonstanteParameter
Bezugsparameter
-
AusgabeSchmier­daten Ausgabe der Schmiersystemdaten für einen ausgewählten Zeitpunkt in eine DateiAnzeigeSchmier­Bilanz
AnzeigeSchmier­Bilanz­Dim
AnzeigeSpalt­Bilanz
AnzeigeSpalt­Bilanz­Dim
DateiAufruf1
PostProzessor--
AusgabeVarParaAusgeben der variablen primären Eingabedaten in eine DateiDateiAufruf1VarPara--
AuswahlAnzeigeAuswahl der anzuzeigenden zeitvariablen ParameterAuswahlStandardPostProzessorDatenregister
Anzeigeauswahl
NTMax
AuswahlStandard Auswahl der standardmäßig anzuzeigenden zeitvariablen Parameter-Anfangsdaten
AuswahlAnzeige
Anzeigeauswahl-
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
BetragBerechnung des Betrags eines Vektors-GMRES_ILU­_pack--
Bild_2d_AxAusgabe P,H,FH,F zum Zeitpunkt JT für grafische 2d-Anzeige des axialen Querschnitts mit GnuplotSpaGeoH
GeoSchale
PostProzessorSteuerfelder
variableParameter
aktuelleVarParameter
Bezugsparameter
NXZMax
NTMax
Bild_2d_QuerAusgabe P,H,FH,F zum Zeitpunkt JT für grafische 2d-Anzeige eines Querschnitts senktrecht zur Lagerachse mit GnuplotSpaGeoH
GeoSchale
PostProzessorSteuerfelder
variableParameter
aktuelleVarParameter
Bezugsparameter
NXZMax
NTMax
Bild_3dAusgabe P,H,FH,F zum Zeitpunkt JT für grafische 3d-Anzeige mit GnuplotSpaGeoHPostProzessorvariableParameter
aktuelleVarParameter
NXZMax
NTMax
Bild_3d_SpielAusgabe des Spielraums Spiel(X,Z) zum Zeitpunkt JT für grafische 3d-Anzeige mit GnuplotSpaGeoHPostProzessorSteuerparameter
konstanteParameter
variableParameter
aktuelleVarParameter
NTMax
Bild_Q_LeiAusgabe der Summen von Ölströmen und Leistungen über die Zeit für grafische Anzeige mit GnuplotLagerreibungPostProzessorSchmierung
variableParameter
Bezugsparameter
NTMax
NTaMax
Bild_VarParaAusgabe der variablen Parameter über das Intervall JT=NT1 bis NT2-PostProzessorvariableParameterNTMax
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
DateiAufruf1Öffnet eine Textdatei zur Ausgabe von Daten-AusgabeDruckP
AusgabeKX00
AusgabeMatrix­Chp
AusgabePara5
AusgabeProtokoll
Ausgabe­Schalen­form
AusgabeSchmier­daten
AusgabeVarPara
FormSchale
FormWelle
--
DateiAufruf2Öffnet eine Textdatei zu Einlesen von Daten-LesenDruckP
LesenKX00
LesenMatrixChp
LesenPara5
LesenVarPara
FormSchale
FormWelle
--
DimParameterEingeben bzw. Ändern der Bezugsparameter, Umrechnen der restlichen ParameterUmrechnungs­faktorenPreProzessorkonstanteParameter
Belastungsfunktionen
SpaGeo
ElastVerform
Schmierung
Geraetevarianten
variableParameter
konstVarParameter
DruckZeit
Bezugsparameter
NXZMax
NTMax
NTaMax
NTyp
NPaMax
NChpMax
DruckMaxErmittlung des maximalen Schmierfilmdruckes zu einem Zeitpunkt JT-AnzeigeVarPara--
Druckverlauf1Berechnung des Druckverlaufes P über NT Zeitschritte nach der Reynoldsschen DGLSpaGeoH
Um1
Um4
SoZahl
FilmDruck1
(FilmDruck1­_unpack.f)
Verformung
AbleiDeltaHP
SolverSteuerparameter
interneParameter
konstanteParameter
ElastVerform
Schmierung
variableParameter
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
NChpMax
Druckverlauf2Berechnung des Druckverlaufes P über NT Zeitschritte nach der erweiterten Reynoldsschen DGLSpaGeoH
UmAb3
UmAb4
Fuell1
SoZahl
FilmDruck2
(FilmDruck2­_unpack.f)
Verformung
AbleiDeltaHP
SolverSteuerparameter
Steuerfelder
interneParameter
konstanteParameter
ElastVerform
Schmierung
variableParameter
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
NChpMax
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
FilmDruck1Berechnung des Druckverlaufes P zum Zeitpunkt JT nach der Reynoldsschen DGL. Direkte Erzeugung der gepackten MatrixSpaGeo4
SpaGeo5
KoDGL3
KoMa1_pack
KoMa2_pack
KoMa3_pack
KoMa4_pack
GMRES_ILU­_pack
RueSp2
Pkorr1
SoZahl
Druckverlauf1
Verlagerung1
Verlagerung2
Steuerparameter
Steuerfelder
interneParameter
konstanteParameter
Schmierung
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
(FilmDruck1­_unpack.f)Berechnung des Druckverlaufes P zum Zeitpunkt JT nach der Reynoldsschen DGL. Zunächst Erzeugung der ungepackten Matrix K
(nur für Testzwecke)
SpaGeo4
SpaGeo5
KoDGL3
Koma1
KoMa2
Koma3
KoMa4
MatrixPacken
GMRES_ILU­_pack
(SIMQ)
RueSp2
Pkorr1
SoZahl
Druckverlauf1
Verlagerung1
Verlagerung2
Steuerparameter
Steuerfelder
interneParameter
konstanteParameter
Schmierung
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
NGleiMax
FilmDruck2Berechnung des Druckverlaufes P zum Zeitpunkt JT nach der erweiterten Reynoldsschen DGL. Direkte Erzeugung der gepackten MatrixSpaGeo4
SpaGeo5
KleiDru4
HypEx2
Pkorr6
AbleiPX
KoeDGL7
KoMa1_pack
KoMa2_pack
KoMa3_pack
KoMa4_pack
GMRES_ILU­_pack
RueSp2
Pglatt
SoZahl
Druckverlauf2
Verlagerung1
Verlagerung2
Steuerparameter
Steuerfelder
interneParameter
konstanteParameter
Schmierung
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
(FilmDruck2­_unpack.f)Berechnung des Druckverlaufes P zum Zeitpunkt JT nach der erweiterten Reynoldsschen DGL. Zunächst Erzeugung der ungepackten Matrix K
(nur für Testzwecke)
SpaGeo4
SpaGeo5
KleiDru4
HypEx2
Pkorr6
AbleiPX
KoeDGL7
Koma1
KoMa2
Koma3
KoMa4
MatrixPacken
GMRES_ILU­_pack
(SIMQ)
RueSp2
Pglatt
SoZahl
Druckverlauf2
Verlagerung1
Verlagerung2
Steuerparameter
Steuerfelder
interneParameter
konstanteParameter
Schmierung
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
NGleiMax
FlaecheFlächenelement zu einer Nut hinzufügen oder entfernen-Schmiertaschen--
FormSchaleLesen, anzeigen und ausgeben der punktweise gegebenen Abweichungen DeltaHLa der LagerschaleDateiAufruf1
DateiAufruf2
PreProzessorBezugsparameter-
FormWelleLesen, anzeigen und ausgeben der punktweise gegebenen Abweichungen DeltaHWe0 der WelleDateiAufruf1
DateiAufruf2
PreProzessorBezugsparameter-
Fuell1Berechnung des Oelverteilung FH und verschieben um DT*Omega/2-Druckverlauf2
VerlagBahn2
--
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
GeoSchaleBerechnung der Lagerschalengeometrie(AusgabeFeldY)Anima_2d_Quer
Anima_2d_Ax
Bild_2d_Quer
Bild_2d_Ax
Steuerparameter
konstanteParameter
VersatzLager
-
GMRES_ILU­_packLösung von Gleichungssystemen der Form A X =BILU_Zerlegung­_pack
Betrag
LU_Multi_pack
MatrixVektorMulti­_pack
FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
-NXZMax
NTaMax
HypEx2Schätzen der Drücke P eines Zeit- bzw. Iterationsschrittes durch Hyperbelextrapolation-FilmDruck2
(FilmDruck2­_unpack.f)
--
ILU_Zerlegung­_packBerechnung der Matrix M, zur ILU-Präkondditionierung-GMRES_ILU­_pack--
InternParaBearbeitung der programminternen Paramter-PreProzessorSteuerparameter
interneParameter
-
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
Kippmoment2Berechnung des Kippmoments Mo, XMo, Mo1,Mo2-AnzeigeVarPara--
KleiDru4Berechnung der Kleinstdrücke PK-FilmDruck2
(FilmDruck2­_unpack.f)
--
KoeDGL3Berechnung der Koeffizienten der Reynoldsschen Differentialgleichung und der rechten Seite-FilmDruck1
(FilmDruck1­_unpack.f)
--
KoeDGL7Berechnung der Koeffizienten der erweiterten Differentialgleichung und der rechten Seite-FilmDruck2
(FilmDruck2­_unpack.f)
--
(Koma1) Aufstellen der Koeffizientenmatrix und Vektors R der rechten Seite, wenn NTa=0
(nur für Testzwecke)
-(FilmDruck1­_unpack.f)
(FilmDruck2­_unpack.f)
--
KoMa1_packAufstellen der Koeffizientenmatrix und Vektors R der rechten Seite in gepackter Form, wenn NTa=0-FilmDruck1
FilmDruck2
--
(KoMa2)Aufstellen der ersten NGL Zeilen der Koeffizientenmatrix K und des Vektors R der rechten Seiten, wenn NTa>0
(nur für Testzwecke)
-(FilmDruck1­_unpack.f)
(FilmDruck2­_unpack.f)
--
KoMa2_packAufstellen der ersten NGlei Zeilen der Koeffizientenmatrix K und des Vektors R der rechten Seiten gepackter Form in gepackter Form, wenn NTa>0-FilmDruck1
FilmDruck2
--
(KoMa3)Erzeugen der NGlei+1 bis NGlei+NTa Gleichungen, wenn NTa>0
(nur für Testzwecke)
-(FilmDruck1­_unpack.f)
(FilmDruck2­_unpack.f)
--
KoMa3_packErzeugen der NGlei+1 bis NGlei+NTa Gleichungen in gepackter Form, wenn NTa>0-FilmDruck1
FilmDruck2
-NXZMax
NTaMax
(KoMa4) Erzeugung der restlichen Gleichung für die Universalschmiereinrichtung, ohne Druckwaage
(nur für Testzwecke)
-(FilmDruck1­_unpack.f)
(FilmDruck2­_unpack.f)
Schmierung
Geraetevarianten
NTaMax
NPaMax
KoMa4_pack Erzeugung der restlichen Gleichung für die Universalschmiereinrichtung-FilmDruck1
FilmDruck2
Schmierung
Geraetevarianten
NTaMax
NPaMax
KomplettierenSekundäre Eingabeparameter berechnenAblei
AbleiRadiant
Umrechnungs­faktoren
(AusgabeFeldY)
PreProzessor
PostProzessor
Steuerparameter
konstanteParameter
Belastungsfunktionen
Geraetevarianten
variableParameter
konstVarParameter
NTMax
NTaMax
NPaMax
NChpMax
(KonDru)Kontrollausgabe der Steuerfeldes KX, KZ, NG
(nur für Testzwecke)
-PreProzessor --
konstParameterkonstante dimensionslose Parameter bearbeitenkonstParaPruefenPreProzessorSteuerparameter
konstanteParameter
VersatzLager
Belastungsfunktionen
konstVarParameter
NXZMax
NTMax
konstParameter­Dim konstante dimensionsbehaftete Parameter bearbeitenkonstParaPruefenPreProzessorSteuerparameter
konstanteParameter
VersatzLager
Belastungsfunktionen
konstVarParameter
Bezugsparameter
NXZMax
NTMax
konstParaPruefenPrüfen der konstanten Parameter-konstParameter
konstParameter­Dim
Steuerparameter
konstanteParameter
VersatzLager
Belastungsfunktionen
konstVarParameter
-
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
LagerreibungBerechnung der Lagerreibung zu einem ausgewählten ZeitpunktSpaGeoH
AbleiPX
AbleiPZ
AnzeigeSpalt­Bilanz
AnzeigeSpalt­Bilanz­Dim
Bild_Q_Lei
Steuerparameter
Steuerfelder
konstanteParameter
variableParameter
aktuelleVarParameter
Druck
NXZMax
NTMax
LesenDruckPEinzelnen Druckverlauf aus einer Datei lesenDateiAufruf2PAnfang1Steuerparameter
Bezugsparameter
-
LesenKXLesen eines reduzierten Steuerfeldes KX-LesenKX00
LesenPara5
--
LesenKX00Reduziertes Steuerfeld KX aus Datei lesenDateiAufruf2
LesenKX
Schmiertaschen--
LesenMatrixChpEinlesen einer dimensionslosen oder dimensionsbehafteten Elastizitätsmatrix ChpDateiAufruf2MatrixChpSteuerparameter
Bezugsparameter
-
LesenPara5Einlesen einer Eingabe- bzw. ErgebnisdatenDateiAufruf2
LesenKX
PostProzessor
PreProzessor
Text
Steuerparameter
Steuerfelder
konstanteParameter
VersatzLager
Belastungsfunktionen
SpaGeo
ElastVerform
Schmierung
Geraetevarianten
variableParameter
konstVarParameter
DruckZeit
Bezugsparameter
NXZMax
NTMax
NTaMax
NTyp
NPaMax
NChpMax
LesenVarParaLesen der variablen primären Eingabedaten aus einer DateiDateiAufruf2VarPara--
LU_Multi_packMultiplikation (LU)-1·b-GMRES_ILU­_pack--
Luecken_wegLücken in Schmiernutenliste beseitigen-PostProzessor
PreProzessor
Schmiertaschen
--
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
MatrixChpZurücksetzen, Lesen, Anzeigen, Ausgeben der Elastizitätsmatrix ChpAusgabeMatrix­Chp
LesenMatrixChp
MatrixChpCheck
PreProzessorElastVerform
Bezugsparameter
NXZMax
NTMax
NChpMax
MatrixChpCheckNXP,NZP berechnen, Größe der Matrix Chp prüfen-MatrixChp--
(MatrixPacken) Packen der Matrix A
(nur für Testzwecke)
-(FilmDruck1­_unpack.f)
(FilmDruck2­_unpack.f)
--
MatrixVektorMulti­_packMultiplikation der Matrix A mit dem Vektor b-GMRES_ILU­_pack--
MusterBerechnen der Steuerfelder KX,KZ,NG-PreProzessor
PostProzessor
--
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
PAnfang1Festlegen der AnfangsdruckverteilungPAnfang3
PAnfang4
LesendruckP
Verformung
PreProzessorSteuerparameter
konstanteParameter
ElastVerform
variableParameter
Bezugsparameter
NXZMax
NTMax
NChpMax
PAnfang3Anfangsdruck setzen-PAnfang1
Anfangsdaten
--
PAnfang4Druckverlauf vom Zeitpunkt JT zum neuen Anfangsdruck machen-PAnfang1variableParameter
konstVarParameter
NTMax
PglattGlättet den Druckverlauf-FilmDruck2
(FilmDruck2­_unpack.f)
--
Pkorr1Korrektur der Näherungsdrücke, wenn P<0, dann P=0-FilmDruck1
(FilmDruck1­_unpack.f)
--
Pkorr6Korrektur der Näherungs-drücke: P=PK für P-FilmDruck2
(FilmDruck2­_unpack.f)
--
PostProzessorErgebnisse sichern und weiter bearbeitenAusgabePara5
LesenPara5
AusgabeProtokoll
AktualRegister
Komplettieren
Luecken_weg
Muster
Bild_3d
Anima_3d
Bild_2d_Quer
Anima_2d_Quer
Bild_2d_Ax
Anima_2d_Ax
Bild_VarPara
Anima_VarPara
Bild_Q_Lei
Bild_3d_Spiel
Anima_3d_Spiel
AnzeigeKonst­Para
AnzeigeKonst­Para­Dim
AnzeigeVarPara
AnzeigeDruckP
AnzeigeSpaltH
AnzeigeDeltaHP
AnzeigeSchmier­Bilanz
AnzeigeSchmier­Bilanz­Dim
AnzeigeSpalt­Bilanz
AnzeigeSpalt­Bilanz­Dim
AusgabeSchmier­daten
AuswahlAnzeige
AusgabeDruckP
(Ausgabe­Schalen­form)
SIRIUSText
Steuerparameter
Steuerfelder
konstanteParameter
SpaGeo
ElastVerform
DruckZeit
NXZMax
NTMax
NTaMax
NChpMax
PreProzessorErzeugen und Manipulieren der EingabeparameterAnfangsdaten
PAnfang1
AktualRegister
Komplettieren
Steuerpara
DimParameter
konstParameter
konsParameterDim
VarPara
LesenPara5
AusgabePara5
Luecken_weg
Muster
FormWelle
FormSchale
MatrixChp
Schmiertaschen
(KonDru)
Schmiersystem
InternPara
SIRIUSText
Steuerparameter
Steuerfelder
konstanteParameter
SpaGeo
ElastVerform
Schmierung
DruckZeit
NXZMax
NTMax
NTaMax
NChpMax
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
RueSp2Rückspeichern der Werte aus dem Ergebnisvektor R in die Felder P, PPu, QPu, PTa, QVe- FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
--
Schmiergeraet­Loeschen Löschen einer Gerätetevariante für die Verbindungsleitungen-Schmiersystem--
SchmierPruefenPrüfen, ob die Eingabedaten zur Beschreibung des Schmiermittel­versorgungs­systems fehlerfrei sind-SchmiersystemSchmierung
Geraetevarianten
Bezugsparameter
NTaMax
NTyp
NPaMax
Schmierpumpe­Loeschen Eine Schmiermittelpumpe löschen-Schmiersystem--
SchmiersystemUniversal-Schmiermittel-Versorgungssystem bearbeitenAnzeigeSchmier­system
Schmierpumpe­Loeschen
Schmiergeraet­Loeschen
SchmierPruefen
PreProzessorSchmierung
Geraetevarianten
Bezugsparameter
NTaMax
NTyp
NPaMax
SchmiertaschenAnordnung der Schmiertaschen bzw. Schmiernuten bearbeitenAusgabeKX
AusgabeKX00
Flaeche
LesenKX00
Luecken_weg
PreProzessorSteuerfelder
Schmierung
NXZMax
NTaMax
(SIMQ)Lösung des Linearen Gleichungssystems K*P=R mit dem Gauss-Algorithmus
(nur für Testzwecke)
(FilmDruck1­_unpack.f)
(FilmDruck2­_unpack.f)
---
SIRIUSHauptroutine
(Siehe 1-Sirius am Tabellenanfang)
SolverBerechnung des Primärdatensatzes P(Z,X,T) und der Verlagerungsbahn bzw. des BelastungsverlaufesDruckverlauf2
Druckverlauf1
VerlagBahn2
VerlagBahn1
AnzeigeVarPara
SIRIUSSteuerparameter
konstanteParameter
-
SoZahlBerechnung der Lagerbelastung F1,F2-Druckverlauf1
Druckverlauf2
FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
VerlagBahn1
VerlagBahn2
--
SpaGeo4Berechnung der Spaltgeometrie H,HX,HZ,HT mit Form- und Lageabweichungen (außer elastische Verformung)(AusgabeFeldY)Abfluss
FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
SpaGeoH
Steuerparameter
konstanteParameter
VersatzLager
SpaGeo
ElastVerform
aktuelleVarParameter
NXZMax
NTMax
SpaGeo5Berechnung der Spaltgeometrie H,HX,HZ,HT eines zylindrischen, achsparallelen Lagers-FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
SpaGeoH
konstanteParameter
aktuelleVarParameter
-
SpaGeoHBereitstellung der Spaltgeometrie HSpaGeo4
SpaGeo5
Druckverlauf2
Druckverlauf1
VerlagBahn2
VerlagBahn1
Anima_2d_Quer
Anima_2d_Ax
Anima_3d
Anima_3d_Spiel
Lagerreibung
Bild_2d_Quer
Bild_2d_Ax
Bild_3d
Bild_3d_Spiel
AnzeigeSpaltH
Spaltvolumen
SteuerparameterNXZMax
SpaltvolumenBerechnung des Spaltvolumens, der Spaltfüllung und deren Ableitungen über die Zeit für einen Zeitpunkt JTSpaGeoHAnzeigeSpalt­Bilanz
AnzeigeSpalt­Bilanz­Dim
Steuerparameter
konstanteParameter
variableParameter
aktuelleVarParameter
NTMax
SteuerparaAnzeigen und ändern der Steuerparameter-PreProzessorSteuerparameter-
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
Um1Umspeichern von P_Ak auf P und der zugehörigen Daten der Schmiermittel­ver­ sorgung-Druckverlauf1
VerlagBahn1
--
Um4Umspeichern von P_AK auf P und der zugehörigen Daten der Schmiermittel­ver­sorgung-Druckverlauf1
VerlagBahn1
--
UmAb3Umspeichern von P auf Pzeit und der zugehörige Daten der Schmiermittel­ver­sorgung-Druckverlauf2--
UmAb4Berechnung von PT und Umspeicherung von P auf P_Ak-Druckverlauf2
VerlagBahn2
--
Umrechnungs­faktoren Berechnung der Umrechnungsfaktoren für die dimensionsbehafteten Parameter-Anfangsdaten
DimParameter
Komplettieren
konstanteParameter
Bezugssparameter
Geraetevarianten
NTaMax
NTyp
NPaMax
A Anz Aus B D F G H I K L M P R S U V
RoutinennameAufgabeRuft folgende Routinen aufWird von folgenden Routinen aufgerufenVerwendet folgende Common-BlöckeParameter
VarParaEingabe der variablen ParameterAnzeigeVarPara­Ein
AusgabeVarPara
LesenVarPara
VarParPruefen
verParaWarn
PreProzessorSteuerparameter
Datenregister
konstanteParameter
variableParameter
konstVarParameter
Bezugsparameter
NTMax
VarParaPruefenKonsistenzprüfung der variablen Parameter-VarPara--
VarParaWarnAusgabe von Warnhinweisen-VarPara--
VerformungBerechnung der aktuellen elastischen Verformung HP zum Zeitpunkt JT(AnzeigeDeltaHP)Druckverlauf2
Druckverlauf1
VerlagBahn2
VerlagBahn1
PAnfang1
Steuerparameter
konstanteParameter
-
VerlagBahn1Berechnung der Verlagerungsbahn nach der kassischen Reynoldsschen DGLSpaGeoH
Um1
Um4
SoZahl
Verlagerung1
Verlagerung2
Verformung
AbleiDeltaHP
SolverSteuerparameter
interneParameter
konstanteParameter
ElastVerform
Schmierung
variableParameter
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
NChpMax
VerlagBahn2Berechnung der Verlagerungsbahn nach der erweiterten Reynoldsschen DGLSpaGeoH
UmAb3
UmAb4
Fuell1
SoZahl
Verlagerung1
Verlagerung2
Verformung
AbleiDeltaHP
SolverSteuerparameter
interneParameter
konstanteParameter
ElastVerform
Schmierung
variableParameter
aktuelleVarParameter
Druck
DruckZeit
NXZMax
NTMax
NTaMax
NChpMax
Verlagerung1Berechnung der Verlagerung E1, E2 zum aktuellen Zeitpunkt FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
VerlagBahn1
VerlagBahn2
Steuerparameter
interneParameter
variableParameter
aktuelleVarParameter
NTMax
Verlagerung2Berechnung der Verlagerung E, XE zum aktuellen Zeitpunkt FilmDruck1
(FilmDruck1­_unpack.f)
FilmDruck2
(FilmDruck2­_unpack.f)
VerlagBahn1
VerlagBahn2
Steuerparameter
interneParameter
variableParameter
aktuelleVarParameter
NTMax
A Anz Aus B D F G H I K L M P R S U V
zurück   weiter

.

.

.