Subversion Repositories wimsdev

Rev

Rev 20 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
16321 bpr 1
!set methtit=Intercambiar los dos lados de una desigualdad
20 reyssat 2
!set methenv=ZZ QQ RR
3
!set methparmtype=parm inequality
16321 bpr 4
!set methhelp=Este método reescribe la desigualdad \(a < b) como \(b > a),\
5
  o viceversa.
20 reyssat 6
 
7
!if $wims_read_parm iswordof form check
16321 bpr 8
  !goto $wims_read_parm
20 reyssat 9
!endif
10
 
11
!exit
12
:form
16321 bpr 13
Intercambiar ambos lados de la desigualdad
14
!read deduc/methparm.phtml 1
20 reyssat 15
 
16
!exit
17
:check
16321 bpr 18
!distribute items $methparmobj1 into data,left,sign,right
19
methexp=Intercambia los dos lados de \($left $sign $right)
20 reyssat 20
 
16321 bpr 21
newsign=!translate internal <> to >< in $sign
22
newobject1=$right $newsign $left
23
oldobject=1
20 reyssat 24
 
16321 bpr 25
contextlist=$ct_Always,\
26
	$ct_Onlywhen ambos lados son positivos,\
27
	$ct_Onlywhen ambos lados tienen el mismo signo,\
28
	$ct_Onlywhen la desigualdad es estricta
20 reyssat 29
 
16321 bpr 30
resultlist=$newobject1,\
31
 $right $sign $left
20 reyssat 32
 
33
!exit