Version recien subida al svn

git-svn-id: svn+ssh://lulu.fing.edu.uy/ens/home01/pgperui/repoSVN@13 65703dd9-322d-4ecd-a169-f49c4620ba53

1 files changed, 29 insertions, 0 deletions

diff --git a/tags/Version Original/ARToolkit/lib/SRC/AR/mTrans.c b/tags/Version Original/ARToolkit/lib/SRC/AR/mTrans.c
new file mode 100755
index 0000000..3d14116
--- /dev/null
+++ b/tags/Version Original/ARToolkit/lib/SRC/AR/mTrans.c
@@ -0,0 +1,29 @@
+/*******************************************************
+ *
+ * Author: Shinsaku Hiura, Hirokazu Kato
+ *
+ *         shinsaku@sys.es.osaka-u.ac.jp
+ *         kato@sys.im.hiroshima-cu.ac.jp
+ *
+ * Revision: 2.1
+ * Date: 99/07/16
+ *
+*******************************************************/
+#include <stdio.h>
+#include <math.h>
+#include <AR/matrix.h>
+
+int arMatrixTrans(ARMat *dest, ARMat *source)
+{
+	int r, c;
+
+	if(dest->row != source->clm || dest->clm != source->row) return -1;
+
+	for(r = 0; r < dest->row; r++) {
+		for(c = 0; c < dest->clm; c++) {
+			ARELEM0(dest, r, c) = ARELEM0(source, c, r);
+		}
+	}
+
+	return 0;
+}