def GetModule():
return Application.Module(
'Core:Control:Flow', {
'if': Interpreter.BuiltIn(If),
'case': Interpreter.BuiltIn(Case),
'let': Interpreter.BuiltIn(Let)
}, {}, ['if', 'case', 'let'])
def GetModule():
return Application.Module(
'Core:Data:Dict', {
'is-dict?': Interpreter.BuiltIn(IsDict),
'has-key?': Interpreter.BuiltIn(HasKey),
'get': Interpreter.BuiltIn(Get),
'set': Interpreter.BuiltIn(Set),
'keys': Interpreter.BuiltIn(Keys),
'values': Interpreter.BuiltIn(Values)
}, {}, ['is-dict?', 'has-key?', 'get', 'set', 'keys', 'values'])
def GetModule():
return Application.Module(
'Core:Base',
{'type': Interpreter.BuiltIn(Type),
'same-type?': Interpreter.BuiltIn(SameType),
'eq?': Interpreter.BuiltIn(Eq),
'neq?': Interpreter.BuiltIn(Neq),
'id': Interpreter.BuiltIn(Id),
'error': Interpreter.BuiltIn(Error),
'module': Interpreter.BuiltIn(Module),
'define': Application.fastInterpret('[name value <Type Define Name (name) Value (value)>]'),
'import': Application.fastInterpret('[module names* as=none! <Type Import Module (module) Names (names) As (as)>]'),
'export': Application.fastInterpret('[names* <Type Export Names (names)>]')},
{},['type','same-type?','eq?','neq?','id','error','module','define','import','export'])
def GetModule():
return Application.Module(
'Core:Data:Func', {
'is-func?': Interpreter.BuiltIn(IsFunc),
'apply': Interpreter.BuiltIn(Apply),
'curry': Interpreter.BuiltIn(Curry),
'inject': Interpreter.BuiltIn(Inject),
'env-has-key?': Interpreter.BuiltIn(EnvHasKey),
'env-get': Interpreter.BuiltIn(EnvGet),
'env-set': Interpreter.BuiltIn(EnvSet)
}, {}, [
'is-func?', 'apply', 'curry', 'inject', 'env-has-key?', 'env-get',
'env-set'
])
def GetModule():
return Application.Module('Core:Data:Symbol',
{'is-symbol?': Interpreter.BuiltIn(IsSymbol)},
{}, ['is-symbol?'])
def GetModule():
return Application.Module(
'Core:Data:Number', {
'pi': Interpreter.Number(3.1415926535897931),
'e': Interpreter.Number(2.7182818284590451),
'is-number?': Interpreter.BuiltIn(IsNumber),
'add': Interpreter.BuiltIn(Add),
'inc': Interpreter.BuiltIn(Inc),
'sub': Interpreter.BuiltIn(Sub),
'dec': Interpreter.BuiltIn(Dec),
'mul': Interpreter.BuiltIn(Mul),
'div': Interpreter.BuiltIn(Div),
'mod': Interpreter.BuiltIn(Mod),
'lt': Interpreter.BuiltIn(Lt),
'lte': Interpreter.BuiltIn(Lte),
'gt': Interpreter.BuiltIn(Gt),
'gte': Interpreter.BuiltIn(Gte),
'sin': Interpreter.BuiltIn(Sin),
'cos': Interpreter.BuiltIn(Cos),
'tan': Interpreter.BuiltIn(Tan),
'ctg': Interpreter.BuiltIn(Ctg),
'asin': Interpreter.BuiltIn(ASin),
'acos': Interpreter.BuiltIn(ACos),
'atan': Interpreter.BuiltIn(ATan),
'actg': Interpreter.BuiltIn(ACtg),
'rad2deg': Interpreter.BuiltIn(Rad2Deg),
'deg2rad': Interpreter.BuiltIn(Deg2Rad),
'exp': Interpreter.BuiltIn(Exp),
'log': Interpreter.BuiltIn(Log),
'ln': Interpreter.BuiltIn(Ln),
'lg': Interpreter.BuiltIn(Lg),
'sqrt': Interpreter.BuiltIn(Sqrt),
'pow': Interpreter.BuiltIn(Pow),
'abs': Interpreter.BuiltIn(Abs),
'ceill': Interpreter.BuiltIn(Ceill),
'floor': Interpreter.BuiltIn(Floor)
}, {}, [
'pi', 'e', 'is-number?', 'add', 'inc', 'sub', 'dec', 'mul', 'div',
'mod', 'lt', 'lte', 'gt', 'gte', 'sin', 'cos', 'tan', 'ctg',
'asin', 'acos', 'actg', 'rad2deg', 'deg2rad', 'exp', 'log', 'ln',
'lg', 'sqrt', 'pow', 'abs', 'ceill', 'floor'
])
def GetModule():
return Application.Module(
'Core:Data:String', {
'is-string?': Interpreter.BuiltIn(IsString),
'cat': Interpreter.BuiltIn(Cat)
}, {}, ['is-string?', 'cat'])
