fibonacci.dont
· 783 B · Text
Исходник
Playground
give a < > b
unless
[ , b , c , < , > , ]
, a a !! , a c !! , a < !! , a ] !!
, a b b , a b ] ;
give < c b
unless
[ , b , c , < , > , ]
, a a !! , a b !! , a c !! , a ] !!
, a < c , a < > ;
give [
unless
a , b , c , < , > , ]
, [ a !! , [ b !! , [ c !! , [ ] !!
, [ < c ;
give c >
unless
[ , a , b , c , < , ]
, > ] !!
, > b b , > b ] ;
give ]
unless
[ , a , b , c , < , ]
, > b !! ;
give c b
unless
[ , a , c , < , > , ]
, b b !! , b > !! , b ] !!
, b c b , b c c , b c > , b c ] ;
give [ a
unless
a , b , c , < , > , ]
, [ a !! , [ b !! , [ < !! , [ ] !!
, [ c b , [ c c ;
give a a
unless
[ , b , c , < , > , ]
, a a !! , a b !! , a < !! , a ] !!
, a c c , a c b ;
have [ a b ] ;
| 1 | give a < > b |
| 2 | unless |
| 3 | [ , b , c , < , > , ] |
| 4 | , a a !! , a c !! , a < !! , a ] !! |
| 5 | , a b b , a b ] ; |
| 6 | |
| 7 | give < c b |
| 8 | unless |
| 9 | [ , b , c , < , > , ] |
| 10 | , a a !! , a b !! , a c !! , a ] !! |
| 11 | , a < c , a < > ; |
| 12 | |
| 13 | give [ |
| 14 | unless |
| 15 | a , b , c , < , > , ] |
| 16 | , [ a !! , [ b !! , [ c !! , [ ] !! |
| 17 | , [ < c ; |
| 18 | |
| 19 | give c > |
| 20 | unless |
| 21 | [ , a , b , c , < , ] |
| 22 | , > ] !! |
| 23 | , > b b , > b ] ; |
| 24 | |
| 25 | give ] |
| 26 | unless |
| 27 | [ , a , b , c , < , ] |
| 28 | , > b !! ; |
| 29 | |
| 30 | give c b |
| 31 | unless |
| 32 | [ , a , c , < , > , ] |
| 33 | , b b !! , b > !! , b ] !! |
| 34 | , b c b , b c c , b c > , b c ] ; |
| 35 | |
| 36 | give [ a |
| 37 | unless |
| 38 | a , b , c , < , > , ] |
| 39 | , [ a !! , [ b !! , [ < !! , [ ] !! |
| 40 | , [ c b , [ c c ; |
| 41 | |
| 42 | give a a |
| 43 | unless |
| 44 | [ , b , c , < , > , ] |
| 45 | , a a !! , a b !! , a < !! , a ] !! |
| 46 | , a c c , a c b ; |
| 47 | |
| 48 | have [ a b ] ; |
| 49 |