Overview
Comment:No assignements for switch either
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: aa3e8a21c0fc4523d64f9616e1a64c9e99345fe345e43e0ec3657a91fba775a5
User & Date: gawthrop@users.sourceforge.net on 1998-07-25 20:42:30
Other Links: branch diff | manifest | tags
Context
1998-07-25
20:43:18
Initial revision check-in: 40404a1dc7 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:42:30
No assignements for switch either check-in: aa3e8a21c0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:41:38
Spaces between numbers check-in: 75b1f72e26 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/lang_header from [1d0a01c003] to [87f9bbae08]. 

1
2
3
4
5
6
7
8
9
10



11
12
13
14
15
16
17

#!/bin/sh

# Generates function header for a computer language
# PJ Gawthrop May 1998

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



## Revision 1.3  1998/07/19 15:52:15  peterg
## Don't call the _input function - make it external from now on ...
##
## Revision 1.2  1998/05/24 12:47:39  peterg
## This still needs worjk doing for c generation!!
##
## Revision 1.1  1998/05/23 16:17:40  peterg











>
>
>








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

#!/bin/sh

# Generates function header for a computer language
# PJ Gawthrop May 1998

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.4  1998/07/25 10:43:10  peterg
## No assignments of x or u if sm rep.
##
## Revision 1.3  1998/07/19 15:52:15  peterg
## Don't call the _input function - make it external from now on ...
##
## Revision 1.2  1998/05/24 12:47:39  peterg
## This still needs worjk doing for c generation!!
##
## Revision 1.1  1998/05/23 16:17:40  peterg
︙︙
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155

EOF
fi

# Globals
sympar2global_txt2lang $1 $language

if [ "$language" = "c" ] || [ "$language" = "m" ]; then
  if [ "$rep" != "sm" ]; then
  # Common part - ode (c and m)
  # Use octave for this bit - needs the definition file
  $MATRIX -q  <<EOF 
    %System structure
    [nx,ny,nu,nz,nyz] = $1_def;

  printf("$Lc====== Set up the state variables ======$Rc\n");








|








144
145
146
147
148
149
150
151
152
153
154
155
156
157
158

EOF
fi

# Globals
sympar2global_txt2lang $1 $language

if [ "$language" = "c" ] || [ "$language" = "m" ]; then
  if [ "$rep" != "sm" ]&&[ "$rep" != "switch" ]; then
  # Common part - ode (c and m)
  # Use octave for this bit - needs the definition file
  $MATRIX -q  <<EOF 
    %System structure
    [nx,ny,nu,nz,nyz] = $1_def;

  printf("$Lc====== Set up the state variables ======$Rc\n");
︙︙

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