mirror of
https://git.gfz-potsdam.de/naaice/iphreeqc.git
synced 2025-12-16 00:28:23 +01:00
5d19f28a86
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@4367 1feff8c3-07ed-0310-ac33-dd36852eb9cd
6 lines
146 B
Fortran
6 lines
146 B
Fortran
PROGRAM test_f77
|
|
IMPLICIT NONE
|
|
INTEGER(KIND=4) F_MAIN
|
|
INTEGER(KIND=4) I
|
|
I = F_MAIN()
|
|
END PROGRAM test_f77 |