Overview
Comment:Bug fix for dassl.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 8e4e6001ef8d7ef106a5323b19bae4966697ddbc27f7481ad4835e2bc733476d
User & Date: geraint@users.sourceforge.net on 2001-08-01 22:14:32
Other Links: branch diff | manifest | tags
Context
2001-08-01
22:16:01
Return input vector unchanged so that dassl can do the hard stuff. check-in: 864c3c4711 user: geraint@users.sourceforge.net tags: origin/master, trunk
22:14:32
Bug fix for dassl. check-in: 8e4e6001ef user: geraint@users.sourceforge.net tags: origin/master, trunk
04:06:07
Added -i dassl for -cc and -oct. check-in: 16431df012 user: geraint@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/make_ode2odes from [ce4f690852] to [0dcadf2ac3].

1
2
3
4
5
6
7
8
9
10
11



12
13
14
15
16
17
18
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21











+
+
+







#! /bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
    ######################################

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.61  2001/08/01 04:06:07  geraint
## Added -i dassl for -cc and -oct.
##
## Revision 1.60  2001/07/16 22:23:00  geraint
## Fixed misleading variable name in .cc rep.
##
## Revision 1.59  2001/07/13 04:54:04  geraint
## Branch merge: numerical-algebraic-solution back to main.
##
## Revision 1.58  2001/07/13 00:51:39  geraint
631
632
633
634
635
636
637
638

639
640
641
642
643
644
645
634
635
636
637
638
639
640

641
642
643
644
645
646
647
648







-
+







    new_args(2) = octave_value (t);
    new_args(3) = octave_value (par);
    u = feval ("${sys}_input", new_args, 1)(0).${vector_value} ();
#endif

    U.insert (u,0);
    if (MTTNYZ > 0)
      U.insert (ui,MTTNX);
      U.insert (ui,MTTNU);

#ifdef STANDALONE
    dx = F${sys}_${ode} (x,U,t,par);
    yz = F${sys}_ae (x,U,t,par);
#else
    new_args(1) = octave_value (U);
    dx = feval ("${sys}_${ode}", new_args, 1)(0).${vector_value} ();


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]