function zout = w1curve2(t) % % macm 202 -- 27 dec 02 -- djm % % w1curve2.m: complex curve demo integrand, f(z) z' % - use elementwise arithmetic %1 global a z = w1curve1(t,0); dzdt = w1curve1(t,1); fz = 3*z.^2; %1 fz = 1/(2*pi*i)./(z-a); zout = fz.*dzdt; return