RosettaCodeData/Task/Enumerations/Fortran/enumerations-1.f
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

4 lines
104 B
Forth

enum, bind(c)
enumerator :: one=1, two, three, four, five
enumerator :: six, seven, nine=9
end enum