SimulationCore2/CSharp/OperationScenarios/Enums/CElevatorConnectionEnumVariables.f90

module CElevatorConnectionEnumVariables
    ! use CVoidEventHandlerCollection
    implicit none
    ! Mahmood: this variable moved to operationscenariocommon
    ! integer :: OperationScenario%ElevatorConnection = 0
    ! type(VoidEventHandlerCollection) :: OnElevatorConnectionChange
    
    public
    
    
    enum, bind(c)
        enumerator ELEVATOR_CONNECTION_NOTHING
        enumerator ELEVATOR_CONNECTION_STRING
        enumerator ELEVATOR_CONNECTION_STAND
        enumerator ELEVATOR_CONNECTION_SINGLE
        enumerator ELEVATOR_LATCH_STRING
        enumerator ELEVATOR_LATCH_SINGLE
        enumerator ELEVATOR_LATCH_STAND
    end enum
    
    ! private :: OperationScenario%ElevatorConnection
    contains
    
    
    
    
    
    
    
    
    ! subroutine Set_ElevatorConnection_WN(v)
    ! !DEC$ ATTRIBUTES DLLEXPORT :: Set_ElevatorConnection_WN
    ! !DEC$ ATTRIBUTES ALIAS: 'Set_ElevatorConnection_WN' :: Set_ElevatorConnection_WN
    !     implicit none
    !     integer , intent(in) :: v
    !     call Set_ElevatorConnection(v)
    ! end subroutine
    
    ! integer function Get_ElevatorConnection_WN()
    ! !DEC$ ATTRIBUTES DLLEXPORT :: Get_ElevatorConnection_WN
    ! !DEC$ ATTRIBUTES ALIAS: 'Get_ElevatorConnection_WN' :: Get_ElevatorConnection_WN
    !     implicit none
    !     Get_ElevatorConnection_WN = OperationScenario%ElevatorConnection
    ! end function
    
    
end module CElevatorConnectionEnumVariables