blob: fb932fa96fb7a87242ad15e0532e3a16f60adc83 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
//ques37
syms a t
x=a*(cos(t)+log(tan(t/2)));
y=a*sin(t);
s=diff(x,t,1)/diff(y,t,1);
disp('length of tangent ');
l=y*(1+s)^(0.5);
disp(l);
disp('checking for its dependency on t')
f=1
t=0;
k=eval(l);
for i=1:10
t=i;
if(eval(l)~=k)
f=0;
end
end
if(f==1)
disp("verified and equal to a");
disp('subtangent');
m=y/s;
disp(m);
|
