RosettaCodeData/Task/Enumerations/Fortran/enumerations-1.f

5 lines
104 B
FortranFixed
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
enum, bind(c)
enumerator :: one=1, two, three, four, five
enumerator :: six, seven, nine=9
end enum