558 lines
19 KiB
Plaintext
558 lines
19 KiB
Plaintext
{
|
|
"cells": [
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"# Joypy\n",
|
|
"\n",
|
|
"## Joy in Python\n",
|
|
"\n",
|
|
"This implementation is meant as a tool for exploring the programming model and method of Joy. Python seems like a great implementation language for Joy for several reasons.\n",
|
|
"\n",
|
|
"We can lean on the Python immutable types for our basic semantics and types: ints, floats, strings, and tuples, which enforces functional purity. We get garbage collection for free. Compilation via Cython. Glue language with loads of libraries."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"### [Read-Eval-Print Loop (REPL)](https://en.wikipedia.org/wiki/Read%E2%80%93eval%E2%80%93print_loop)\n",
|
|
"The main way to interact with the Joy interpreter is through a simple [REPL](https://en.wikipedia.org/wiki/Read%E2%80%93eval%E2%80%93print_loop) that you start by running the package:\n",
|
|
"\n",
|
|
" $ python -m joy\n",
|
|
" Joypy - Copyright © 2017 Simon Forman\n",
|
|
" This program comes with ABSOLUTELY NO WARRANTY; for details type \"warranty\".\n",
|
|
" This is free software, and you are welcome to redistribute it\n",
|
|
" under certain conditions; type \"sharing\" for details.\n",
|
|
" Type \"words\" to see a list of all words, and \"[<name>] help\" to print the\n",
|
|
" docs for a word.\n",
|
|
"\n",
|
|
"\n",
|
|
" <-top\n",
|
|
"\n",
|
|
" joy? _\n",
|
|
"\n",
|
|
"The `<-top` marker points to the top of the (initially empty) stack. You can enter Joy notation at the prompt and a [trace of evaluation](#The-TracePrinter.) will be printed followed by the stack and prompt again:\n",
|
|
"\n",
|
|
" joy? 23 sqr 18 +\n",
|
|
" . 23 sqr 18 +\n",
|
|
" 23 . sqr 18 +\n",
|
|
" 23 . dup mul 18 +\n",
|
|
" 23 23 . mul 18 +\n",
|
|
" 529 . 18 +\n",
|
|
" 529 18 . +\n",
|
|
" 547 . \n",
|
|
"\n",
|
|
" 547 <-top\n",
|
|
"\n",
|
|
" joy? \n"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"# Stacks (aka list, quote, sequence, etc.)\n",
|
|
"\n",
|
|
"In Joy, in addition to the types Boolean, integer, float, and string, there is a single sequence type represented by enclosing a sequence of terms in brackets `[...]`. This sequence type is used to represent both the stack and the expression. It is a [cons list](https://en.wikipedia.org/wiki/Cons#Lists) made from Python tuples."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 1,
|
|
"metadata": {},
|
|
"outputs": [],
|
|
"source": [
|
|
"import inspect\n",
|
|
"import joy.utils.stack\n",
|
|
"\n",
|
|
"\n",
|
|
"print inspect.getdoc(joy.utils.stack)"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"### The utility functions maintain order.\n",
|
|
"The 0th item in the list will be on the top of the stack and *vise versa*."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 2,
|
|
"metadata": {},
|
|
"outputs": [],
|
|
"source": [
|
|
"joy.utils.stack.list_to_stack([1, 2, 3])"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 3,
|
|
"metadata": {},
|
|
"outputs": [],
|
|
"source": [
|
|
"list(joy.utils.stack.iter_stack((1, (2, (3, ())))))"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"This requires reversing the sequence (or iterating backwards) otherwise:"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 4,
|
|
"metadata": {},
|
|
"outputs": [],
|
|
"source": [
|
|
"stack = ()\n",
|
|
"\n",
|
|
"for n in [1, 2, 3]:\n",
|
|
" stack = n, stack\n",
|
|
"\n",
|
|
"print stack\n",
|
|
"print list(joy.utils.stack.iter_stack(stack))"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"### Purely Functional Datastructures.\n",
|
|
"Because Joy lists are made out of Python tuples they are immutable, so all Joy datastructures are *[purely functional](https://en.wikipedia.org/wiki/Purely_functional_data_structure)*."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"# The `joy()` function.\n",
|
|
"## An Interpreter\n",
|
|
"The `joy()` function is extrememly simple. It accepts a stack, an expression, and a dictionary, and it iterates through the expression putting values onto the stack and delegating execution to functions it looks up in the dictionary.\n",
|
|
"\n",
|
|
"Each function is passed the stack, expression, and dictionary and returns them. Whatever the function returns becomes the new stack, expression, and dictionary. (The dictionary is passed to enable e.g. writing words that let you enter new words into the dictionary at runtime, which nothing does yet and may be a bad idea, and the `help` command.)"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 5,
|
|
"metadata": {},
|
|
"outputs": [],
|
|
"source": [
|
|
"import joy.joy\n",
|
|
"\n",
|
|
"print inspect.getsource(joy.joy.joy)"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"### View function\n",
|
|
"The `joy()` function accepts a \"viewer\" function which it calls on each iteration passing the current stack and expression just before evaluation. This can be used for tracing, breakpoints, retrying after exceptions, or interrupting an evaluation and saving to disk or sending over the network to resume later. The stack and expression together contain all the state of the computation at each step."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"### The `TracePrinter`.\n",
|
|
"\n",
|
|
"A `viewer` records each step of the evaluation of a Joy program. The `TracePrinter` has a facility for printing out a trace of the evaluation, one line per step. Each step is aligned to the current interpreter position, signified by a period separating the stack on the left from the pending expression (\"continuation\") on the right."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"### [Continuation-Passing Style](https://en.wikipedia.org/wiki/Continuation-passing_style)\n",
|
|
"One day I thought, What happens if you rewrite Joy to use [CSP](https://en.wikipedia.org/wiki/Continuation-passing_style)? I made all the functions accept and return the expression as well as the stack and found that all the combinators could be rewritten to work by modifying the expression rather than making recursive calls to the `joy()` function."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"# Parser"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 6,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"name": "stdout",
|
|
"output_type": "stream",
|
|
"text": [
|
|
"This module exports a single function for converting text to a joy\n",
|
|
"expression as well as a single Symbol class and a single Exception type.\n",
|
|
"\n",
|
|
"The Symbol string class is used by the interpreter to recognize literals\n",
|
|
"by the fact that they are not Symbol objects.\n",
|
|
"\n",
|
|
"A crude grammar::\n",
|
|
"\n",
|
|
" joy = term*\n",
|
|
" term = int | float | string | '[' joy ']' | symbol\n",
|
|
"\n",
|
|
"A Joy expression is a sequence of zero or more terms. A term is a\n",
|
|
"literal value (integer, float, string, or Joy expression) or a function\n",
|
|
"symbol. Function symbols are unquoted strings and cannot contain square\n",
|
|
"brackets. Terms must be separated by blanks, which can be omitted\n",
|
|
"around square brackets.\n"
|
|
]
|
|
}
|
|
],
|
|
"source": [
|
|
"import joy.parser\n",
|
|
"\n",
|
|
"print inspect.getdoc(joy.parser)"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"The parser is extremely simple, the undocumented `re.Scanner` class does most of the tokenizing work and then you just build the tuple structure out of the tokens. There's no Abstract Syntax Tree or anything like that."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 7,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"name": "stdout",
|
|
"output_type": "stream",
|
|
"text": [
|
|
"def _parse(tokens):\n",
|
|
"\t'''\n",
|
|
"\tReturn a stack/list expression of the tokens.\n",
|
|
"\t'''\n",
|
|
"\tframe = []\n",
|
|
"\tstack = []\n",
|
|
"\tfor tok in tokens:\n",
|
|
"\t\tif tok == '[':\n",
|
|
"\t\t\tstack.append(frame)\n",
|
|
"\t\t\tframe = []\n",
|
|
"\t\t\tstack[-1].append(frame)\n",
|
|
"\t\telif tok == ']':\n",
|
|
"\t\t\ttry:\n",
|
|
"\t\t\t\tframe = stack.pop()\n",
|
|
"\t\t\texcept IndexError:\n",
|
|
"\t\t\t\traise ParseError('Extra closing bracket.')\n",
|
|
"\t\t\tframe[-1] = list_to_stack(frame[-1])\n",
|
|
"\t\telse:\n",
|
|
"\t\t\tframe.append(tok)\n",
|
|
"\tif stack:\n",
|
|
"\t\traise ParseError('Unclosed bracket.')\n",
|
|
"\treturn list_to_stack(frame)\n",
|
|
"\n"
|
|
]
|
|
}
|
|
],
|
|
"source": [
|
|
"print inspect.getsource(joy.parser._parse)"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"That's pretty much all there is to it."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 8,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"data": {
|
|
"text/plain": [
|
|
"(1, (2, (3, (4, (5, ())))))"
|
|
]
|
|
},
|
|
"execution_count": 8,
|
|
"metadata": {},
|
|
"output_type": "execute_result"
|
|
}
|
|
],
|
|
"source": [
|
|
"joy.parser.text_to_expression('1 2 3 4 5') # A simple sequence."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 9,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"data": {
|
|
"text/plain": [
|
|
"((1, (2, (3, ()))), (4, (5, ())))"
|
|
]
|
|
},
|
|
"execution_count": 9,
|
|
"metadata": {},
|
|
"output_type": "execute_result"
|
|
}
|
|
],
|
|
"source": [
|
|
"joy.parser.text_to_expression('[1 2 3] 4 5') # Three items, the first is a list with three items"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 10,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"data": {
|
|
"text/plain": [
|
|
"(1, (23, (('four', ((-5.0, ()), (cons, ()))), (8888, ()))))"
|
|
]
|
|
},
|
|
"execution_count": 10,
|
|
"metadata": {},
|
|
"output_type": "execute_result"
|
|
}
|
|
],
|
|
"source": [
|
|
"joy.parser.text_to_expression('1 23 [\"four\" [-5.0] cons] 8888') # A mixed bag. cons is\n",
|
|
" # a Symbol, no lookup at\n",
|
|
" # parse-time. Haiku docs."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 11,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"data": {
|
|
"text/plain": [
|
|
"((), ((), ((), ((), ((), ())))))"
|
|
]
|
|
},
|
|
"execution_count": 11,
|
|
"metadata": {},
|
|
"output_type": "execute_result"
|
|
}
|
|
],
|
|
"source": [
|
|
"joy.parser.text_to_expression('[][][][][]') # Five empty lists."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 12,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"data": {
|
|
"text/plain": [
|
|
"((((((), ()), ()), ()), ()), ())"
|
|
]
|
|
},
|
|
"execution_count": 12,
|
|
"metadata": {},
|
|
"output_type": "execute_result"
|
|
}
|
|
],
|
|
"source": [
|
|
"joy.parser.text_to_expression('[[[[[]]]]]') # Five nested lists."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"# Library\n",
|
|
"The Joy library of functions (aka commands, or \"words\" after Forth usage) encapsulates all the actual functionality (no pun intended) of the Joy system. There are simple functions such as addition `add` (or `+`, the library module supports aliases), and combinators which provide control-flow and higher-order operations."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 13,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"name": "stdout",
|
|
"output_type": "stream",
|
|
"text": [
|
|
"!= % & * *fraction *fraction0 + ++ - -- / // /floor < << <= <> = > >= >> ? ^ _Tree_add_Ee _Tree_delete_R0 _Tree_delete_clear_stuff _Tree_get_E abs add anamorphism and app1 app2 app3 at average b binary bool branch ccons choice clear cleave cmp codireco concat cond cons dinfrirst dip dipd dipdd disenstacken divmod down_to_zero drop dup dupd dupdd dupdip dupdipd enstacken eq first first_two flatten floor floordiv fork fourth gcd ge genrec getitem gt help i id ifte ii infer infra inscribe le least_fraction loop lshift lt make_generator map max min mod modulus mul ne neg not nullary of or over pam parse pick pm pop popd popdd popop popopd popopdd pow pred primrec product quoted range range_to_zero rem remainder remove rest reverse roll< roll> rolldown rollup round rrest rshift run second select sharing shunt size sort sqr sqrt stack step step_zero stuncons stununcons sub succ sum swaack swap swoncat swons take ternary third times truediv truthy tuck unary uncons unique unit unquoted unstack unswons void warranty while words x xor zip •\n"
|
|
]
|
|
}
|
|
],
|
|
"source": [
|
|
"import joy.library\n",
|
|
"\n",
|
|
"print ' '.join(sorted(joy.library.initialize()))"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"Many of the functions are defined in Python, like `dip`:"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 14,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"name": "stdout",
|
|
"output_type": "stream",
|
|
"text": [
|
|
"@inscribe\n",
|
|
"@combinator_effect(_COMB_NUMS(), a1, s1)\n",
|
|
"@FunctionWrapper\n",
|
|
"def dip(stack, expression, dictionary):\n",
|
|
"\t'''\n",
|
|
"\tThe dip combinator expects a quoted program on the stack and below it\n",
|
|
"\tsome item, it hoists the item into the expression and runs the program\n",
|
|
"\ton the rest of the stack.\n",
|
|
"\t::\n",
|
|
"\n",
|
|
"\t\t\t ... x [Q] dip\n",
|
|
"\t\t-------------------\n",
|
|
"\t\t\t\t ... Q x\n",
|
|
"\n",
|
|
"\t'''\n",
|
|
"\t(quote, (x, stack)) = stack\n",
|
|
"\texpression = (x, expression)\n",
|
|
"\treturn stack, concat(quote, expression), dictionary\n",
|
|
"\n"
|
|
]
|
|
}
|
|
],
|
|
"source": [
|
|
"print inspect.getsource(joy.library.dip)"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"Some functions are defined in equations in terms of other functions. When the interpreter executes a definition function that function just pushes its body expression onto the pending expression (the continuation) and returns control to the interpreter."
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": 15,
|
|
"metadata": {},
|
|
"outputs": [
|
|
{
|
|
"name": "stdout",
|
|
"output_type": "stream",
|
|
"text": [
|
|
"? == dup truthy\n",
|
|
"*fraction == [uncons] dip uncons [swap] dip concat [*] infra [*] dip cons\n",
|
|
"*fraction0 == concat [[swap] dip * [*] dip] infra\n",
|
|
"anamorphism == [pop []] swap [dip swons] genrec\n",
|
|
"average == [sum 1.0 *] [size] cleave /\n",
|
|
"binary == nullary [popop] dip\n",
|
|
"cleave == fork [popd] dip\n",
|
|
"codireco == cons dip rest cons\n",
|
|
"dinfrirst == dip infra first\n",
|
|
"unstack == ? [uncons ?] loop pop\n",
|
|
"down_to_zero == [0 >] [dup --] while\n",
|
|
"dupdipd == dup dipd\n",
|
|
"enstacken == stack [clear] dip\n",
|
|
"flatten == [] swap [concat] step\n",
|
|
"fork == [i] app2\n",
|
|
"gcd == 1 [tuck modulus dup 0 >] loop pop\n",
|
|
"ifte == [nullary not] dipd branch\n",
|
|
"ii == [dip] dupdip i\n",
|
|
"least_fraction == dup [gcd] infra [div] concat map\n",
|
|
"make_generator == [codireco] ccons\n",
|
|
"nullary == [stack] dinfrirst\n",
|
|
"of == swap at\n",
|
|
"pam == [i] map\n",
|
|
"primrec == [i] genrec\n",
|
|
"product == 1 swap [*] step\n",
|
|
"quoted == [unit] dip\n",
|
|
"range == [0 <=] [1 - dup] anamorphism\n",
|
|
"range_to_zero == unit [down_to_zero] infra\n",
|
|
"run == [] swap infra\n",
|
|
"size == 0 swap [pop ++] step\n",
|
|
"sqr == dup mul\n",
|
|
"step_zero == 0 roll> step\n",
|
|
"swoncat == swap concat\n",
|
|
"ternary == unary [popop] dip\n",
|
|
"unary == nullary popd\n",
|
|
"unquoted == [i] dip\n",
|
|
"while == swap [nullary] cons dup dipd concat loop\n",
|
|
"\n"
|
|
]
|
|
}
|
|
],
|
|
"source": [
|
|
"print joy.library.definitions"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "markdown",
|
|
"metadata": {},
|
|
"source": [
|
|
"Currently, there's no function to add new definitions to the dictionary from \"within\" Joy code itself. Adding new definitions remains a meta-interpreter action. You have to do it yourself, in Python, and wash your hands afterward.\n",
|
|
"\n",
|
|
"It would be simple enough to define one, but it would open the door to *name binding* and break the idea that all state is captured in the stack and expression. There's an implicit *standard dictionary* that defines the actual semantics of the syntactic stack and expression datastructures (which only contain symbols, not the actual functions. Pickle some and see for yourself.)\n",
|
|
"\n",
|
|
"#### \"There should be only one.\"\n",
|
|
"\n",
|
|
"Which brings me to talking about one of my hopes and dreams for this notation: \"There should be only one.\" What I mean is that there should be one universal standard dictionary of commands, and all bespoke work done in a UI for purposes takes place by direct interaction and macros. There would be a *Grand Refactoring* biannually (two years, not six months, that's semi-annually) where any new definitions factored out of the usage and macros of the previous time, along with new algorithms and such, were entered into the dictionary and posted to e.g. IPFS.\n",
|
|
"\n",
|
|
"Code should not burgeon wildly, as it does today. The variety of code should map more-or-less to the well-factored variety of human computably-solvable problems. There shouldn't be dozens of chat apps, JS frameworks, programming languages. It's a waste of time, a [fractal \"thundering herd\" attack](https://en.wikipedia.org/wiki/Thundering_herd_problem) on human mentality.\n",
|
|
"\n",
|
|
"#### Literary Code Library\n",
|
|
"\n",
|
|
"If you read over the other notebooks you'll see that developing code in Joy is a lot like doing simple mathematics, and the descriptions of the code resemble math papers. The code also works the first time, no bugs. If you have any experience programming at all, you are probably skeptical, as I was, but it seems to work: deriving code mathematically seems to lead to fewer errors.\n",
|
|
"\n",
|
|
"But my point now is that this great ratio of textual explanation to wind up with code that consists of a few equations and could fit on an index card is highly desirable. Less code has fewer errors. The structure of Joy engenders a kind of thinking that seems to be very effective for developing structured processes.\n",
|
|
"\n",
|
|
"There seems to be an elegance and power to the notation.\n"
|
|
]
|
|
},
|
|
{
|
|
"cell_type": "code",
|
|
"execution_count": null,
|
|
"metadata": {},
|
|
"outputs": [],
|
|
"source": [
|
|
" "
|
|
]
|
|
}
|
|
],
|
|
"metadata": {
|
|
"kernelspec": {
|
|
"display_name": "Python 2",
|
|
"language": "python",
|
|
"name": "python2"
|
|
},
|
|
"language_info": {
|
|
"codemirror_mode": {
|
|
"name": "ipython",
|
|
"version": 2
|
|
},
|
|
"file_extension": ".py",
|
|
"mimetype": "text/x-python",
|
|
"name": "python",
|
|
"nbconvert_exporter": "python",
|
|
"pygments_lexer": "ipython2",
|
|
"version": "2.7.12"
|
|
}
|
|
},
|
|
"nbformat": 4,
|
|
"nbformat_minor": 2
|
|
}
|