1%%copyright (c) 2011 Juan Pablocarbajal <carbajal@ifi.uzh.ch>
2%%
3%%    This program is free software: youcan redistribute itand/or modify
4%%    it under the terms of the GNU General Public Licenseas publishedby
5%%    the Free Software Foundation, either version 3 of the License, or
6%%   any later version.
7%%
8%%    This program is distributed in the hope that it willbe useful,
9%%   but WITHOUTaNY WARRANTY; without even the implied warranty of
10%%    MERCHANTABILITY or FITNESS FORa PARTICULAR PURPOSE.  See the
11%%    GNU General Public License for more details.
12%%
13%%    You should have receivedacopy of the GNU General Public License
14%%   along with this program. If not, see <http://www.gnu.org/licenses/>.
15
16%% -*- texinfo -*-
17%% @deftypefn {Function File} {@var{qc} = } quatconj (@var{q})
18%% Conjugate of a quaternion.
19%% @end deftypefn
20
21function qc = quatconj(q);
22  qc = [q(:,1) -q(:,2:4)];
23endfunction
24