[ create a new paste ] login | about

Link: http://codepad.org/zHRy7VSj    [ raw code | fork ]

Plain Text, pasted on Mar 11: 
1
2
3
4
5

(defn gradient [x]  
	(mmult 
		(trans A) (diag (to-list (exp ( mmult A x ) ) ) )  
	) 
)


Create a new paste based on this one


Comments: