Bladeren bron

Added a simple trigonometric classification

Samuel W. Flint 9 jaren geleden
bovenliggende
commit
47a6388e75
1 gewijzigde bestanden met toevoegingen van 4 en 0 verwijderingen
  1. 4 0
      manipulation.org

+ 4 - 0
manipulation.org

@@ -406,6 +406,10 @@ This is used to classify "powers", that is to say, equations of the form $x^n$,
 #+Caption: Classify Trigonometrics
 #+Name: classify-trigonometrics
 #+BEGIN_SRC lisp
+  (define-classification trigonometric
+    (when (classified-as-p expression 'non-atomic)
+      (member (first expression) '(sin cos tan csc sec cot))))
+
   (define-classification sin
     (when (classified-as-p expression 'non-atomic)
       (eq 'sin (first expression))))