1 ## Copyright (C) 2006 Michel D. Schmid <michaelschmid@users.sourceforge.net>
4 ## This program is free software; you can redistribute it and/or modify it
5 ## under the terms of the GNU General Public License as published by
6 ## the Free Software Foundation; either version 2, or (at your option)
9 ## This program is distributed in the hope that it will be useful, but
10 ## WITHOUT ANY WARRANTY; without even the implied warranty of
11 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 ## General Public License for more details.
14 ## You should have received a copy of the GNU General Public License
15 ## along with this program; see the file COPYING. If not, see
16 ## <http://www.gnu.org/licenses/>.
19 ## @deftypefn {Function File} {} __printLayerConnect (@var{fid})
20 ## @code{printMLPHeader} saves the header of a neural network structure
21 ## to a *.txt file with identification @code{fid}.
24 ## Author: Michel D. Schmid
26 function __printLayerConnect(fid,net)
28 if isfield(net,"layerConnect")
29 # net.layerConnect can be a matrix..!
30 # check if it's a matrix
31 if isscalar(net.layerConnect)
32 error("unsure if this is possible..")
33 elseif isnumeric(net.layerConnect)
34 if ismatrix(net.layerConnect)
35 if issquare(net.layerConnect)
36 # insert enough spaces to put ":" to position 20
37 # insert 2 spaces for distance between ":" and "%"
38 fprintf(fid," layerConnect: [");
39 [nRows nColumns] = size(net.layerConnect);
43 fprintf(fid,"%d ",net.layerConnect(i*k));
45 fprintf(fid,"%d",net.layerConnect(i*k));
49 #print ; for newline in matrix
54 fprintf(fid,"] not yet used item\n");
55 elseif isvector(net.layerConnect)
56 # insert enough spaces to put ":" to position 20
57 # insert 2 spaces for distance between ":" and "%"
58 # print bracket for open
59 fprintf(fid," layerConnect: [");
60 [nRows nColumns] = size(net.layerConnect);
63 fprintf(fid,"%d",net.layerConnect(i*k));
66 #print ; for newline in matrix
71 fprintf(fid,"] not yet used item\n");
76 fprintf(fid," ERROR...");