
diff -r ca638d713ff8 -r b1d955791529 src/HOL/Matrix_LP/Matrix.thy
--- a/src/HOL/Matrix_LP/Matrix.thy	Thu Oct 31 16:54:22 2013 +0100
+++ b/src/HOL/Matrix_LP/Matrix.thy	Fri Nov 01 18:51:14 2013 +0100
@@ -1542,8 +1542,8 @@
   fix A B :: "'a matrix"
   show "- A + A = 0" 
     by (simp add: plus_matrix_def minus_matrix_def Rep_matrix_inject[symmetric] ext)
-  show "A - B = A + - B"
-    by (simp add: plus_matrix_def diff_matrix_def minus_matrix_def Rep_matrix_inject [symmetric] ext diff_minus)
+  show "A + - B = A - B"
+    by (simp add: plus_matrix_def diff_matrix_def minus_matrix_def Rep_matrix_inject [symmetric] ext)
 qed
 
 instance matrix :: (ab_group_add) ab_group_add




