File: lin.ode

package info (click to toggle)
xppaut 5.85-3.3
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 11,568 kB
  • ctags: 7,729
  • sloc: ansic: 80,804; cpp: 965; makefile: 271
file content (17 lines) | stat: -rw-r--r-- 160 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
# Generic linear equation
#
init x=2,y=0
p a=1,b=0,c=0,d=-1
#f(z)=z/(1+z^2)
f(z)=z
only x,y
x'= a*x+b*y
y'= f(c*x+d*y)
#aux z=if(x>c)then(a*y)else(b*x)
d