Overview
| Comment: | Removed debugging lines |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
557481a2c2c106227174fbb62567e885 |
| User & Date: | gawthrop@users.sourceforge.net on 2000-09-15 08:27:07 |
| Other Links: | branch diff | manifest | tags |
Context
|
2000-09-15
| ||
| 08:37:27 | Fixed bug using -sub in cbg view check-in: 8d16ed7b08 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 08:27:07 | Removed debugging lines check-in: 557481a2c2 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 08:09:42 | Removed another debugging line check-in: 91bc924a9b user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_r2m from [1eb6f99853] to [07b6544b16].
| ︙ | ︙ | |||
12 13 14 15 16 17 18 19 20 21 22 23 24 25 | # Copyright (c) P.J.Gawthrop 1991, 1994, 1995, 1996, 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.20 2000/08/30 10:43:17 peterg ## Simplified version using GENTRAN matrix :=: matrix ## lang_matrix is no longer used at all ## ## Revision 1.19 2000/08/28 20:17:59 peterg ## Put in Winfried Neun's bug fix ## -- prevents segmentation violation using optimised gentran when matrix | > > > | 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | # Copyright (c) P.J.Gawthrop 1991, 1994, 1995, 1996, 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.21 2000/08/30 11:43:40 peterg ## -optimise switch added ## ## Revision 1.20 2000/08/30 10:43:17 peterg ## Simplified version using GENTRAN matrix :=: matrix ## lang_matrix is no longer used at all ## ## Revision 1.19 2000/08/28 20:17:59 peterg ## Put in Winfried Neun's bug fix ## -- prevents segmentation violation using optimised gentran when matrix |
| ︙ | ︙ | |||
306 307 308 309 310 311 312 |
lang_header $noglobals $parameters $1 obs m mttx,mttu mttyy > $outfile.pas
fi
Symbols='obs_o obs_h'
fi
for Symbol in $Symbols; do
rm -f $outfile.1
| | | 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 |
lang_header $noglobals $parameters $1 obs m mttx,mttu mttyy > $outfile.pas
fi
Symbols='obs_o obs_h'
fi
for Symbol in $Symbols; do
rm -f $outfile.1
# echo Doing $Symbol
if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "csm" ]||[ "$rep" = "obs" ]; then
case $Symbol in
a)
N=MTTNx; M=MTTNx
;;
b)
|
| ︙ | ︙ | |||
386 387 388 389 390 391 392 | echo "%$Symbol matrix#" >> $outfile.pas cat mtt_zero.m >> $outfile.pas sed "s/mtt_matrix/mtt$Symbol/" < $outfile.1 |\ grep -v '=0\.0;' >> $outfile.pas | | | 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 | echo "%$Symbol matrix#" >> $outfile.pas cat mtt_zero.m >> $outfile.pas sed "s/mtt_matrix/mtt$Symbol/" < $outfile.1 |\ grep -v '=0\.0;' >> $outfile.pas #echo Done $Symbol done fi # Convert from Pascal syntax to Octave syntax |
| ︙ | ︙ |