{
 "cells": [
  {
   "cell_type": "code",
   "execution_count": 1,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "3"
     ]
    }
   ],
   "source": [
    "1 2 +"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 2,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "9"
     ]
    }
   ],
   "source": [
    "sqr"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 3,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": []
    }
   ],
   "source": [
    "clear"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 4,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "[\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]]"
     ]
    }
   ],
   "source": [
    "[\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] "
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 5,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "[\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] [first]"
     ]
    }
   ],
   "source": [
    "[first]"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 6,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "[\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] [\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] [first]"
     ]
    }
   ],
   "source": [
    "[dup] dip"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 7,
   "metadata": {},
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "[\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] [\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] [not] [pop] [[first] dupdip] [[rest rest] dip step]"
     ]
    }
   ],
   "source": [
    "[not] [pop] roll< [dupdip] cons [[rest rest] dip step]"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": 8,
   "metadata": {
    "scrolled": false
   },
   "outputs": [
    {
     "name": "stdout",
     "output_type": "stream",
     "text": [
      "[\"tommy\" 23 [\"richard\" 48 [] []] [\"jenny\" 18 [] []]] \"tommy\" \"richard\" \"jenny\""
     ]
    }
   ],
   "source": [
    "genrec"
   ]
  },
  {
   "cell_type": "code",
   "execution_count": null,
   "metadata": {},
   "outputs": [],
   "source": []
  }
 ],
 "metadata": {
  "kernelspec": {
   "display_name": "Joypy",
   "language": "",
   "name": "thun"
  },
  "language_info": {
   "file_extension": ".joy",
   "mimetype": "text/plain",
   "name": "Joy"
  }
 },
 "nbformat": 4,
 "nbformat_minor": 2
}
