Skip to content

Commit 909be9f

Browse files
authored
Emmy sicm_ch01: exclude clojure.core/time to resolve conflict (#167)
1 parent 12ca7c8 commit 909be9f

1 file changed

Lines changed: 13 additions & 12 deletions

File tree

src/mentat_collective/emmy/sicm_ch01.clj

Lines changed: 13 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -8,14 +8,26 @@
88
:tags [:emmy :physics]}}}
99

1010
(ns mentat-collective.emmy.sicm-ch01
11-
(:refer-clojure :exclude [+ - * / zero? compare divide numerator denominator infinite? abs ref partial =])
11+
(:refer-clojure :exclude [+ - * / zero? compare divide numerator denominator
12+
time infinite? abs ref partial =])
1213
(:require [emmy.env :refer :all :exclude [r->p]]
1314
[emmy.mechanics.lagrange :as lg]
1415
[emmy.numerical.minimize :as mn]
1516
[mentat-collective.emmy.scheme :refer :all]
1617
[scicloj.kindly.v4.api :as kindly]
1718
[scicloj.kindly.v4.kind :as kind]))
1819

20+
^:kindly/hide-code
21+
(def md
22+
(comp kindly/hide-code kind/md))
23+
24+
(md "The following examples are taken from the MIT open-access book [Structure and Interpretation of Classical Mechanics (SICM)](https://mitp-content-server.mit.edu/books/content/sectbyfn/books_pres_0/9579/sicm_edition_2.zip/chapter001.html).")
25+
26+
(md "Another notebook can be found on the [Road to Reality website](https://reality.mentat.org/essays/reality/introduction#welcome-to-the-road-to-reality!) by [Sam Ritchie](https://roadtoreality.substack.com/p/the-first-executable-essay-is-live), the author (along with [Colin Smith](https://github.com/littleredcomputer)) of [Emmy, the Computer Algebra System](https://emmy.mentat.org).")
27+
28+
;; In adopting MIT-Scheme's `(define ...)`, I trust that Clojure people will bridge that gap quickly
29+
;; while being sure of the gratitude of all readers of the immutable, dense book.
30+
1931
^:kindly/hide-code
2032
(def velocities velocity)
2133

@@ -31,17 +43,6 @@
3143
^:kindly/hide-code
3244
(def tex (comp kind/tex emmy.expression.render/->TeX simplify))
3345

34-
^:kindly/hide-code
35-
(def md
36-
(comp kindly/hide-code kind/md))
37-
38-
(md "The following examples are taken from the MIT open-access book [Structure and Interpretation of Classical Mechanics (SICM)](https://mitp-content-server.mit.edu/books/content/sectbyfn/books_pres_0/9579/sicm_edition_2.zip/chapter001.html).")
39-
40-
(md "Another notebook can be found on the [Road to Reality website](https://reality.mentat.org/essays/reality/introduction#welcome-to-the-road-to-reality!) by [Sam Ritchie](https://roadtoreality.substack.com/p/the-first-executable-essay-is-live), the author (along with [Colin Smith](https://github.com/littleredcomputer)) of [Emmy, the Computer Algebra System](https://emmy.mentat.org).")
41-
42-
;; In adopting MIT-Scheme's `(define ...)`, I trust that Clojure people will bridge that gap quickly
43-
;; while being sure of the gratitude of all readers of the immutable, dense book.
44-
4546
(md "## 1.4 Computing Actions")
4647
(md "First task: Calculate the action for the free particle along a path. Consider the particle moving at uniform speed along a straight line.")
4748

0 commit comments

Comments
 (0)