1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
+
+
+
|
function makedef(structure,deffilenum);
## %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
## %% Version control history
## %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
## %% $Id$
## %% $Log$
## %% Revision 1.7 2000/10/20 13:16:29 peterg
## %% Reformated
## %%
## %% Revision 1.6 1996/12/07 18:21:57 peterg
## %% Now uses fopen + file number
## %%
## %% Revision 1.5 1996/11/09 21:05:44 peterg
## %% Only generates MTTIm when at least 2 states!
## %%
## %% Revision 1.4 1996/08/30 19:42:36 peter
|
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
-
-
-
+
|
if outputs>0
fprintf(deffilenum, 'matrix MTTy(%1.0f,1);\n', outputs);
endif
if zero_outputs>0
fprintf(deffilenum, 'matrix MTTyz(%1.0f,1);\n', zero_outputs);
fprintf(deffilenum, 'matrix MTTui(%1.0f,1);\n', zero_outputs);
endif
|