00001 function res = veccomp1(v)
00002 %function res = veccomp1(v)
00003 %
00004 % stupid function giving the first component of object v.
00005 % for simplifaciton of reading of integral-kernel-functions.
00006
00007 % Bernard Haasdonk 12.1.2011
00008
00009 res = v(1);