Mercurial > matrix-functions
view funm_files/fun_sin.m @ 0:8f23314345f4 draft
Create local repository for matrix toolboxes. Step #0 done.
author | Antonio Pino Robles <data.script93@gmail.com> |
---|---|
date | Wed, 06 May 2015 14:56:53 +0200 |
parents | |
children |
line wrap: on
line source
function f = fun_sin(x,k) %FUN_SIN if nargin < 2 | k == 0 f = sin(x); else k = k - 1; g = mod(ceil(k/2),2); h = mod(k,2); if h == 1 f = sin(x)*(-1)^g; else f = cos(x)*(-1)^g; end end