1## Copyright (C) 2006 Michel D. Schmid <michaelschmid@users.sourceforge.net> 2## 3## 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) 7## any later version. 8## 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. 13## 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/>. 17 18## -*- texinfo -*- 19## @deftypefn {Function File} {} __printNumInputs (@var{fid}) 20## @code{printMLPHeader} saves the header of a neural network structure 21## to a *.txt file with identification @code{fid}. 22## @end deftypefn 23 24## Author: Michel D. Schmid 25 26 27function __printNumInputs(fid,net) 28 29 ## now check the structure fields.. 30 cellNetFields = fieldnames(net); 31 # search for numInputs 32 if isfield(net,"numInputs") 33 # test on scalar 34 if isscalar(net.numInputs) 35 # insert enough spaces to put ":" to position 20 36 # insert 2 spaces for distance between ":" and "%" 37 fprintf(fid," numInputs: %d\n",net.numInputs); 38 # net.numInputs must be an integer... till now, 11-01-2006 39 else 40 error("numInputs must be a scalar value!"); 41 endif 42 endif 43 44endfunction