MODTRS: Difference between revisions

From BlueM
Jump to navigation Jump to search
m (Vorlage hinzu)
mNo edit summary
Line 1: Line 1:
{{BlauesModell Module}}
{{BlauesModell Module}}


<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_INI () RESULT (LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_INI () RESULT (LOK)</fortran>
:Initialisiere das Modul für Transportelemente
:Initialisiere das Modul für Transportelemente
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_CREATE() RESULT (ID)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_CREATE() RESULT (ID)</fortran>
:Die nächste freie ID ermitteln
:Die nächste freie ID ermitteln
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_NEU () RESULT (LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_NEU () RESULT (LOK)</fortran>
:Neues Transportelement-Objekt einrichten
:Neues Transportelement-Objekt einrichten
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TFIK_NEU () RESULT (TypID)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TFIK_NEU () RESULT (TypID)</fortran>
:Neues Fiktives Transportelement
:Neues Fiktives Transportelement
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TROR_NEU () RESULT (TypID)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TROR_NEU () RESULT (TypID)</fortran>
:Neues Transportelement Typ Rohrleitung
:Neues Transportelement Typ Rohrleitung
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TGER_NEU () RESULT (TypID)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TGER_NEU () RESULT (TypID)</fortran>
:Neues Transportelement Typ offenes Gerinne
:Neues Transportelement Typ offenes Gerinne
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TKNL_NEU () RESULT (TypID)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TKNL_NEU () RESULT (TypID)</fortran>
:Neues Transportelement Typ Abflussbeziehung
:Neues Transportelement Typ Abflussbeziehung
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_LET_ATTRIB_INT () RESULT (IsOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_LET_ATTRIB_INT () RESULT (IsOK)</fortran>
:Ein Attribut setzen
:Ein Attribut setzen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_SYS() RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_SYS() RESULT(LOK)</fortran>
:Neues Transportelement einrichten
:Neues Transportelement einrichten
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_START () RESULT (LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_START () RESULT (LOK)</fortran>
:Anfangsbedingungen der Transportelemente setzen
:Anfangsbedingungen der Transportelemente setzen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TFIK_START () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TFIK_START () RESULT(LOK)</fortran>
:Translation Startbedingungen
:Translation Startbedingungen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TROR_START () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TROR_START () RESULT(LOK)</fortran>
:Freispiegel Rohrleitung Startbedingungen
:Freispiegel Rohrleitung Startbedingungen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TGER_START () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TGER_START () RESULT(LOK)</fortran>
:Offenes Gerinne Startbedingungen
:Offenes Gerinne Startbedingungen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TKNL_START () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TKNL_START () RESULT(LOK)</fortran>
:Kennlinien Gerinne Startbedingungen
:Kennlinien Gerinne Startbedingungen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_WEL () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_WEL () RESULT(LOK)</fortran>
:Transportelement berechnen
:Transportelement berechnen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TFIK_WEL () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TFIK_WEL () RESULT(LOK)</fortran>
:Fiktives Transportelement berechnen
:Fiktives Transportelement berechnen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TROR_WEL () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TROR_WEL () RESULT(LOK)</fortran>
:Freispiegel Rohrleitung berechnen
:Freispiegel Rohrleitung berechnen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TGER_WEL () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TGER_WEL () RESULT(LOK)</fortran>
:Offenes Gerinne berechnen
:Offenes Gerinne berechnen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TKNL_WEL () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TKNL_WEL () RESULT(LOK)</fortran>
:Transportelement mit Kennlinie berechnen
:Transportelement mit Kennlinie berechnen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_CALC () RESULT(LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_CALC () RESULT(LOK)</fortran>
:Methode: Berechne nicht-linearen Speicher
:Methode: Berechne nicht-linearen Speicher
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_CALC_WSP () RESULT (WSPakt)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_CALC_WSP () RESULT (WSPakt)</fortran>
:Methode: Berechnet den Wasserstand
:Methode: Berechnet den Wasserstand
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_HEADWEL () RESULT (N)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_HEADWEL () RESULT (N)</fortran>
:Transportelement Header für Output-File schreiben
:Transportelement Header für Output-File schreiben
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_OUTWEL () RESULT (N)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_OUTWEL () RESULT (N)</fortran>
:Transportelement Ergebnis eines Zeitschrittes ausgeben
:Transportelement Ergebnis eines Zeitschrittes ausgeben
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_UPDATE () RESULT (LOK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_UPDATE () RESULT (LOK)</fortran>
:Übergabe der letzten Zeitschrittwerte
:Übergabe der letzten Zeitschrittwerte
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_MAXSTZ () RESULT (NSTZ)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_MAXSTZ () RESULT (NSTZ)</fortran>
:Anzahl der Stützstellen der Kennlinie
:Anzahl der Stützstellen der Kennlinie
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_MAXTRANS () RESULT (N)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_MAXTRANS () RESULT (N)</fortran>
:Anzahl der Translationselemente fiktiver TRS
:Anzahl der Translationselemente fiktiver TRS
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_TYP () RESULT (TYP)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_TYP () RESULT (TYP)</fortran>
:Typ des Transportelementes
:Typ des Transportelementes
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_MQ () RESULT (MQ)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_MQ () RESULT (MQ)</fortran>
:Startabfluss
:Startabfluss
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_QVOLL () RESULT (QVOLL)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_QVOLL () RESULT (QVOLL)</fortran>
:Maximale Leistung des Moduls
:Maximale Leistung des Moduls
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_KSTG () RESULT (KSTG)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_KSTG () RESULT (KSTG)</fortran>
:Strickler-Beiwert Gerinneschlauch
:Strickler-Beiwert Gerinneschlauch
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_KST () RESULT (KST)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_KST () RESULT (KST)</fortran>
:Strickler-Beiwert Gesamtgerinne
:Strickler-Beiwert Gesamtgerinne
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_KNL () RESULT (NSTZ)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_KNL () RESULT (NSTZ)</fortran>
:Kennlinie
:Kennlinie
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_GET_NAB () RESULT (NAB)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_GET_NAB () RESULT (NAB)</fortran>
:Anzahl der Abläufe des Moduls
:Anzahl der Abläufe des Moduls
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_ANZ_WELVAR () RESULT (N)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_ANZ_WELVAR () RESULT (N)</fortran>
:Anzahl der Ausgabevariablen
:Anzahl der Ausgabevariablen
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_VERSION () RESULT (VERSION)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_VERSION () RESULT (VERSION)</fortran>
:Versionsnummer des Moduls
:Versionsnummer des Moduls
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_IDOK ()  RESULT (OK)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_IDOK ()  RESULT (OK)</fortran>
:Prüfung ob eine gegebene Kennung OK ist? (D.h. gibt's ein Objekt dazu ?)
:Prüfung ob eine gegebene Kennung OK ist? (D.h. gibt's ein Objekt dazu ?)
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_IDObj () RESULT (objptr)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_IDObj () RESULT (objptr)</fortran>
:Objekt zu einer ID
:Objekt zu einer ID
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TFIK_obj () RESULT (objptr)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TFIK_obj () RESULT (objptr)</fortran>
:Objekt zu einer ID
:Objekt zu einer ID
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TROR_obj () RESULT (objptr)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TROR_obj () RESULT (objptr)</fortran>
:Objekt zu einer ID
:Objekt zu einer ID
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TGER_obj () RESULT (objptr)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TGER_obj () RESULT (objptr)</fortran>
:Objekt zu einer ID
:Objekt zu einer ID
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TKNL_obj () RESULT (objptr)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TKNL_obj () RESULT (objptr)</fortran>
:Objekt zu einer ID
:Objekt zu einer ID
<HIGHLIGHTSYNTAX language="fortran90">FUNCTION TRS_TEST () RESULT (i)</HIGHLIGHTSYNTAX>
<fortran>FUNCTION TRS_TEST () RESULT (i)</fortran>
:Testumgebung
:Testumgebung


[[Category:BlauesModell]]
[[Kategorie:BlueM Code]]
[[Category:BlauesModell Code]]

Revision as of 02:38, 13 September 2007

MODULE
Übersicht
MODBEK
MODBF
MODBIL
MODCON
MODEIN
MODERR
MODEZG
MODFKT
MODGGL
MODHYA
MODHYO
MODKAL
MODMAX
MODMISC
MODSCE
MODSTAT
MODSYS
MODTAL
MODTRS
MODURB
MODVER
MODZIEL
MODZRE

<fortran>FUNCTION TRS_INI () RESULT (LOK)</fortran>

Initialisiere das Modul für Transportelemente

<fortran>FUNCTION TRS_CREATE() RESULT (ID)</fortran>

Die nächste freie ID ermitteln

<fortran>FUNCTION TRS_NEU () RESULT (LOK)</fortran>

Neues Transportelement-Objekt einrichten

<fortran>FUNCTION TFIK_NEU () RESULT (TypID)</fortran>

Neues Fiktives Transportelement

<fortran>FUNCTION TROR_NEU () RESULT (TypID)</fortran>

Neues Transportelement Typ Rohrleitung

<fortran>FUNCTION TGER_NEU () RESULT (TypID)</fortran>

Neues Transportelement Typ offenes Gerinne

<fortran>FUNCTION TKNL_NEU () RESULT (TypID)</fortran>

Neues Transportelement Typ Abflussbeziehung

<fortran>FUNCTION TRS_LET_ATTRIB_INT () RESULT (IsOK)</fortran>

Ein Attribut setzen

<fortran>FUNCTION TRS_SYS() RESULT(LOK)</fortran>

Neues Transportelement einrichten

<fortran>FUNCTION TRS_START () RESULT (LOK)</fortran>

Anfangsbedingungen der Transportelemente setzen

<fortran>FUNCTION TFIK_START () RESULT(LOK)</fortran>

Translation Startbedingungen

<fortran>FUNCTION TROR_START () RESULT(LOK)</fortran>

Freispiegel Rohrleitung Startbedingungen

<fortran>FUNCTION TGER_START () RESULT(LOK)</fortran>

Offenes Gerinne Startbedingungen

<fortran>FUNCTION TKNL_START () RESULT(LOK)</fortran>

Kennlinien Gerinne Startbedingungen

<fortran>FUNCTION TRS_WEL () RESULT(LOK)</fortran>

Transportelement berechnen

<fortran>FUNCTION TFIK_WEL () RESULT(LOK)</fortran>

Fiktives Transportelement berechnen

<fortran>FUNCTION TROR_WEL () RESULT(LOK)</fortran>

Freispiegel Rohrleitung berechnen

<fortran>FUNCTION TGER_WEL () RESULT(LOK)</fortran>

Offenes Gerinne berechnen

<fortran>FUNCTION TKNL_WEL () RESULT(LOK)</fortran>

Transportelement mit Kennlinie berechnen

<fortran>FUNCTION TRS_CALC () RESULT(LOK)</fortran>

Methode: Berechne nicht-linearen Speicher

<fortran>FUNCTION TRS_CALC_WSP () RESULT (WSPakt)</fortran>

Methode: Berechnet den Wasserstand

<fortran>FUNCTION TRS_HEADWEL () RESULT (N)</fortran>

Transportelement Header für Output-File schreiben

<fortran>FUNCTION TRS_OUTWEL () RESULT (N)</fortran>

Transportelement Ergebnis eines Zeitschrittes ausgeben

<fortran>FUNCTION TRS_UPDATE () RESULT (LOK)</fortran>

Übergabe der letzten Zeitschrittwerte

<fortran>FUNCTION TRS_GET_MAXSTZ () RESULT (NSTZ)</fortran>

Anzahl der Stützstellen der Kennlinie

<fortran>FUNCTION TRS_GET_MAXTRANS () RESULT (N)</fortran>

Anzahl der Translationselemente fiktiver TRS

<fortran>FUNCTION TRS_GET_TYP () RESULT (TYP)</fortran>

Typ des Transportelementes

<fortran>FUNCTION TRS_GET_MQ () RESULT (MQ)</fortran>

Startabfluss

<fortran>FUNCTION TRS_GET_QVOLL () RESULT (QVOLL)</fortran>

Maximale Leistung des Moduls

<fortran>FUNCTION TRS_GET_KSTG () RESULT (KSTG)</fortran>

Strickler-Beiwert Gerinneschlauch

<fortran>FUNCTION TRS_GET_KST () RESULT (KST)</fortran>

Strickler-Beiwert Gesamtgerinne

<fortran>FUNCTION TRS_GET_KNL () RESULT (NSTZ)</fortran>

Kennlinie

<fortran>FUNCTION TRS_GET_NAB () RESULT (NAB)</fortran>

Anzahl der Abläufe des Moduls

<fortran>FUNCTION TRS_ANZ_WELVAR () RESULT (N)</fortran>

Anzahl der Ausgabevariablen

<fortran>FUNCTION TRS_VERSION () RESULT (VERSION)</fortran>

Versionsnummer des Moduls

<fortran>FUNCTION TRS_IDOK () RESULT (OK)</fortran>

Prüfung ob eine gegebene Kennung OK ist? (D.h. gibt's ein Objekt dazu ?)

<fortran>FUNCTION TRS_IDObj () RESULT (objptr)</fortran>

Objekt zu einer ID

<fortran>FUNCTION TFIK_obj () RESULT (objptr)</fortran>

Objekt zu einer ID

<fortran>FUNCTION TROR_obj () RESULT (objptr)</fortran>

Objekt zu einer ID

<fortran>FUNCTION TGER_obj () RESULT (objptr)</fortran>

Objekt zu einer ID

<fortran>FUNCTION TKNL_obj () RESULT (objptr)</fortran>

Objekt zu einer ID

<fortran>FUNCTION TRS_TEST () RESULT (i)</fortran>

Testumgebung