--- a/examples/fortsub.f	Fri Mar 27 22:35:14 2009 -0700
+++ b/examples/fortsub.f	Sat Mar 28 11:26:27 2009 -0400
@@ -1,23 +1,3 @@
-c Copyright (C) 2007 John W. Eaton
-c 
-c This file is part of Octave.
-c 
-c Octave is free software; you can redistribute it and/or 
-c modify it under the terms of the GNU General Public
-c License as published by the Free Software Foundation;
-c either version 3 of the License, or (at your option) any
-c later version.
-c 
-c Octave is distributed in the hope that it will be useful, 
-c but WITHOUT ANY WARRANTY; without even the implied 
-c warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR 
-c PURPOSE. See the GNU General Public License for more 
-c details.
-c 
-c You should have received a copy of the GNU General Public
-c License along with Octave; see the file COPYING.  If not,
-c see <http://www.gnu.org/licenses/>.
-
       subroutine fortsub (n, a, s)
       implicit none
       character*(*) s