FORTRAN Beispiele

Auf Wunsch hier mal ein kleines PDF
tridiag_gauss.pdf (980 KB)

mein Adobe Reader regt sich auf dass er die Datei nicht öffnen kann :frowning:

same here

Lustig, mein Acrobat Reader kanns auch nicht lesen, vielleicht liegts daran, dass das ein Version-1.6-PDF ist. Xpdf öffnets aber ohne Probleme.

evince kanns lesen :wink:

gswin32 - keine Ahnung warum DIESES Programm auf meiner Festplatte lagert - kann die Datei öffnen. Wenn auch ein kleinwenig pixelig.

Wunderschön was du so aus unserem Code alles herausholen kannst!

Cg

Sodale, hier mal die ganzen Beispiele in FORTRAN.

Der Aufruf von gnuplot in FORTRAN hat den Jericha schwer begeistert - vielen Dank an Gregor :wink:

call system ('gnuplot bsp12.plt')

Beim Beispiel mit den Matrizen fehlen mir die Beispielmatrizen aus den Dateien mat1.d bis mat4.d

Eigentlich braucht ihr nur die .f und die .plt Dateien, um die Programme zum Laufen zu bringen.

/edit: Ich lade vermutlich demnächst auskommentierte Beispiel 11 und 12 hoch.
/edit die zweite: die zerstörten Sonderzeichen in manchen Kommentaren kommen aus der Unvertäglichkeit von Emacs mit diesen.
/edit die dritte: Beispiel 5 funktioniert nun komplett
/edit die vierte: Beispiel 12 wieder mal etwas zusammengestutzt

Funktioniert in C ganz ähnlich:

system("gnuplot bsp12.plt");

So nebenbei: Damit kann man nette Dinge machen, wenn man den Fork-Befehl ned kennt. :smiling_imp:

weil gewünscht… keine Garantie (ich weiß grad selbst micht mehr was wir gemacht habe :frowning: )

Bsp: Ue06A2a.f
(Erstelle eine Routine, die für einen gegebenen Datensatz
(xi, fi), i = 0, . . . ,N, das Interpolationsproblem nach dem
Newton-Verfahren löst. mit händisch eingegeben Daten)

Bsp: Ue06A2b.f
(Verwende die Daten aus Aufgabe 1 und interpoliere für geeignet
große Datensätze an Werten auf einem äquidistanten Gitter mit 1
meV Punktabstand.)
Ue06A2a.f (1.46 KB)
Ue06A2b.f (2.16 KB)