Subversion Repositories wimsdev

Rev

Rev 7210 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7210 Rev 17234
Line 20... Line 20...
20
 !else
20
 !else
21
  !bound methparm1 between integer 0 and $N default 1
21
  !bound methparm1 between integer 0 and $N default 1
22
  !if $methparm1=0 or $error!=$empty
22
  !if $methparm1=0 or $error!=$empty
23
   !goto first
23
   !goto first
24
  !endif
24
  !endif
25
  <input type="hidden" name="methparm1" value="$methparm1" />
25
  <input type="hidden" name="methparm1" value="$methparm1">
26
  !set methsubstep=1
26
  !set methsubstep=1
27
  !set l=!line $methparm1 of $mtobj1
27
  !set l=!line $methparm1 of $mtobj1
28
  !set l=!item 2 to -1 of $l
28
  !set l=!item 2 to -1 of $l
29
  !set k=!mathsubst integrate= in $l
29
  !set k=!mathsubst integrate= in $l
30
  !set k=!declosing $k
30
  !set k=!declosing $k
31
  !set v=!item 2 of $k
31
  !set v=!item 2 of $k
32
  д³É \($l = integrate(f1($v),$v) + integrate(f2($v),$v)), ÆäÖÐ
32
  д³É \($l = integrate(f1($v),$v) + integrate(f2($v),$v)), ÆäÖÐ
33
  <p>
33
  <p>
34
  \(f1($v) = ) <input size=30 name=methparm2 value="$methparm2"/> (±ØÐëÓеÄ), <br/>
34
  \(f1($v) = ) <input size=30 name=methparm2 value="$methparm2"> (±ØÐëÓеÄ), <br>
35
  \(f2($v) = ) <input size=30 name=methparm3/> (¿ÉÑ¡µÄ).
35
  \(f2($v) = ) <input size=30 name=methparm3> (¿ÉÑ¡µÄ).
36
 !endif
36
 !endif
37
!exit
37
!exit
38
:check
38
:check
39
 ker=!item 2 of $methparmobj1
39
 ker=!item 2 of $methparmobj1
40
 ker=!mathsubst integrate= in $ker
40
 ker=!mathsubst integrate= in $ker
Line 65... Line 65...
65
 !endif
65
 !endif
66
 !if $out!=yes
66
 !if $out!=yes
67
  error=¼Ó·¨´í. Çë¸ÄÕý.
67
  error=¼Ó·¨´í. Çë¸ÄÕý.
68
  !exit
68
  !exit
69
 !endif
69
 !endif
70
 
70
 
71
 newobject1=(integrate($methparm2,$ivar)+integrate($methparm3,$ivar))
71
 newobject1=(integrate($methparm2,$ivar)+integrate($methparm3,$ivar))
72
 oldobject=1
72
 oldobject=1
73
 !reset methparm3
73
 !reset methparm3
74
 methexp=
74
 methexp=
75
!exit
75
!exit