我试图在 Fortran 中声明几个枚举类型。

这个有趣的简单示例很好地说明了我的问题：

program Main
  
  enum, bind(c)
    enumerator :: Colors = 0
    enumerator :: Blue = 1
    enumerator :: Red = 2
    enumerator :: Green = 3
  end enum

  enum, bind(c)
    enumerator :: Size = 0
    enumerator :: Small = 1
    enumerator :: Medium = 2
    enumerator :: Large = 3
  end enum
      
  integer(kind(Colors)) :: myColor

  myColor = Green

  if (myColor == Large) then
    write(*,*) 'MyColor is Large'
  end if

end program Main

我还尝试将这个枚举包含在一个类型和许多其他东西中，但没有一个有效。

在这里我可以比较 Colors 和 Size。例如，在 C 中，当我声明 color 和一个 size typedef 枚举时，我没有这样的问题，因为这两种类型是不同的。

在 Fortran 中有几个枚举类型是否存在一个简单的解决方案？

否则，我想用一个包含 value 的整数成员声明几种类型，然后创建接口以重载我需要的运算符（比较、做作等）。我不确定解决方案是否可行，而且我可以做到。