[rochester] / trunk / rochester_physics_problib / type16 / prob10.pg Repository: Repository Listing bbplugincoursesdistsnplrochestersystemwww

# Annotation of /trunk/rochester_physics_problib/type16/prob10.pg

 1 : gage 873 2 : DOCUMENT(); 3 : 4 : loadMacros( "PG.pl", 5 : "PGbasicmacros.pl", 6 : "PGauxiliaryFunctions.pl", 7 : "PGchoicemacros.pl", 8 : "PGanswermacros.pl", 9 : "PGgraphmacros.pl", 10 : "PG_CAPAmacros.pl" 11 : ); 12 : 13 : TEXT(beginproblem()); 14 : 15 : 16 : ## ************************************** 17 : ## 18 : ## Elastic and inelastic collisions (conservation of momentum) 19 : ## Part 1 20 : ## No unauthorized commerical use 21 : ## Imported Files: 22 : ## ${CAPA_Tools}Problem 23 : ##${CAPA_GraphicsDirectory}Gtype16/prob10a.eps 24 : ## Values needing defined: 25 : ## prob_val (number, e.g. /LET prob_val=1) 26 : ## prob_try (number, e.g. /LET prob_try=5) 27 : ## 28 : ## Last modified 07/21/97 29 : ## by: Patrick D. Freivald, patrick@freivald.org 30 : ## 31 : ## ************************************** 32 : ## 33 : $m1 = random( 1. , 2. , 0.05 ) ; 34 :$m2 = random( 1. , 2. , 0.05 ) ; 35 : $m = random( 1. , 10. , 0.05 ) ; 36 :$v1 = random( 1. , 5. , 0.1 ) ; 37 : $v2 = random( 1. , 5. , 0.1 ) ; 38 :$pf2 = ( $m2 + 0.001 *$m ) * $v2 ; 39 :$pi2 = $pf2 ; 40 :$v_b2 = $pi2 / ( 0.001 *$m ) ; 41 : $pf1 = 0.001 *$m * $v_b2 +$m1 * $v1 ; 42 :$pi1 = $pf1 ; 43 :$v0 = $pi1 / ( 0.001 *$m ) ; 44 : ## 45 : CAPA_import( " ${CAPA_Tools}Problem " ); 46 : TEXT(CAPA_EV (<<'END_OF_TEXT')); 47 : A bullet with a mass of \{ spf($m , "%0.2f" ) \} \{ $g_u \} is fired horizontally at two blocks resting on a smooth and frictionless table top as shown in the Figure. The bullet passes trhough the first \{ spf($m1 , "%0.2f" ) \} \{ $kg_u \} block, and embeds itself in a second \{ spf($m2 , "%0.2f" ) \} \{ $kg_u \} block. Speeds \{ CAPA_web( 'v1' , '/*v_1/*' , 'v1' ) \} = \{ spf($v1 , "%0.2f" ) \} \{ $mPs_u \} and \{ CAPA_web( 'v2' , '/*v_2/*' , 'v2' ) \} = \{ spf($v2 , "%0.2f" ) \} \{ $mPs_u \}, are thereby imparted on the blocks. The mass removed from the first block by the bullet can be neglected.$BR 48 : \{ CAPA_web( '' , '\noindent {\centerline{\epsfxsize=2.0in \epsffile{${CAPA_GraphicsDirectory}Gtype16/prob10a.eps}}}' , '' ) \} 49 :$BR$BR Find the speed of the bullet immediately after emerging from the first block. 50 : END_OF_TEXT 51 : 52 : ## 53 : 54 : TEXT("$BR",ans_rule(30),"$BR"); 55 : ANS( CAPA_ans($v_b2 , 'format' => "%0.2e" , 'sig' => '3 PLUS 13', 'reltol' => 1 , 'wgt' => $prob_val , 'tries' =>$prob_try , 'unit' => 'm/s' ) ); 56 : ## ************************************** 57 : ## 58 : ## Elastic and inelastic collisions (conservation of momentum) 59 : ## Part 2 60 : ## No unauthorized commerical use 61 : ## Imported Files: 62 : ## ${CAPA_Tools}Problem 63 : ## Values needing defined: 64 : ## prob_val (number, e.g. /LET prob_val=1) 65 : ## prob_try (number, e.g. /LET prob_try=5) 66 : ## 67 : ## Last modified 07/21/97 68 : ## by: Patrick D. Freivald, patrick@freivald.org 69 : ## 70 : ## ************************************** 71 : ## 72 : CAPA_import( "${CAPA_Tools}Problem " ); 73 : TEXT(CAPA_EV (<<'END_OF_TEXT')); 74 : $BR Find the initial speed of the bullet. 75 : END_OF_TEXT 76 : 77 : ## 78 : 79 : TEXT("$BR",ans_rule(30),"$BR"); 80 : ANS( CAPA_ans($v0 , 'format' => "%0.2e" , 'sig' => '3 PLUS 13', 'reltol' => 1 , 'wgt' => $prob_val , 'tries' =>$prob_try , 'unit' => 'm/s' ) ); 81 : ENDDOCUMENT(); 82 : ##################### 83 : 84 : ###Error: $g_u not defined in this file 85 : ###Error:$kg_u not defined in this file 86 : ###Error: $kg_u not defined in this file 87 : ###Error:$mPs_u not defined in this file 88 : ###Error: $mPs_u not defined in this file 89 : ###Error:$prob_val not defined in this file 90 : ###Error: $prob_try not defined in this file 91 : ###Error:$prob_val not defined in this file 92 : ###Error: \$prob_try not defined in this file 93 : 94 : ##################### 95 : 96 : 97 : ################################################# 98 : ## Processing time = 1 secs ( 0.84 usr 0.00 sys = 0.84 cpu) 99 : #################################################