# HG changeset patch # User jwe # Date 754884015 0 # Node ID 16a24e76d6e0287912c41e0200e03506eee5f438 # Parent d66cc97f77a97d510c87cc087f12a66d661286a8 [project @ 1993-12-03 02:00:15 by jwe] diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/abcddim.m --- a/scripts/control/abcddim.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/abcddim.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [n, m, p] = abcddim (a, b, c, d) # Usage: [n, m, p] = abcddim (a, b, c, d) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/are.m --- a/scripts/control/are.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/are.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function x = are (a, b, c, opt) # Usage: x = are (a, b, c {,opt}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/c2d.m --- a/scripts/control/c2d.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/c2d.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [Ad, Bd] = c2d (Ac, Bc, T) # Usage: [Ad, Bd] = c2d (Ac, Bc, T) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/dare.m --- a/scripts/control/dare.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/dare.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function x = dare (a, b, c, r, opt) # Usage: x = dare (a, b, c, r {,opt}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/dgram.m --- a/scripts/control/dgram.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/dgram.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function gramian = dgram (A, B) # Usage: gramian = dgram (A, B) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/dlqe.m --- a/scripts/control/dlqe.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/dlqe.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [l, m, p, e] = dlqe (a, g, c, sigw, sigv, zz) # Usage: [l, m, p, e] = dlqe (A, G, C, SigW, SigV {,Z}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/dlqr.m --- a/scripts/control/dlqr.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/dlqr.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [k, p, e] = dlqr (a, b, q, r, zz) # Usage: [k, p, e] = dlqr (A, B, Q, R {,Z}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/dlyap.m --- a/scripts/control/dlyap.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/dlyap.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function x = dlyap (a, b) # Usage: x = dlyap (a, b) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/is_controllable.m --- a/scripts/control/is_controllable.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/is_controllable.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_controllable (a, b, tol) # Usage: is_controllable (a, b {,tol}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/is_observable.m --- a/scripts/control/is_observable.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/is_observable.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_observable (a,c,tol) # usage: is_observable (a, c {,tol}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/lqe.m --- a/scripts/control/lqe.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/lqe.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [k, p, e] = lqe (a, g, c, sigw, sigv, zz) # Usage: [k, p, e] = lqe (A, G, C, SigW, SigV {,Z}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/lqr.m --- a/scripts/control/lqr.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/lqr.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [k, p, e] = lqr (a, b, q, r, zz) # Usage: [k, p, e] = lqr (A, B, Q, R {,Z}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/lyap.m --- a/scripts/control/lyap.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/lyap.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function x = lyap (a, b, c) # Usage: x = lyap (a, b {,c}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/control/tzero.m --- a/scripts/control/tzero.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/control/tzero.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function zr = tzero (a, b, c, d, bal) # Usage: zr = tzero (a, b, c, d, bal) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/columns.m --- a/scripts/general/columns.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/columns.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function nc = columns (x) # usage: columns (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/fliplr.m --- a/scripts/general/fliplr.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/fliplr.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function y = fliplr (x) # usage: fliplr (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/flipud.m --- a/scripts/general/flipud.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/flipud.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function y = flipud (x) # usage: flipud (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/int2str.m --- a/scripts/general/int2str.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/int2str.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = int2str (x) # usage: int2str (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/is_matrix.m --- a/scripts/general/is_matrix.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/is_matrix.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_matrix (x) # usage: is_matrix (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/is_scalar.m --- a/scripts/general/is_scalar.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/is_scalar.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_scalar (x) # usage: is_scalar (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/is_square.m --- a/scripts/general/is_square.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/is_square.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_square (x) # usage: is_square (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/is_symmetric.m --- a/scripts/general/is_symmetric.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/is_symmetric.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_symmetric (x,tol) # Usage: is_symmetric (x {,tol}) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/is_vector.m --- a/scripts/general/is_vector.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/is_vector.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = is_vector (x) # usage: is_vector (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/isempty.m --- a/scripts/general/isempty.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/isempty.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = isempty (var) # usage: isempty (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/length.m --- a/scripts/general/length.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/length.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function len = length (x) # usage: length (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/linspace.m --- a/scripts/general/linspace.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/linspace.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = linspace (x1, x2, n) # usage: linspace (x1, x2, n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/logspace.m --- a/scripts/general/logspace.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/logspace.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = logspace (x1, x2, n) # usage: logspace (x1, x2, n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/num2str.m --- a/scripts/general/num2str.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/num2str.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = num2str (x) # usage: num2str (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/perror.m --- a/scripts/general/perror.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/perror.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function perror (name, err) # usage: perror (name, err) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/rem.m --- a/scripts/general/rem.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/rem.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = rem (x, y) # usage: rem (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/reshape.m --- a/scripts/general/reshape.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/reshape.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = reshape (a, m, n) # usage: reshape (a, m, n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/rot90.m --- a/scripts/general/rot90.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/rot90.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function y = rot90 (x, k) # usage: rot90 (x, k) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/rows.m --- a/scripts/general/rows.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/rows.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function nr = rows (x) # usage: rows (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/tril.m --- a/scripts/general/tril.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/tril.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = tril (x, k) # usage: triu (x, k) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/general/triu.m --- a/scripts/general/triu.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/general/triu.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = triu (x, k) # usage: triu (x, k) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/linear-algebra/cond.m --- a/scripts/linear-algebra/cond.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/linear-algebra/cond.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = cond (a) # usage: cond (a) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/linear-algebra/kron.m --- a/scripts/linear-algebra/kron.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/linear-algebra/kron.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function x = kron (a, b) # Usage: x = kron (a, b) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/linear-algebra/norm.m --- a/scripts/linear-algebra/norm.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/linear-algebra/norm.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = norm (x, p) # usage: norm (x, p) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/linear-algebra/qzhess.m --- a/scripts/linear-algebra/qzhess.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/linear-algebra/qzhess.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [aa, bb, q, z] = qzhess (a, b) # Usage: [aa, bb, q, z] = qzhess (a, b) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/linear-algebra/rank.m --- a/scripts/linear-algebra/rank.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/linear-algebra/rank.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = rank (A, tol) # usage: rand (a, tol) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/linear-algebra/trace.m --- a/scripts/linear-algebra/trace.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/linear-algebra/trace.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function y = trace (x) # usage: trace (x) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/miscellaneous/list_primes.m --- a/scripts/miscellaneous/list_primes.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/miscellaneous/list_primes.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = list_primes (n) # usage: list_primes (n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/miscellaneous/menu.m --- a/scripts/miscellaneous/menu.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/miscellaneous/menu.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function s = menu (t, ...) # usage: menu (title, opt1, ...) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/miscellaneous/texas_lotto.m --- a/scripts/miscellaneous/texas_lotto.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/miscellaneous/texas_lotto.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function picks = texas_lotto () # usage: texas_lotto diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plr__.m --- a/scripts/plot/__plr__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plr__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function polar_int (theta, rho) if (nargin == 1) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plt2mm__.m --- a/scripts/plot/__plt2mm__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plt2mm__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot_2_m_m (x, y) if (nargin != 2) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plt2mv__.m --- a/scripts/plot/__plt2mv__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plt2mv__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot_2_m_v (x, y) if (nargin != 2) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plt2ss__.m --- a/scripts/plot/__plt2ss__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plt2ss__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot_2_s_s (x, y) if (nargin != 2) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plt2vm__.m --- a/scripts/plot/__plt2vm__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plt2vm__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot_2_v_m (x, y) if (nargin != 2) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plt2vv__.m --- a/scripts/plot/__plt2vv__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plt2vv__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot_2_v_v (x, y) if (nargin != 2) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/__plt__.m --- a/scripts/plot/__plt__.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/__plt__.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot_int (x1, x2) if (nargin == 1) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/bar.m --- a/scripts/plot/bar.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/bar.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [xb, yb] = bar (x, y) # usage: [xb, yb] = bar (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/contour.m --- a/scripts/plot/contour.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/contour.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function contour (z, n, x, y) # usage: contour (z, n, x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/grid.m --- a/scripts/plot/grid.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/grid.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function grid (x) # usage: grid ("on" | "off") diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/loglog.m --- a/scripts/plot/loglog.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/loglog.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function loglog (x1, x2) # usage: loglog (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/mesh.m --- a/scripts/plot/mesh.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/mesh.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function mesh (x, y, z) # usage: mesh (x, y, z) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/meshdom.m --- a/scripts/plot/meshdom.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/meshdom.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [xx, yy] = meshdom (x, y) # usage: [xx, yy] = meshdom (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/plot.m --- a/scripts/plot/plot.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/plot.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function plot (x1, x2) # usage: plot (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/polar.m --- a/scripts/plot/polar.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/polar.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function polar (x1, x2) # usage: polar (theta, rho) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/semilogx.m --- a/scripts/plot/semilogx.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/semilogx.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function semilogx (x1, x2) # usage: semilogx (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/semilogy.m --- a/scripts/plot/semilogy.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/semilogy.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function semilogy (x1, x2) # usage: semilogy (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/sombrero.m --- a/scripts/plot/sombrero.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/sombrero.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function sombrero (n) # usage: sombrero (n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/stairs.m --- a/scripts/plot/stairs.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/stairs.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function [xs, ys] = stairs (x, y) # usage: [xs, ys] = stairs (x, y) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/title.m --- a/scripts/plot/title.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/title.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function title (text) # usage: title (text) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/xlabel.m --- a/scripts/plot/xlabel.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/xlabel.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function xlabel (text) # usage: xlabel (text) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/plot/ylabel.m --- a/scripts/plot/ylabel.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/plot/ylabel.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function ylabel (text) # usage: ylabel (text) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/special-matrix/hadamard.m --- a/scripts/special-matrix/hadamard.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/special-matrix/hadamard.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = hadamard (k) # usage: hadamard (k) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/special-matrix/hankel.m --- a/scripts/special-matrix/hankel.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/special-matrix/hankel.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = hankel (c, r) # usage: hankel (c, r) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/special-matrix/hilb.m --- a/scripts/special-matrix/hilb.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/special-matrix/hilb.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = hilb (n) # usage: hilb (n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/special-matrix/invhilb.m --- a/scripts/special-matrix/invhilb.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/special-matrix/invhilb.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = invhilb (n) # usage: invhilb (n) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/special-matrix/toeplitz.m --- a/scripts/special-matrix/toeplitz.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/special-matrix/toeplitz.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = toeplitz (c, r) # usage: toeplitz (c, r) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/special-matrix/vander.m --- a/scripts/special-matrix/vander.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/special-matrix/vander.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = vander (c) # usage: vander (c) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/statistics/mean.m --- a/scripts/statistics/mean.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/statistics/mean.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = mean (a) # usage: mean (a) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/statistics/median.m --- a/scripts/statistics/median.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/statistics/median.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = median (a) # usage: median (a) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/statistics/std.m --- a/scripts/statistics/std.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/statistics/std.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function retval = std (a) # usage: std (a) diff -r d66cc97f77a9 -r 16a24e76d6e0 scripts/strings/strcmp.m --- a/scripts/strings/strcmp.m Fri Dec 03 01:30:19 1993 +0000 +++ b/scripts/strings/strcmp.m Fri Dec 03 02:00:15 1993 +0000 @@ -1,3 +1,21 @@ +# Copyright (C) 1993 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, 675 Mass Ave, Cambridge, MA 02139, USA. + function status = strcmp (s1, s2) # usage: strcmp (s1, s2)