Overview
Comment:Don't sort the states when defaulting - leave in implied order
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 29f4d52280f96d5c9cea82b58830d862e37b78e4e4df17cf8e6cd28d9a936144
User & Date: gawthrop@users.sourceforge.net on 2003-08-13 15:49:39
Other Links: branch diff | manifest | tags
Context
2003-08-13
16:12:55
New modulated thermal resistance for use in Thermodynamic Cycles
Eg CarnotCycle
check-in: 99f5f65ed4 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
15:49:39
Don't sort the states when defaulting - leave in implied order check-in: 29f4d52280 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2003-08-10
18:56:55
Explicitly generate eps files check-in: 9767e4eb0b user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/mtt_update from [a732204ed3] to [e1bcb5489f].

9
10
11
12
13
14
15



16
17
18
19
20
21
22
# Copyright (C) 2000 by Peter J. Gawthrop

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



## Revision 1.18  2003/08/04 09:10:30  gawthrop
## Now handles steady-state computation for _state.txt.
##
## Revision 1.17  2002/04/28 18:41:27  geraint
## Fixed [ 549658 ] awk should be gawk.
## Replaced calls to awk with call to gawk.
##







>
>
>







9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
# Copyright (C) 2000 by Peter J. Gawthrop

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.19  2003/08/05 15:29:36  gawthrop
## Now handles ss.r files with implicit zero values
##
## Revision 1.18  2003/08/04 09:10:30  gawthrop
## Now handles steady-state computation for _state.txt.
##
## Revision 1.17  2002/04/28 18:41:27  geraint
## Fixed [ 549658 ] awk should be gawk.
## Replaced calls to awk with call to gawk.
##
153
154
155
156
157
158
159

160



161
162
163
164
165
166
167
# Create a string containing the variables
if [ -f "$textfile" ]; then
  # Inform User
  echo Checking $textfile
else
  echo Creating $textfile
  mtt_header $sys $rep $lang > $textfile 

  info=`cut -f1 $infofile | sort`



  i=0;
  for new in $info; do
    let i=$i+1;
    initial_value $i ${default}
    echo $new $value  |\
    gawk '{printf("%s\t= %s; # Default\n",$1,$2)}' >> $textfile
  done







>
|
>
>
>







156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
# Create a string containing the variables
if [ -f "$textfile" ]; then
  # Inform User
  echo Checking $textfile
else
  echo Creating $textfile
  mtt_header $sys $rep $lang > $textfile 
    if [ "${rep}" = "state" ]; then
	info=`cut -f1 $infofile` # No sort
    else
	info=`cut -f1 $infofile | sort` # Sort
    fi
  i=0;
  for new in $info; do
    let i=$i+1;
    initial_value $i ${default}
    echo $new $value  |\
    gawk '{printf("%s\t= %s; # Default\n",$1,$2)}' >> $textfile
  done


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