mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 17:50:22 +00:00
d8b91bd5c4
* Removing FORTRAN samples because OS X case-insensitive filesystems :-\ * Adding Fotran samples back * FORTRAN -> Fortran * Groff -> Roff * GAS -> Unix Assembly * Cucumber -> Gherkin * Nimrod -> Nim * Ragel in Ruby Host -> Ragel * Jade -> Pug * VimL -> Vim script
26 lines
340 B
Fortran
26 lines
340 B
Fortran
PROGRAM MAIN
|
|
|
|
END
|
|
|
|
C comment
|
|
* comment
|
|
|
|
SUBROUTINE foo( i, x, b )
|
|
INTEGER i
|
|
REAL x
|
|
LOGICAL b
|
|
|
|
IF( i.NE.0 ) THEN
|
|
CALL bar( -i )
|
|
END IF
|
|
|
|
RETURN
|
|
END
|
|
|
|
DOUBLE COMPLEX FUNCTION baz()
|
|
|
|
baz = (0.0d0,0.0d0)
|
|
|
|
RETURN
|
|
END
|