Пример #1
0
def binding_values(expr):
    def inner(expr):
        if expr is EmptyList:
            return EmptyList
        return cons(cadar(expr), inner(cdr(expr)))

    return inner(cadr(expr))
Пример #2
0
def binding_values(expr):
    def inner(expr):
        if expr is EmptyList:
            return EmptyList
        return cons(cadar(expr), inner(cdr(expr)))

    return inner(cadr(expr))
Пример #3
0
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
Пример #4
0
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
Пример #5
0
def assignment_variable(expr):
    return cadr(expr)
Пример #6
0
def lambda_parameters(expr):
    return cadr(expr)
Пример #7
0
def if_predicate(expr):
    return cadr(expr)
Пример #8
0
def primitive_implementation(expr):
    return cadr(expr)
Пример #9
0
def procedure_parameters(expr):
    return cadr(expr)
Пример #10
0
def definition_value(expr):
    if is_symbol(cadr(expr)):
        return caddr(expr)

    return make_lambda(cdadr(expr), cddr(expr))
Пример #11
0
def definition_variable(expr):
    if is_symbol(cadr(expr)):
        return cadr(expr)

    return caadr(expr)
Пример #12
0
def lambda_parameters(expr):
    return cadr(expr)
Пример #13
0
def assignment_variable(expr):
    return cadr(expr)
Пример #14
0
def text_of_quotation(expr):
    return cadr(expr)