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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/ein/mkoperators.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/ein/mkoperators.sml

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

revision 3173, Sun Mar 29 23:39:25 2015 UTC revision 3174, Mon Mar 30 11:46:58 2015 UTC
# Line 201  Line 201 
201      (************************************* Neg **********************************)      (************************************* Neg **********************************)
202      fun negTT alpha=let      fun negTT alpha=let
203           val  expindex= specialize(alpha,0)           val  expindex= specialize(alpha,0)
204                (*changed tensor lift variable here *)
205           in           in
206              E.EIN{              E.EIN{
207              params = [E.TEN(1,alpha)],index = alpha,              params = [E.TEN(0,alpha)],index = alpha,
208              body = E.Neg(E.Tensor(0, expindex))              body = E.Neg(E.Tensor(0, expindex))
209              }              }
210           end           end

Legend:
Removed from v.3173  
changed lines
  Added in v.3174

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