Overview
Comment: | *** empty log message *** |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
6641c86262bb356700650db7c7d8a53e |
User & Date: | gawthrop@users.sourceforge.net on 1996-08-20 08:21:24 |
Other Links: | branch diff | manifest | tags |
Context
1996-08-20
| ||
08:24:53 | Now with version control. check-in: 1aaaba3c09 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
08:21:24 | *** empty log message *** check-in: 6641c86262 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
1996-08-19
| ||
18:38:43 | Read in the numerical params etc ... check-in: 83c54712bb user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/sympar2numpar_r2m from [187b2808c4] to [b566412e50].
︙ | ︙ | |||
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 | # Copyright (c) P.J.Gawthrop 1996 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.4 1996/08/15 12:46:59 peter ## Removed a spuriuos echo. ## ## Revision 1.3 1996/08/12 20:20:59 peter ## Explicit parameters via out put list. ## Parameter conversion stuff deleted. ## ## Revision 1.2 1996/08/11 10:41:52 peter ## Fixed various bugs. ## ## Revision 1.1 1996/08/11 08:48:07 peter ## Initial revision ## ############################################################### # Inform user echo Creating $1_numpar.m # Remove the old log file rm -f mknumpar.log # Use reduce to accomplish the transformation reduce >mknumpar.log << EOF %Set up the number of argument variables to zero in case the user has forgotten MTTNVar := 0; | > > > > | 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 | # Copyright (c) P.J.Gawthrop 1996 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.5 1996/08/16 14:27:25 peter ## Make a dummy function when no parameters (MTTNVar=0). ## ## Revision 1.4 1996/08/15 12:46:59 peter ## Removed a spuriuos echo. ## ## Revision 1.3 1996/08/12 20:20:59 peter ## Explicit parameters via out put list. ## Parameter conversion stuff deleted. ## ## Revision 1.2 1996/08/11 10:41:52 peter ## Fixed various bugs. ## ## Revision 1.1 1996/08/11 08:48:07 peter ## Initial revision ## ############################################################### # Inform user echo Creating $1_numpar.m # Remove the old log file rm -f mknumpar.log # Use reduce to accomplish the transformation reduce >mknumpar.log << EOF %Set up the number of argument variables to zero in case the user has forgotten MTTNVar := 0; |
︙ | ︙ | |||
59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 | if MTTNVar=0 THEN write "function foo=$1_numpar;;"; write "% function [par_list] = $1_numpar;"; write "% Created by MTT"; IF MTTNvar>0 THEN BEGIN FOR i := 1:MTTNvar DO BEGIN write MTTVar(i,1), " = 1; % Default value"; END; END; if MTTNVar=0 THEN write "foo=0"; SHUT "$1_numpar.m"; | > > > > > > > > > > > > > > > | 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 | if MTTNVar=0 THEN write "function foo=$1_numpar;;"; write "% function [par_list] = $1_numpar;"; write "% Created by MTT"; %% Write RCS stuff IF MTTNvar>0 THEN BEGIN FOR i := 1:MTTNvar DO BEGIN write MTTVar(i,1), " = 1; % Default value"; END; END; if MTTNVar=0 THEN write "foo=0"; SHUT "$1_numpar.m"; |