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} {} __printInputConnect (@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 __printInputConnect(fid,net)
28 if isfield(net,"inputConnect")
29 # net.inputConnect can be a matrix..!
30 # check if it's a matrix
31 if isscalar(net.inputConnect)
32 error("unsure if this is possible..")
33 elseif isnumeric(net.inputConnect)
34 if ismatrix(net.inputConnect)
35 if issquare(net.inputConnect)
36 # nothing prgrammed till now
37 elseif isvector(net.inputConnect)
38 # insert enough spaces to put ":" to position 20
39 # insert 2 spaces for distance between ":" and "%"
40 # print bracket for open
41 fprintf(fid," inputConnect: [");
42 [nRows nColumns] = size(net.inputConnect);
45 fprintf(fid,"%d",net.inputConnect(i*k));
48 #print ; for newline in matrix
53 fprintf(fid,"] not yet used item\n");