Erste Delphi-Fortran-Erfahrungen

[bap107]

Hallo liebe Community,


ich soll ein Gleichungssystem erstellen und das auch berechnen lassen und wollte einmal fragen, ob mir hierbei vielleicht jemand helfen kann?

Das Grundgerüst ist mir soweit bekannt ... aber an der praktischen Umsetzung hapert es leider etwas :/


Bislang habe ich drei Programme in die Hand bekommen: Notepad++, Delphi und OpenWatcom Fortran Compiler.

Ich habe schon alles in Notepad++ soweit programmiert.
Dadurch erhalte ich dann ja eine *.cop-Datei.

Jetzt soll ich diese *.cop-Datei in eine *.for-Datei umwandeln und dafür benötige ich einen "Delphi zu Fortran-Compiler".
Nehme ich dafür den OpenWatcom Fortran Compiler?
... und wenn ja, weis jemand wie?

Die zweite Frage wäre dann, wie ich dann die dadurch erstellte *.for-Datei in eie ausführbare *.exe-Datei umwandeln kann.
Dies soll durch einen "Fortran-Compiler" geschehen.


Im Anschluss ließe sich dann ja das Gleichungssystem in der Arbeitsumgebung berechnen.
Der Start des Prozesses soll dann über die CMP-Ebene stattfinden.


Es wäre wirklich super, wenn jemand Zeit & Lust hat, sich meiner etwas anzunehmen ... probier schon seit ein paar Tagen rum, hab nirgendwo im Netz etwas dazu entdeckt und bin kurz vorm Verzweifeln



Für Antworten wäre ich euch wirklich super dankbar!

[sx2008]

Zitat von PK87:

ich soll ein Gleichungssystem erstellen und das auch berechnen lassen

Für Schule, Studium oder Beruf?
Ist Fortran fest vorgegeben oder darf's auch eine andere Programmiersprache sein?
(ich würde da ja Python + NumPy verwenden, aber man kann lineare Gleichungssystem auch komplett in Delphi lösen)

[bap107]

Hallo,

vielen Dank erstmal für die Antwort!

Für den Beruf :/

... also vorgegeben ist in dem Sinne nichts ... aber ich hab einen USB-Stick bekommen mit einem Delphi-, einem Fortran- und einem Notepad++-Ordner.

Außerdem ist ein Textdokument dabei, in dem steht:


1.) vollständige Installation des OPen-Watcom Fortran Compilers aus dem Verzeichnis OpenWatcom
2.) Delphi Verzeichnisstruktur auf Laufwerk kopieren z.B. c:\delphi
3.) unter dem Verzeichnis cop befinden sich die Unterverzeichnisse
mit denen die Optiemierungstexte/-programme erstellt werden
z.B. das Verzeichnis testcop


zur Einrichtung Verzeichnis:

a) zuerst durch kopieren von testcop neues Verzeichnis unter cop erstellen; z.B. meincop
b) in das Verzeichnis wechseln
c) mit Notepad++ neue cop-Datei erstellen
d) unter start - ausführen - cmd ausführen
e) auf meincop positionieren
f) Optimierungsprogramm erstellen
g) mit "makearg.bat name" ausführen
h) weitere ausführung mit "name.exe"





1. habe ich gemacht, das ist ja recht offensichtlich
2. habe ich auch gemacht
3. habe ich auch gemacht

a) habe ich
b) habe ich
c) habe ich
d) habe ich
... und ab hier herrscht dann leider Unverständnis :/


Also mir ist klar, wie ich die Datei mit dem Gleichungssystem mithilfe von Notepad++ als *.cop-Datei erstelle ... die Umwandlung in eine *.for und dann in eine *.exe-Datei wie ich es ja machen sollte ist mir aber leider vollkommen unklar :/

[sx2008]

Ich hole mal meine Glaskugel raus:

die Koeffizienten des Gleichungssystems werden als Text eingeben.
(Datei *.cop)
Ein Delphi-Programm erzeugt aus den Koeffizenten ein Fortran-Programm.
(Datei *.for)

Das Fortran-Programm muss kompiliert werden und daraus entsteht eine Exe, die dann letztendlich die Lösung des Gleichungssystems berechnet.

e) auf meincop positionieren
soll wohl heisen du sollst in das Verzeichnis .../meincop wechseln.

makearg.bat ist eine Batchdatei, die den Fortrancompiler aufruft, um aus dem Fortran-Sourcecode eine Exe zu machen.

=========
keine Ahnung wie gross das Gleichungsystem ist, aber mit Python + NumPy kann man Gleichungssysteme interaktiv lösen ohne vorher eine ganze Kette von vorbereitenden Schritten durchlaufen zu müssen.
http://docs.scipy.org/doc/numpy/refe...y.linalg.solve (siehe Examples)

[bap107]

Hallo und nochmals vielen herzlichen Dank für die Antwort!


Genau!
... also: ich öffne als erstes Notepad++ und schreibe da meine ganzen Formeln & Co. entsprechend als Text rein.

Das speichere ich dann als *.cop-Datei in meinem neuen Verzeichnis - bspw. "meincop".


... aber wie kann ich dann aus der Datei eine *.for-Datei machen?
Vielleicht hilft es, wenn ich den mir vorliegenden DELPHI-Ordner mal beschreibe?

Ebene 1:
Ordner Delphi

Ebene 2:
Ordner bin
Ordner cop
Ordner lib

bin-Ebene:
delphiarg

cop-Ebene:
Ordner meincop
mit Inhalt:
Arbeitsumgebung
makearg
s001.cop

lib-Ebene:
wcqclib.lib
Wcqclib-16.lib



Das Gleichungssystem ist ziemlich groß und führt auch zu keiner eindeutigen Lösung. Je nachdem welche Parameter man eingibt wird dann eine bestmögliche Annäherung ermittelt.

:/

[sx2008]

Also entweder findest du unter Delphi\bin\ oder Delphi\bin\delphiarg\ ein Programm (*.exe) oder du musst dieses Programm erst erzeugen.
Dazu müsste dann aber eine passende Delphi-Version installiert sein.

Das Programm heisst evtl. Delphiarg.exe; es nimmt die cop-Datei als Input und erzeugt eine for-Datei.

[bap107]

Hallo,

ich hab grad mal geschaut, in "bin" ist die Datei "delphiarg" eine Anwendung, die ich starten kann -- wenn ich das mache, erscheint aber nur ganz kurz ein kleiner schwarzer Bildschirm, der dann sofort wieder weg ist ... das ist alles :/

[sx2008]

Zitat von PK87:

..in "bin" ist die Datei "delphiarg" eine Anwendung, die ich starten kann -- wenn ich das mache, erscheint aber nur ganz kurz ein kleiner schwarzer Bildschirm, der dann sofort wieder weg ist ...

Das ist eine Konsolenanwendung, die man nur in einer Eingabeaufforderung starten kann:

Du kannst die exe in dein "meincop"-Verzeichnis kopieren und dann dort starten:

Code:

C:\> cd C:\Delphi\cop\meincop

C:\Delphi\cop\meincop>

C:\Delphi\cop\meincop> delphiarg testdaten.cop

[bap107]

Cool!

Das hat tatsächlich geklappt ... für einen Augenblick hatte ich da eine *.for-Datei
... und in der Arbeitsumgebung steht jetzt auch einiges drin.
... also im Titel Delphi übersetzen
Vielen Dank

Weißt Du vielleicht wie ich dann weiter machen kann?
Das macht man einfach mit Enter.
Da käme dann Schritt 2 von 3 ... also Fortran übersetzen
Da müssten dann zwei Dateien erscheinen, eine mit der Endung *.err und eine mit *.obj

... und Schritt drei ist dann Prgramm ausführen ... das wird auch durch nochmaliges Enter-Drücken fortgesetzt ...

[stahli]

Wenn Dir die Formel/Zielstellung bekannt und der Umfang begrenzt ist könnte man das vielleicht in Delphi in einer Formularanwendung neu umsetzen.
Im Handling wäre es sicher einfacher.