models/Primer/cona.lua

   1 --%  ft| TRAJECTORY_T0_V0_A1_O1 sn| Oscillatory~convergence~to~a~fixed~point n| #0 d| 1.1 n| #1 d| -1.1 n| #2 d| -0.5 n| #3 d| 0.01 n| #4 d| 0 n| #5 d| 1000 n| #6 d| 1000 n| #7 d| x n| #8 d| y
   2 --@@
   3 name = "Cona"
   4 description = " See Model refs in user's guide"
   5 type = "C"
   6 parameters = {"a"}
   7 variables = {"x", "y"}
   8
   9 function f (a, x, y)
  10
  11         x1 =  y - x^2 + 2
  12         y1 = 2 * a * (x^2 - y^2)
  13
  14         return x1, y1
  15
  16 end
  17
  18 function Jf(a, x, y)
  19
  20         return
  21
  22         -2 * x  , 1,
  23         4 * a * x       , -4 * a * y
  24
  25 end