mmarco/kenzo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Problem solved with smash products

Browse Source
This commit is contained in:
Ana Romero 2019-11-26 20:09:32 +01:00
parent d382875c21
commit a3362c6f0b
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/pushout/Pushout.lisp
View File

@ -145,9 +145,9 @@
(2 (with-absm (dgop gmsm) (? g (1- dmns) (absm dgop gmsm1))
(absm dgop (pushout-gsm 2 gmsm))))
(3 (absm dgop (pushout-gsm 0 crpr)))))))
(1 (with-absm (dgop gmsm) (funcall face2 indx dmns gmsm)
(1 (with-absm (dgop gmsm) (funcall face2 indx dmns old)
(absm dgop (pushout-gsm 1 gmsm))))
(2 (with-absm (dgop gmsm) (funcall face3 indx dmns gmsm)
(2 (with-absm (dgop gmsm) (funcall face3 indx dmns old)
(absm dgop (pushout-gsm 2 gmsm))))))))
(the face #'rslt)))