diff --git a/OpenProblemLibrary/Michigan/Chap2Sec3/Q41.pg b/OpenProblemLibrary/Michigan/Chap2Sec3/Q41.pg index e08f93c476..2a2b6058cb 100644 --- a/OpenProblemLibrary/Michigan/Chap2Sec3/Q41.pg +++ b/OpenProblemLibrary/Michigan/Chap2Sec3/Q41.pg @@ -69,12 +69,8 @@ Context("Numeric"); "a curve decreasing with decreasing slope from top left to " . "bottom right of the graph", "a horizontal line through the center of the graph", - "a curve starting at the bottom left of the graph, reaching " . - "the top of the graph mid-way across the x-range, and then " . - "decreasing back to zero at the right end of the graph", - "a curve starting at the top right of the graph, reaching the " . - "bottom of the graph mid-way across the x-range, and then " . - "increasing back to the top right corner of the graph" ); + "a curve which starts at zero, increases to a peak and then decreases back to zero", + "a curve which starts at the top left, decreases for a bit and then increases to the top right" ); for (my $i=0; $i<@func; $i++ ) { $graphs[$i] = init_graph( 0,0,1,1,size=>[100,100] ); ## no axes or labels @@ -123,7 +119,7 @@ $showPartialCorrectAnswers = 1; foreach $i (0..8) { $fig[$i] = image(insertGraph($graphs[$shuff[$i]]), height=>100, width=>100, tex_size=>250, - extra_html_tags=>'alt="' . $gdesc[$shuff[$i]] . '"'); + alt=>"$gdesc[$shuff[$i]]"); } Context()->texStrings; @@ -204,8 +200,7 @@ if ( @cor3 > 1 ) { } Context()->texStrings; -SOLUTION(EV3(<<'END_SOLUTION')); -$PAR SOLUTION $PAR +BEGIN_SOLUTION Because \( $descr[$f1]\) for \(x < -$a\), the first segment must be $pl1 $ans1. Similarly, because \( $descr[$f2]\) for \(-$a < x < $a\), @@ -219,35 +214,3 @@ Context()->normalStrings; ; ENDDOCUMENT(); - - - -\{ begintable(3) \} -\{ row( "${BBOLD}1.$EBOLD" . - image(insertGraph($graphs[$shuff[0]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[0]] . '"'), - "${BBOLD}2.$EBOLD" . - image(insertGraph($graphs[$shuff[1]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[1]] . '"'), - "${BBOLD}3.$EBOLD" . - image(insertGraph($graphs[$shuff[2]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[2]] . '"') ) \} -\{ row( "${BBOLD}4.$EBOLD" . - image(insertGraph($graphs[$shuff[3]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[3]] . '"'), - "${BBOLD}5.$EBOLD" . - image(insertGraph($graphs[$shuff[4]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[4]] . '"'), - "${BBOLD}6.$EBOLD" . - image(insertGraph($graphs[$shuff[5]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[5]] . '"') ) \} -\{ row( "${BBOLD}7.$EBOLD" . - image(insertGraph($graphs[$shuff[6]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[6]] . '"'), - "${BBOLD}8.$EBOLD" . - image(insertGraph($graphs[$shuff[7]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[7]] . '"'), - "${BBOLD}9.$EBOLD" . - image(insertGraph($graphs[$shuff[8]]), height=>100, width=>100, - extra_html_tags=>'alt="' . $gdesc[$shuff[8]] . '"') ) \} -\{ endtable() \}