diff options
Diffstat (limited to 'work')
-rw-r--r-- | work/calculus_play.scm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/work/calculus_play.scm b/work/calculus_play.scm new file mode 100644 index 0000000..7a043df --- /dev/null +++ b/work/calculus_play.scm @@ -0,0 +1,17 @@ + +;;; Jan 26th + +(declare (usual-integrations)) +(load "~/thesis/scmutils/src/calculus/load.scm") + + +(define R2 (make-manifold R^n-type 2)) +(define U (patch 'origin R2)) + +(load "~/thesis/scmutils/src/general/canonicalizer.scm") + +(define d/dx (coordinate-basis-vector-field cart + +(define J (- (* x d/dy) (* y (d/dx)))) + +(define omega (literal-1form-field 'a R2-rect))
\ No newline at end of file |