Overview
Comment:Added type definition for the SVD procedures
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: c7dffab088e2326f2eaebad882ac048d6f9fd6ef38017a1c42e388dd35a6c514
User & Date: gawthrop@users.sourceforge.net on 1998-08-12 15:21:12.000
Other Links: branch diff | manifest | tags
Context
1998-08-12
15:53:38
More on concatenating lines - keeps going until ; or $ found. check-in: 87b97b367a user: gawthrop@users.sourceforge.net tags: origin/master, trunk
15:21:12
Added type definition for the SVD procedures check-in: c7dffab088 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
14:15:13
Implicit integration - c implemetation now included. check-in: d6b93f19e6 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Side-by-Side Diff Ignore Whitespace Patch
Modified mttroot/mtt/bin/trans/mtt_m2p from [0aca255e89] to [fdd2d8ef52].
︙
11
12
13
14
15
16
17



18
19
20
21
22
23
24

11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27








+
+
+








# Copyright (c) P.J.Gawthrop 1998

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.13  1998/08/11 09:32:07  peterg
## Added comments at procedure begin and end.
##
## Revision 1.12  1998/07/30 11:30:42  peterg
## Included zeros function
##
## Revision 1.11  1998/07/29 14:18:34  peterg
## Reorganised rep dependednt output
##
## Revision 1.10  1998/07/27 20:26:15  peterg
︙
99
100
101
102
103
104
105
106
107
108
109








110
111
112
113
114
115
116

102
103
104
105
106
107
108




109
110
111
112
113
114
115
116
117
118
119
120
121
122
123








-
-
-
-
+
+
+
+
+
+
+
+








	echo "PROCEDURE $Sys_rep(VAR mtta : StateMatrix;"
	echo "                       mttx : StateVector;"
	echo "                       mttu : InputVector);"
	;;
    ode2odes)
	echo "PROGRAM $Sys_rep;"
	echo "TYPE"
	echo "    StateVector  =ARRAY[1..$Nx] OF REAL;"
	echo "    InputVector  =ARRAY[1..$Nu] OF REAL;"
	echo "    OutputVector =ARRAY[1..$Ny] OF REAL;"
	echo "    StateMatrix  =ARRAY[1..$Nx,1..$Nx] OF REAL;"
	echo "    StateVector  = ARRAY[1..$Nx] OF REAL;"
	echo "    InputVector  = ARRAY[1..$Nu] OF REAL;"
	echo "    OutputVector = ARRAY[1..$Ny] OF REAL;"
	echo "    StateMatrix  = ARRAY[1..$Nx,1..$Nx] OF REAL;"
	echo "    glnparray = StateVector;"
	echo "    glmparray = StateVector;"
	echo "    glnpbynp = StateMatrix;"
	echo "    glmpbynp = StateMatrix;"
	echo "    IntegrationMethod = 1..3;"
	echo "VAR"
        echo "    MTTt,mttLAST,mttDT,mttDDT   : REAL;"
        echo "    MTTWMIN,mttWMAX             : REAL;"
	echo "    mttx,mttdx                  : StateVector;"
	echo "    mttu                        : InputVector;"
	echo "    mtty                        : OutputVector;"
︙
MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]