Mercurial > hg > octave-nkf
annotate liboctave/MArray-d.cc @ 12107:1fc9fd052f0c release-3-2-x
fix typo in expm
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Wed, 25 Nov 2009 12:05:03 +0100 |
| parents | eb63fbe60fab |
| children | 4c0cdbe0acca |
| rev | line source |
|---|---|
| 1212 | 1 /* |
| 2 | |
| 8920 | 3 Copyright (C) 1995, 1996, 1997, 2000, 2003, 2005, 2007, 2008 John W. Eaton |
| 1212 | 4 |
| 5 This file is part of Octave. | |
| 6 | |
| 7 Octave is free software; you can redistribute it and/or modify it | |
| 8 under the terms of the GNU General Public License as published by the | |
| 7016 | 9 Free Software Foundation; either version 3 of the License, or (at your |
| 10 option) any later version. | |
| 1212 | 11 |
| 12 Octave is distributed in the hope that it will be useful, but WITHOUT | |
| 13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 15 for more details. | |
| 16 | |
| 17 You should have received a copy of the GNU General Public License | |
| 7016 | 18 along with Octave; see the file COPYING. If not, see |
| 19 <http://www.gnu.org/licenses/>. | |
| 1212 | 20 |
| 21 */ | |
| 22 | |
| 2006 | 23 #ifdef HAVE_CONFIG_H |
| 24 #include <config.h> | |
| 25 #endif | |
| 26 | |
| 1212 | 27 // Instantiate MArrays of double values. |
| 28 | |
| 29 #include "MArray.h" | |
| 30 #include "MArray.cc" | |
|
8319
c374691576f6
Fix for MSVC compilation
Michael Goffioul <michael.goffioul@gmail.com>
parents:
8303
diff
changeset
|
31 template <> OCTAVE_API double MArray<double>::norm (double p) const; |
|
8303
b11c31849b44
improve norm computation capabilities
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
32 #include "dColVector.h" |
|
b11c31849b44
improve norm computation capabilities
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
33 #include "oct-norm.h" |
| 1212 | 34 |
| 6508 | 35 template <> |
| 6708 | 36 OCTAVE_API double |
| 6508 | 37 MArray<double>::norm (double p) const |
| 38 { | |
|
8303
b11c31849b44
improve norm computation capabilities
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
39 return xnorm (ColumnVector (*this), p); |
| 6508 | 40 } |
| 41 | |
| 6708 | 42 template class OCTAVE_API MArray<double>; |
| 1212 | 43 |
| 6708 | 44 INSTANTIATE_MARRAY_FRIENDS (double, OCTAVE_API) |
| 1212 | 45 |
| 1989 | 46 #include "MArray2.h" |
| 47 #include "MArray2.cc" | |
| 1212 | 48 |
| 6708 | 49 template class OCTAVE_API MArray2<double>; |
| 1212 | 50 |
| 6708 | 51 INSTANTIATE_MARRAY2_FRIENDS (double, OCTAVE_API) |
| 1212 | 52 |
| 4513 | 53 #include "MArrayN.h" |
| 54 #include "MArrayN.cc" | |
| 55 | |
| 6708 | 56 template class OCTAVE_API MArrayN<double>; |
| 4513 | 57 |
| 6708 | 58 INSTANTIATE_MARRAYN_FRIENDS (double, OCTAVE_API) |
| 4513 | 59 |
| 1989 | 60 #include "MDiagArray2.h" |
| 61 #include "MDiagArray2.cc" | |
| 1212 | 62 |
| 6708 | 63 template class OCTAVE_API MDiagArray2<double>; |
| 1212 | 64 |
| 6708 | 65 INSTANTIATE_MDIAGARRAY2_FRIENDS (double, OCTAVE_API) |
| 1212 | 66 |
| 67 /* | |
| 68 ;;; Local Variables: *** | |
| 69 ;;; mode: C++ *** | |
| 70 ;;; End: *** | |
| 71 */ |