Subversion Repositories wimsdev

Rev

Rev 16117 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16117 Rev 16119
Line 3... Line 3...
3 
!set methparmtype=parm function integrate, function
 3 
!set methparmtype=parm function integrate, function
4 
!set methhelp=Vous pouvez réécrire le noyau d'une intégrale en une forme\
 4 
!set methhelp=Vous pouvez réécrire le noyau d'une intégrale en une forme\
5 
 équivalente.
 5 
 équivalente.
6 
 
 6 
 
7 
!if $wims_read_parm iswordof form check
 7 
!if $wims_read_parm iswordof form check
8 
 !goto $wims_read_parm
 8 
  !goto $wims_read_parm
9 
!endif
 9 
!endif
10 
 
 10 
 
11 
!exit
 11 
!exit
12 
:form
 12 
:form
13 
!reset methparm3
 13 
!reset methparm3
Line 18... Line 18...
18 
  !set l=!declosing $l
 18 
  !set l=!declosing $l
19 
  !set v=!item 2 of $l
 19 
  !set v=!item 2 of $l
20 
!endif
 20 
!endif
21 
Réécrire l'intégration
 21 
Réécrire l'intégration
22 
!read deduc/methparm.phtml 1
 22 
!read deduc/methparm.phtml 1
23 
en
 23 
$ en
24 
<p><center><table border=0>
 24 
<div class="wimscenter">
25 
<tr><td nowrap>
 - 
 
26 
\(integrate())
 25 
\(integrate())
27 
!read deduc/methparm.phtml 2,40
 26 
!read deduc/methparm.phtml 2,40
28 
!if $N=1
 27 
!if $N=1
29 
  d$v
 28 
  d$v
30 
!else
 29 
!else
31 
  d<input size=4 name=methparm3/>
 30 
  d<input size="4" name="methparm3" />
32 
!endif
 31 
!endif
33 
 </td></tr></table></center>
 32 
</div>
34 
!exit
 33 
!exit
35 
:check
 34 
:check
36 
ker=!item 2 of $methparmobj1
 35 
ker=!item 2 of $methparmobj1
37 
ker=!mathsubst integrate= in $ker
 36 
ker=!mathsubst integrate= in $ker
38 
ker=!trim $ker
 37 
ker=!trim $ker