Skip to content
Snippets Groups Projects
Unverified Commit 26a3f782 authored by Christine Lemmer-Webber's avatar Christine Lemmer-Webber
Browse files

Show a simplified version at the end

parent 0c667c63
No related branches found
No related tags found
No related merge requests found
......@@ -216,6 +216,35 @@ Now this gets interesting!
What if... you change =thirty-two= to be =64= but leave the other
values the same? Try it!
And yes, we could also make the above =farenheit-celsius= into a
simple expression propagator constructor:
#+BEGIN_SRC scheme
(define (e:f2c f)
(e:/ (e:* (e:- f 32) 5) 9))
#+END_SRC
This looks JUST LIKE the original simple version... and it does solve
forward...
#+BEGIN_SRC scheme
GUILE> (define c (prun (e:f2c 113)))
GUILE> (prun (content c))
; => 45
#+END_SRC
But this version can /still solve in the other direction/!
#+BEGIN_SRC scheme
GUILE> (define f (prun (spawn-cell)))
GUILE> (define c (prun (e:f2c f)))
GUILE> (prun (add-content c 45))
GUILE> (prun (content f))
; => 113
#+END_SRC
Not bad!
* What's next
A lot more is coming. Sorry to be so tantalyzing, you found this repo
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment