[npl] / trunk / NationalProblemLibrary / maCalcDB / setAlgebra19FunTransforms / beth1algfun.pg Repository: Repository Listing bbplugincoursesdistsnplrochestersystemwww

# View of /trunk/NationalProblemLibrary/maCalcDB/setAlgebra19FunTransforms/beth1algfun.pg

Mon Jan 16 17:17:15 2006 UTC (7 years, 4 months ago) by jj
File size: 1773 byte(s)
```Added database subject entry.
```

```    1 ##DESCRIPTION
2 ##   Transformations of graphs
3 ##ENDDESCRIPTION
4
5 ##KEYWORDS('percent')
6 ## lcao tagged and PAID on 2-20-2004
7
8 ## DBsubject('Algebra')
9 ## DBchapter('Functions')
10 ## DBsection('Transformations of Functions')
11 ## Date('6/3/2002')
12 ## Author('')
13 ## Institution('')
14 ## TitleText1('College Algebra')
15 ## EditionText1('3')
16 ## AuthorText1('Stewart, Redlin, Watson')
17 ## Section1('4.5')
18 ## Problem1('2')
19
20 #
21 # First comes some stuff that appears at the beginning of every problem
22 #
23
24 DOCUMENT();        # This should be the first executable line in the problem.
25
27 "PG.pl",
28 "PGbasicmacros.pl",
30 "PGauxiliaryFunctions.pl",
31 "PGgraphmacros.pl",
32 "PGasu.pl",
34 );
35
36 TEXT(&beginproblem);
37
38 \$a=non_zero_random(-6,6);
39 \$b=non_zero_random(-6,6);
40 \$a1 = -1+\$a;
41 \$b1 = 2+\$a;
42 \$c1 = 5+\$a;
43 \$a2 = -\$b;
44 \$b2 = -1-\$b;
45 \$c2 = -\$b;
46
47
48 BEGIN_TEXT
49 The graph of \( y= f(x) \) is given below: \$BR
50 \{ image("graph.gif", width=>329, height=>247)\}
51 \$BR \$BR
52 On a piece of paper sketch the graph of \( y=f(x-\$a) \) and
53 determine the new coordinates of points A, B and C.
54 \$BR
55      A = \{ans_rule(10)\}
56 \$BR
57      B = \{ans_rule(10)\}
58 \$BR
59      C = \{ans_rule(10)\}
60
61 \$BR \$BR
62 On a piece of paper sketch the graph of \( y=-f(x)-\$b \) and
63 determine the new coordinates of points A, B and C.
64 \$BR
65      A = \{ans_rule(10)\}
66 \$BR
67      B = \{ans_rule(10)\}
68 \$BR
69      C = \{ans_rule(10)\}
70 END_TEXT
71
72
73 ANS(interval_cmp( "(\$a1, 0)", unions=>'no' ) );
74 ANS(interval_cmp( "(\$b1, 1)", unions=>'no' ) );
75 ANS(interval_cmp( "(\$c1, 0)", unions=>'no' ) );
76 ANS(interval_cmp( "(-1, \$a2)", unions=>'no' ) );
77 ANS(interval_cmp( "(2, \$b2)", unions=>'no' ) );
78 ANS(interval_cmp( "(5, \$c2)", unions=>'no' ) );
79
80 ENDDOCUMENT();        # This should be the last executable line in the problem.
81
82
```