소스 검색

Add substitution in expression

Samuel W. Flint 6 년 전
부모
커밋
d40dba1a0f
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  1. 5 0
      larcs.org

+ 5 - 0
larcs.org

@@ -186,6 +186,11 @@ Of the various types, there are three atomic types, ~<number>~, ~<variable>~ and
   (defmethod atomicp ((expression <atomic>))
     (declare (ignore expression))
     t)
+
+  (defmethod subsitute-expression (expression with (in <atomic>))
+    (if (eqal expression in)
+        with
+        in))
 #+END_SRC
 
 *** DONE Numbers