29.06.2016 Views

Thomas Calculus 13th [Solutions]

  • No tags were found...

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

932 Chapter 13 Vector-Valued Functions and Motion in Space<br />

d u<br />

34. u C ai bj ck with a, b, c real constants da<br />

i<br />

db<br />

j<br />

dc<br />

k<br />

dt dt dt dt<br />

0i 0j 0k<br />

0<br />

35-38. Example CAS commands:<br />

Maple:<br />

> with( plots );<br />

r : t - [sin(t)-t*cos(t),cos(t) t*sin(t),t^2];<br />

t0 : 3*Pi/2;<br />

1o : 0;<br />

hi : 6*Pi;<br />

P1: spacecurve( r(t), t 1o..hi, axes boxed, thickness 3 ):<br />

display( P1, title "#35(a) (Section 13.1)" );<br />

Dr : unapply( diff(r(t),t), t ); # (b)<br />

Dr(t0);<br />

# (c)<br />

q1: expand( r(t0) Dr(t0)*(t-t0) );<br />

T : unapply( q1, t );<br />

P2 : spacecurve( T(t), t 1o..hi, axes boxed, thickness 3, color black ):<br />

display( [P1,P2], title "#35(d) (Section 13.1)" );<br />

39-40. Example CAS commands:<br />

Maple:<br />

a : 'a'; b : 'b';<br />

r : (a,b,t) - [cos(a*t),sin(a*t),b*t];<br />

Dr : unapply( diff(r(a,b,t),t), (a,b,t) );<br />

t0 : 3*Pi/2;<br />

q1: expand( r(a,b,t0) Dr(a,b,t0)*(t-t0) );<br />

T : unapply( q1, (a,b,t) );<br />

1o : 0;<br />

hi : 4*Pi;<br />

P : NULL:<br />

for a in [ 1, 2, 4, 6 ] do<br />

P1: spacecurve( r(a,1,t), t 1o..hi, thickness 3 ):<br />

P2 : spacecurve( T(a,1,t), t 1o..hi, thickness 3, color black ):<br />

P : P, display( [P1,P2], axes boxed, title sprintf("#39 (Section 13.1)\n a %a",a) );<br />

end do:<br />

display( [P], insequence true );<br />

Copyright<br />

2014 Pearson Education, Inc.

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!