Overview
| Comment: | Put ImplicitS sub before Implicit!! |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
9d5e1b9ab083ecb5f2634466e492ec37 |
| User & Date: | gawthrop@users.sourceforge.net on 1998-08-14 10:47:31.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
1998-08-14
| ||
| 10:54:58 | Use sparse computation where possible check-in: 8d13176e72 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 10:47:31 | Put ImplicitS sub before Implicit!! check-in: 9d5e1b9ab0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 10:43:44 | Added ImplicitS - sparse integration check-in: d43c0033dc user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/txt2m
from [c8cc21a6c7]
to [2e1d8be855].
| ︙ | ︙ | |||
11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% Version control history # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% $Id$ # %% $Log$ # %% Revision 1.10 1998/08/11 13:27:51 peterg # %% Lowercase mttLAST etc # %% # %% Revision 1.9 1998/07/30 15:07:17 peterg # %% Added _ to the disallowed chars around t # %% # %% Revision 1.8 1998/07/30 12:52:38 peterg | > > > | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% Version control history # %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% # %% $Id$ # %% $Log$ # %% Revision 1.11 1998/08/14 10:43:44 peterg # %% Added ImplicitS - sparse integration # %% # %% Revision 1.10 1998/08/11 13:27:51 peterg # %% Lowercase mttLAST etc # %% # %% Revision 1.9 1998/07/30 15:07:17 peterg # %% Added _ to the disallowed chars around t # %% # %% Revision 1.8 1998/07/30 12:52:38 peterg |
| ︙ | ︙ | |||
105 106 107 108 109 110 111 |
sub(/^WMIN/, "mttWMIN", LHS);
sub(/^WMAX/, "mttWMAX", LHS);
sub(/^WSTEPS/, "mttWSTEPS", LHS);
LHS = tolower(LHS);
RHS = tolower(RHS);
sub(/["]*euler["]*/, 1, RHS);
sub(/["]*implicitl["]*/, 2, RHS);
| | | | 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 |
sub(/^WMIN/, "mttWMIN", LHS);
sub(/^WMAX/, "mttWMAX", LHS);
sub(/^WSTEPS/, "mttWSTEPS", LHS);
LHS = tolower(LHS);
RHS = tolower(RHS);
sub(/["]*euler["]*/, 1, RHS);
sub(/["]*implicitl["]*/, 2, RHS);
sub(/["]*implicits["]*/, 4, RHS);
sub(/["]*implicit["]*/, 3, RHS);
statement = sprintf("%s= %s",LHS,RHS);
if ( (match(statement,";")==0)&&\
((match(statement,"if ")==0))&&\
((match(statement,"for ")==0)) )
statement = sprintf("%s;", statement);
}
else
|
| ︙ | ︙ |