Leute, ist sag es schon die ganze Zeit: Fortran ist eine tote Sprache. Und damit meine ich nicht nur diese verbuggten Compiler. Oder dass es ewig braucht bis man ein neues Feature vom Compiler unterstützt wird. Im Fortran 2003 Standard sind zwar schön viele OO Ansatze festgelegt, aber ich kenne kein Compiler der den Standard […]
03.09.2014
01.09.2014
Fortran progressmeter nice code
! use modulo to determine when to print progress ! not independet of called algorithm speed ! possible output: ! 0.0 % done ! 0.01 % done ! 0,02 % done ! 0,03 % done ! or only one output ! 80.0 % done ! We can do better! subroutine variant1(n) implicit none integer, intent(in) […]
Comments Off on Fortran progressmeter nice code
26.07.2014
Fortran Speicherverbraucht ermitteln
Wieviel Speicher verbraucht mein Programm? Die Frage ist nicht so einfach zu beantworten, denn es gibt kein Funktionsaufruf in C der bei jedem Compiler und jedem *unix funktioniert. Nach vielen googlen habe ich herausgefunden, dass es wohl am besten ist, die entsprechenden Datein in /proc zu parsen. In /proc/self/status steht unter anderem auch der Speicherverbraucht […]
Comments Off on Fortran Speicherverbraucht ermitteln
18.10.2013
06.10.2012
Installing gcc, g++ and gfortran 4.8 from source
First read http://gcc.gnu.org/install/ Make sure you have all Prerequisites installed! Download all files to ~/opt/downloads Install all packages to ~/opt/ Download gcc 4.8 from ftp://ftp.gwdg.de/pub/misc/gcc/snapshots/LATEST-4.8/ and unpack it. wget ftp://ftp.gwdg.de/pub/misc/gcc/snapshots/LATEST-4.8/gcc-4.8-20120930.tar.bz2 tar xjf gcc-4.8-20120930.tar.bz2 cd gcc-4.8-20120930 Download several necessary librarys into the gcc source directory and unpack them. They will be built together with GCC. wget […]
23.08.2012
Farbige Konsolenausgabe
Farbe in der Konsole ist nicht schwer. Beispiele in C und Fortran: #include < unistd.h > void resetFont() { if (isatty (fileno (stdout))) std::cout
04.04.2012
Scheiß Fortran
Ich hasse es, wirklich. Welche Ausgabe erwartet ihr bei diesem Programm? subroutine func() implicit none real :: time = 0; time = time + 1 write(*,*) time end subroutine program test implicit none integer :: i do i = 1, 10 call func() end do end Zehn mal die Ausgabe von "1"? Nein, falsch! thomas@cluster:~$ […]