Overview
Comment:Fixed a sign error - the coeficients of a(s) appear with - signs in
the A_c matrix!
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 5d295cdb21d42d92c7aae264a5a477def17b173cbe27b7ec629de135c69ce0d7
User & Date: gawthrop@users.sourceforge.net on 1998-01-23 09:30:36
Other Links: branch diff | manifest | tags
Context
1998-01-23
09:31:03
Initial revision check-in: b03de71f69 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:30:36
Fixed a sign error - the coeficients of a(s) appear with - signs in
the A_c matrix! check-in: 5d295cdb21 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:23:00
Fixed typing error in (length(j)==1) check-in: f7d79e097c user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/smc2ssk_r from [cfec28a0d7] to [4ba41342a5].

︙︙
10
11
12
13
14
15
16



17
18
19
20
21
22
23

# Copyright (c) P.J.Gawthrop 1998

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



###############################################################


# Inform user
echo Creating $1_ssk.r -- NOTE this is for SISO systems only.

# Remove the old log file








>
>
>








10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26

# Copyright (c) P.J.Gawthrop 1998

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  1998/01/22 13:16:16  peterg
## Initial revision
##
###############################################################


# Inform user
echo Creating $1_ssk.r -- NOTE this is for SISO systems only.

# Remove the old log file
︙︙
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65

alpha_c(6,1) := alpha_c6;
alpha_c(7,1) := alpha_c7;
alpha_c(8,1) := alpha_c8;
alpha_c(9,1) := alpha_c9;


for i := 1:MTTNx do
 MTTk_c(1,i) := alpha_c(i,1) - MTTA_c(1,i);

% Gain in physical form
MTTk := MTTk_c*MTTT_c;


%Create the output file
OUT "$1_ssk.r";








|








54
55
56
57
58
59
60
61
62
63
64
65
66
67
68

alpha_c(6,1) := alpha_c6;
alpha_c(7,1) := alpha_c7;
alpha_c(8,1) := alpha_c8;
alpha_c(9,1) := alpha_c9;


for i := 1:MTTNx do
 MTTk_c(1,i) := alpha_c(i,1) + MTTA_c(1,i);

% Gain in physical form
MTTk := MTTk_c*MTTT_c;


%Create the output file
OUT "$1_ssk.r";
︙︙

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