Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/high-opt/derivative.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/high-opt/derivative.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3977, Wed Jun 15 19:06:30 2016 UTC revision 3978, Wed Jun 15 19:07:40 2016 UTC
# Line 71  Line 71 
71                | E.ArcTangent =>                | E.ArcTangent =>
72                    iterDn (mkProd [mkDiv(one, mkAdd[one, square]), inner])                    iterDn (mkProd [mkDiv(one, mkAdd[one, square]), inner])
73                | E.PowInt n => iterDn (mkProd [E.Const n, E.Op1(E.PowInt(n-1), e1), inner])                | E.PowInt n => iterDn (mkProd [E.Const n, E.Op1(E.PowInt(n-1), e1), inner])
               | E.PowReal r => raise Fail "applyOp1: PowReal" (* FIXME *)  
               | E.PowEmb(sx1, n1) =>  
                   iterDn (mkDiv (E.Sum(sx1, mkProd [e1, inner]), E.Op1(E.PowEmb(sx1, n1), e1)))  
74            (* end case *)            (* end case *)
75          end          end
76    

Legend:
Removed from v.3977  
changed lines
  Added in v.3978

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0