function tau = genforces(r) for j=1:r.n tau(j) = sym( sprintf('tau%d', j), 'real' ); end