# admin helpers
push_ontology("admin")
def concept explain as get_results(id=0, depth=2)
set_isa(c:explain:, __AUTO_EVAL)

def concept explain last as get_last_results(id=0, depth=2)
set_isa(c:explain last:, __AUTO_EVAL)

def concept explain x as get_results(id=x, depth=3)
set_isa(c:explain x:, __AUTO_EVAL)

def concept precedence a > precedence b as set_is_greater_than(__PRECEDENCE, a, b, 'Sya')
set_isa(c:precedence a > precedence b:, __AUTO_EVAL)

def concept x is a command as set_auto_eval(x, __AUTO_EVAL)
set_auto_eval(c:x is a command:)

def concept activate debug as set_debug(True)
set_auto_eval(c:activate debug:)
def concept deactivate debug as set_debug(False)
set_auto_eval(c:deactivate debug:)
def concept debug on as set_debug(True)
set_auto_eval(c:debug on:)
def concept debug off as set_debug(False)
set_auto_eval(c:debug off:)

def concept activate debug on x as debug_var(x)
set_auto_eval(c:activate debug on x:)
def concept debug x as debug_var(x)
set_auto_eval(c:debug x:)

def concept debug var x as debug_var(variable=x)
set_auto_eval(c:debug var x:)
def concept debug variable x as debug_var(variable=x)
set_auto_eval(c:debug variable x:)
def concept debug method x as debug_var(method=x)
set_auto_eval(c:debug method x:)

def concept deactivate debug on x as debug_var(x, enabled=False) where x
set_auto_eval(c:deactivate debug on x:)

def concept activate return values processing as set_var("sheerka.enable_process_return_values", True)
def concept deactivate return values processing as set_var("sheerka.enable_process_return_values", False)
set_auto_eval(c:activate return values processing:)
set_auto_eval(c:deactivate return values processing:)

def concept rule x where isinstance(x, int) as r:|x:
set_auto_eval(c:rule x:)
def concept rule x > rule y where isinstance(x, int) and isinstance(y, int) as set_is_greater_than(__PRECEDENCE, r:|x:, r:|y:, 'Rule')
set_auto_eval(c:rule x > rule y:)
def concept rule x is greatest where isinstance(x, int) as set_is_greatest(__PRECEDENCE, r:|x:, 'Rule')
set_auto_eval(c:rule x is greatest:)
def concept rule x < rule y where isinstance(x, int) and isinstance(y, int) as set_is_less_than(__PRECEDENCE, r:|x:, r:|y:, 'Rule')
set_auto_eval(c:rule x < rule y:)
def concept rule x is lesser where isinstance(x, int) as set_is_lesser(__PRECEDENCE, r:|x:, 'Rule')
set_auto_eval(c:rule x is lesser:)