summaryrefslogtreecommitdiff
path: root/149/CH4/EX4.34/ques34.sce
blob: 215eca563c888972ca5d8ba018c3319b45452eed (plain)
1
2
3
4
5
6
7
8
9
10
//ques34
disp('Equation of tangent');
syms x a t y
xo=a*(cos(t)+t*sin(t));
yo=a*(sin(t)-t*cos(t));
s=diff(xo,t)/diff(yo,t);
y=yo+s*(x-xo);
disp('y=');
disp(y);