# HG changeset patch # User jwe # Date 815286254 0 # Node ID 8dc3bdef46e27103475fd52cb0569f7c7fab17e6 # Parent 3d5663b7fc54e4c1eef182be37c57e2f30c4b874 [project @ 1995-11-02 04:22:59 by jwe] diff -r 3d5663b7fc54 -r 8dc3bdef46e2 scripts/Makefile.in --- a/scripts/Makefile.in Thu Nov 02 01:16:45 1995 +0000 +++ b/scripts/Makefile.in Thu Nov 02 04:24:14 1995 +0000 @@ -25,7 +25,7 @@ DISTFILES = Makefile.in $(SOURCES) configure.in configure \ mkinstalldirs -SUBDIRS = audio control elfun general image linear-algebra \ +SUBDIRS = control elfun general image linear-algebra \ miscellaneous plot polynomial set signal specfun \ special-matrix startup statistics strings time diff -r 3d5663b7fc54 -r 8dc3bdef46e2 src/filter.cc --- a/src/filter.cc Thu Nov 02 01:16:45 1995 +0000 +++ b/src/filter.cc Thu Nov 02 04:24:14 1995 +0000 @@ -1,4 +1,25 @@ // f-filter.cc -*- C++ -*- +/* + +Copyright (C) 1993, 1994, 1995 John W. Eaton + +This file is part of Octave. + +Octave is free software; you can redistribute it and/or modify it +under the terms of the GNU General Public License as published by the +Free Software Foundation; either version 2, or (at your option) any +later version. + +Octave is distributed in the hope that it will be useful, but WITHOUT +ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License +along with Octave; see the file COPYING. If not, write to the Free +Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +*/ // Based on Tony Richardson's filter.m. // @@ -8,11 +29,25 @@ // Rewritten to use templates to handle both real and complex cases by // jwe, Wed Nov 1 19:15:29 1995. -#include "config.h" +#ifdef HAVE_CONFIG_H +#include +#endif + +#include "Array.h" +#include "CColVector.h" +#include "dColVector.h" + #include "defun-dld.h" +#include "error.h" #include "tree-const.h" #include "help.h" +extern Array +filter (Array&, Array&, Array&); + +extern Array +filter (Array&, Array&, Array&); + template Array filter (Array& b, Array& a, Array& x, Array& si) @@ -96,6 +131,12 @@ return y; } +extern Array +filter (Array&, Array&, Array&, Array&); + +extern Array +filter (Array&, Array&, Array&, Array&); + template Array filter (Array& b, Array& a, Array& x) @@ -110,18 +151,6 @@ return filter (b, a, x, si); } -extern Array -filter (Array&, Array&, Array&, Array&); - -extern Array -filter (Array&, Array&, Array&); - -extern Array -filter (Array&, Array&, Array&, Array&); - -extern Array -filter (Array&, Array&, Array&); - DEFUN_DLD_BUILTIN ("filter", Ffilter, Sfilter, 10, "usage: [y [, sf]] = filter (b, a, x [, si])\n\ \n\ @@ -247,7 +276,7 @@ return retval; } - + template Array filter (Array&, Array&, Array&, Array&);