From 9c1573fcacb80ec59e4dc16734b2d05259897354 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Thu, 20 Dec 2018 11:35:48 +0100
Subject: epostunit.pas: faktorisieren neu

---
 epost.lpr | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'epost.lpr')

diff --git a/epost.lpr b/epost.lpr
index 93ff2e3..df0d454 100644
--- a/epost.lpr
+++ b/epost.lpr
@@ -372,6 +372,17 @@ begin
         aufraeumen;
         halt(1);
       end;
+      if istDasBefehl('faktorisiere',s,bekannteBefehle,true) then begin
+        i:=findeWerte(s,nil,@wertes,@konturen,false);
+        if i<0 then begin
+          aufraeumen;
+          halt(1);
+        end;
+        if wertes[i].faktorisiere(syntaxTest,inf) then
+          continue;
+        aufraeumen;
+        halt(1);
+      end;
       if istDasBefehl('Zeitfrequenzanalyse',s,bekannteBefehle,true) then begin
         j:=findeWerte(erstesArgument(s),nil,@wertes,@konturen,false);
         if j<0 then begin
-- 
cgit v1.2.3-70-g09d2