istereo2

annotate libs/vmath/basis_c.c @ 2:81d35769f546

added the tunnel effect source
author John Tsiombikas <nuclear@member.fsf.org>
date Sat, 19 Sep 2015 05:51:51 +0300
parents
children
rev   line source
nuclear@2 1 /*
nuclear@2 2 libvmath - a vector math library
nuclear@2 3 Copyright (C) 2004-2011 John Tsiombikas <nuclear@member.fsf.org>
nuclear@2 4
nuclear@2 5 This program is free software: you can redistribute it and/or modify
nuclear@2 6 it under the terms of the GNU Lesser General Public License as published
nuclear@2 7 by the Free Software Foundation, either version 3 of the License, or
nuclear@2 8 (at your option) any later version.
nuclear@2 9
nuclear@2 10 This program is distributed in the hope that it will be useful,
nuclear@2 11 but WITHOUT ANY WARRANTY; without even the implied warranty of
nuclear@2 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
nuclear@2 13 GNU Lesser General Public License for more details.
nuclear@2 14
nuclear@2 15 You should have received a copy of the GNU Lesser General Public License
nuclear@2 16 along with this program. If not, see <http://www.gnu.org/licenses/>.
nuclear@2 17 */
nuclear@2 18
nuclear@2 19 #include "basis.h"
nuclear@2 20 #include "matrix.h"
nuclear@2 21
nuclear@2 22 void basis_matrix(mat4_t res, vec3_t i, vec3_t j, vec3_t k)
nuclear@2 23 {
nuclear@2 24 m4_identity(res);
nuclear@2 25 m4_set_column(res, v4_cons(i.x, i.y, i.z, 1.0), 0);
nuclear@2 26 m4_set_column(res, v4_cons(j.x, j.y, j.z, 1.0), 1);
nuclear@2 27 m4_set_column(res, v4_cons(k.x, k.y, k.z, 1.0), 2);
nuclear@2 28 }
nuclear@2 29
nuclear@2 30 void basis_matrix_dir(mat4_t res, vec3_t dir)
nuclear@2 31 {
nuclear@2 32 vec3_t k = v3_normalize(dir);
nuclear@2 33 vec3_t j = {0, 1, 0};
nuclear@2 34 vec3_t i = v3_cross(j, k);
nuclear@2 35 j = v3_cross(k, i);
nuclear@2 36 basis_matrix(res, i, j, k);
nuclear@2 37 }