Rev 20 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 20 | Rev 16321 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !set |
1 | !set methtit2=Dividir una ecuación por un número distinto de cero |
2 | !set |
2 | !set methtit=Dividir una ecuación por un número |
3 | !set methenv=ZZ QQ RR CC |
3 | !set methenv=ZZ QQ RR CC |
4 | !set methparmtype=number,parm equation |
4 | !set methparmtype=number,parm equation |
5 | !set |
5 | !set methhelp=Este método transforma una ecuación \(A = B)\ |
6 | en |
6 | en la ecuación equivalente \(A/n = B/n), donde \(n) es un número\ |
7 |
|
7 | distinto de cero. |
8 | 8 | ||
9 | !if $wims_read_parm iswordof form check |
9 | !if $wims_read_parm iswordof form check |
10 | !goto $wims_read_parm |
10 | !goto $wims_read_parm |
11 | !endif |
11 | !endif |
12 | 12 | ||
13 | !exit |
13 | !exit |
14 | :form |
14 | :form |
15 |
|
15 | Dividir la ecuacion |
16 | !read deduc/methparm.phtml 2 |
16 | !read deduc/methparm.phtml 2 |
17 |
|
17 | por un número |
18 | !read deduc/methparm.phtml 1,10 |
18 | !read deduc/methparm.phtml 1,10 |
19 | 19 | ||
20 | !exit |
20 | !exit |
21 | :check |
21 | :check |
22 |
|
22 | !distribute items $methparmobj2 into data,left,sign,right |
23 |
|
23 | !ifval $methparm1=0 |
24 |
|
24 | error=¡División por cero! |
25 | !advance penalty |
25 | !advance penalty |
26 | !exit |
26 | !exit |
27 |
|
27 | !endif |
28 |
|
28 | methexp=Dividir \($left $sign $right) entre \($methparm1) |
29 | 29 | ||
30 |
|
30 | !read deduc/sub/simplify ($left) / ($methparm1)\ |
31 | ($right) / ($methparm1) |
31 | ($right) / ($methparm1) |
32 |
|
32 | !distribute lines $out into newleft, newright |
33 |
|
33 | !if $newleft=$empty or $newright=$empty |
34 | error=bad_data |
34 | error=bad_data |
35 | !exit |
35 | !exit |
36 |
|
36 | !endif |
37 |
|
37 | newsign=$sign |
38 |
|
38 | newobject2=$newleft $newsign $newright |
39 |
|
39 | oldobject=2 |
40 | 40 | ||
41 |
|
41 | contextlist=$ct_Onlywhen el divisor no es nulo,\ |
42 | $ct_Onlywhen |
42 | $ct_Onlywhen el divisor es positivo,\ |
43 | $ct_Always,\ |
43 | $ct_Always,\ |
44 | $ct_Onlywhen |
44 | $ct_Onlywhen ambos lados son positivos,\ |
45 | $ct_Onlywhen |
45 | $ct_Onlywhen ambos lados tienen el mismo signo |
46 | - | ||
47 | !exit |
- | |
48 | 46 | ||
- | 47 | !exit |