X-Git-Url: https://git.jsancho.org/?p=guile-assimp.git;a=blobdiff_plain;f=assimp%2Flow-level%2Fmatrix.scm;fp=assimp%2Flow-level%2Fmatrix.scm;h=0000000000000000000000000000000000000000;hp=416b4d04f7478d005ef87305781b8678bfd367a0;hb=ceafd0037f102ffbb2b902b6ccb0b9701f3ae1ba;hpb=1dc327bbc4a576fdc5c160325d86b5b32754139b diff --git a/assimp/low-level/matrix.scm b/assimp/low-level/matrix.scm deleted file mode 100644 index 416b4d0..0000000 --- a/assimp/low-level/matrix.scm +++ /dev/null @@ -1,53 +0,0 @@ -;;; guile-assimp, foreign interface to libassimp -;;; Copyright (C) 2014 by Javier Sancho Fernandez -;;; -;;; This program is free software: you can redistribute it and/or modify -;;; it under the terms of the GNU General Public License as published by -;;; the Free Software Foundation, either version 3 of the License, or -;;; (at your option) any later version. -;;; -;;; This program is distributed in the hope that it will be useful, -;;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -;;; GNU General Public License for more details. -;;; -;;; You should have received a copy of the GNU General Public License -;;; along with this program. If not, see . - - -(define-module (assimp low-level matrix) - #:use-module (assimp low-level) - #:use-module (system foreign)) - - -(define-struct-parser parse-aiMatrix3x3 - (a1 float) - (a2 float) - (a3 float) - (b1 float) - (b2 float) - (b3 float) - (c1 float) - (c2 float) - (c3 float)) - -(define-struct-parser parse-aiMatrix4x4 - (a1 float) - (a2 float) - (a3 float) - (a4 float) - (b1 float) - (b2 float) - (b3 float) - (b4 float) - (c1 float) - (c2 float) - (c3 float) - (c4 float) - (d1 float) - (d2 float) - (d3 float) - (d4 float)) - -(export parse-aiMatrix3x3 - parse-aiMatrix4x4)