LORENE
ope_elementary.C
1 /*
2  * Copyright (c) 2003 Philippe Grandclement
3  *
4  * This file is part of LORENE.
5  *
6  * LORENE is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2
8  * as published by the Free Software Foundation.
9  *
10  * LORENE is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with LORENE; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18  *
19  */
20 
21 char ope_elementary_C[] = "$Header: /cvsroot/Lorene/C++/Source/Ope_elementary/ope_elementary.C,v 1.2 2014/10/13 08:53:32 j_novak Exp $" ;
22 
23 /*
24  * $Id: ope_elementary.C,v 1.2 2014/10/13 08:53:32 j_novak Exp $
25  * $Log: ope_elementary.C,v $
26  * Revision 1.2 2014/10/13 08:53:32 j_novak
27  * Lorene classes and functions now belong to the namespace Lorene.
28  *
29  * Revision 1.1 2003/12/11 14:48:50 p_grandclement
30  * Addition of ALL (and that is a lot !) the files needed for the general elliptic solver ... UNDER DEVELOPEMENT...
31  *
32  *
33  * $Header: /cvsroot/Lorene/C++/Source/Ope_elementary/ope_elementary.C,v 1.2 2014/10/13 08:53:32 j_novak Exp $
34  *
35  */
36 
37 #include "proto.h"
38 #include "ope_elementary.h"
39 
40 // Standard constructor :
41 namespace Lorene {
42 Ope_elementary::Ope_elementary (int nbr, int base, double alf, double bet) :
43  nr (nbr), base_r (base), alpha(alf), beta(bet),
44  ope_mat(0x0), ope_cl (0x0), non_dege(0x0) {}
45 
46 // Constructor by copy:
48  nr (so.nr), base_r(so.base_r), alpha(so.alpha), beta(so.beta),
49  ope_mat(0x0), ope_cl (0x0), non_dege(0x0) {
50 
51  if (so.ope_mat != 0x0)
52  ope_mat = new Matrice (*so.ope_mat) ;
53 
54  if (so.ope_cl != 0x0)
55  ope_cl = new Matrice (*so.ope_cl) ;
56 
57  if (so.non_dege != 0x0)
58  non_dege = new Matrice (*so.non_dege) ;
59 }
60 
61 // Destructor :
63  if (ope_mat != 0x0)
64  delete ope_mat ;
65 
66  if (ope_cl != 0x0)
67  delete ope_cl ;
68 
69  if (non_dege != 0x0)
70  delete non_dege ;
71 }
72 
73 }
double alpha
Parameter of the associated mapping.
Matrice * ope_cl
Pointer on the banded-matrix of the operator.
double beta
Parameter of the associated mapping.
Lorene prototypes.
Definition: app_hor.h:64
Matrice * ope_mat
Pointer on the matrix representation of the operator.
int base_r
Radial basis of decomposition.
Ope_elementary(int nbr, int baser, double alf, double eta)
Standard constructor, protected because the class is an abstract one.
Matrix handling.
Definition: matrice.h:152
Basic class for elementary elliptic operators.
int nr
Number of radial points.
virtual ~Ope_elementary()
Destructor.
Matrice * non_dege
Pointer on the non-degenerated matrix of the operator.