SimulationCore2/Equipments/RotaryTable/RTTorqueLimit.f90

subroutine RTTorqueLimit
    
    Use equipments_PowerLimit
    Use RTable_VARIABLES
    
    IMPLICIT NONE
    
    
    
    ! Rotary Table Malfunction ----> Drive Motor Limit Overide
    if ( RTable%OverideTorqueLimitMalf==1 ) then
        return
    end if
    
    
    
    
    IF (RTable%ia_ref>RTable%ia_ref_limit) THEN
        RTable%ia_ref = RTable%ia_ref_limit
    END IF
    
    
    
    
end subroutine