Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Port sections.scm and poincare map visualization #10

Open
sritchie opened this issue Mar 25, 2022 · 1 comment
Open

Port sections.scm and poincare map visualization #10

sritchie opened this issue Mar 25, 2022 · 1 comment

Comments

@sritchie
Copy link
Member

This will be a mathbox + clerk heavy fun one!

Some code from the namespace:

(defn refine-crossing
  "This is used to zero in on crossings in autonomous systems, such as
  Henon-Heiles."
  [sec-eps advance state]
  (loop [[_ [x] [xd]] state]
    (let [zstate (advance state (- (/ x xd)))]
      (if (< (Math/abs (get-in zstate [1 0])) sec-eps)
        zstate
        (recur zstate)))))
@sritchie
Copy link
Member Author

@sritchie sritchie transferred this issue from sicmutils/sicmutils Jan 24, 2023
@sritchie sritchie transferred this issue from another repository Jan 24, 2023
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant