LORENE
map_et_dalembert.C
1 /*
2  * Copyright (c) 2000-2001 Jerome Novak
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 as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * LORENE is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with LORENE; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19  *
20  */
21 
22 
23 char map_et_dalembert_C[] = "$Header: /cvsroot/Lorene/C++/Source/Map/map_et_dalembert.C,v 1.5 2014/10/13 08:53:03 j_novak Exp $" ;
24 
25 /*
26  * $Id: map_et_dalembert.C,v 1.5 2014/10/13 08:53:03 j_novak Exp $
27  * $Log: map_et_dalembert.C,v $
28  * Revision 1.5 2014/10/13 08:53:03 j_novak
29  * Lorene classes and functions now belong to the namespace Lorene.
30  *
31  * Revision 1.4 2004/03/01 09:57:03 j_novak
32  * the wave equation is solved with Scalars. It now accepts a grid with a
33  * compactified external domain, which the solver ignores and where it copies
34  * the values of the field from one time-step to the next.
35  *
36  * Revision 1.3 2003/06/18 08:45:27 j_novak
37  * In class Mg3d: added the member get_radial, returning only a radial grid
38  * For dAlembert solver: the way the coefficients of the operator are defined has been changed.
39  *
40  * Revision 1.2 2002/01/03 15:30:28 j_novak
41  * Some comments modified.
42  *
43  * Revision 1.1.1.1 2001/11/20 15:19:27 e_gourgoulhon
44  * LORENE
45  *
46  * Revision 1.3 2001/10/16 10:07:52 novak
47  * *** empty log message ***
48  *
49  * Revision 1.2 2001/07/19 14:13:55 novak
50  * new list of arguments for Map_et::dalembert
51  *
52  * Revision 1.1 2000/10/19 15:41:15 novak
53  * Initial revision
54  *
55  *
56  * $Header: /cvsroot/Lorene/C++/Source/Map/map_et_dalembert.C,v 1.5 2014/10/13 08:53:03 j_novak Exp $
57  *
58  */
59 
60 // Header Lorene:
61 #include "tensor.h"
62 #include "param.h"
63 
64 namespace Lorene {
65 Mtbl_cf sol_dalembert(Param&, const Map_af&, const Mtbl_cf&) ;
66 
67 //*****************************************************************************
68 
69 void Map_et::dalembert(Param& , Scalar& fJp1, const Scalar& fJ, const Scalar& fJm1,
70  const Scalar& source) const {
71 
72  assert(source.get_etat() != ETATNONDEF) ;
73  assert(source.get_mp().get_mg() == mg) ;
74  assert(fJ.get_etat() != ETATNONDEF) ;
75  assert(fJ.get_mp().get_mg() == mg) ;
76  assert(fJm1.get_etat() != ETATNONDEF) ;
77  assert(fJm1.get_mp().get_mg() == mg) ;
78  assert(fJp1.get_mp().get_mg() == mg) ;
79 
80  cout << "Map_et_dalembert:" << endl ;
81  cout << "Not implemented" << endl ;
82  cout << fJp1 << fJ << fJm1 << source ;
83  abort() ;
84 
85 
86 }
87 
88 
89 }
virtual void dalembert(Param &par, Scalar &fJp1, const Scalar &fJ, const Scalar &fJm1, const Scalar &source) const
Not yet implemented.
const Mg3d * get_mg() const
Gives the Mg3d on which the mapping is defined.
Definition: map.h:765
const Mg3d * mg
Pointer on the multi-grid Mgd3 on which this is defined
Definition: map.h:676
Parameter storage.
Definition: param.h:125
Tensor field of valence 0 (or component of a tensorial field).
Definition: scalar.h:387
int get_etat() const
Returns the logical state ETATNONDEF (undefined), ETATZERO (null) or ETATQCQ (ordinary).
Definition: scalar.h:554
const Map & get_mp() const
Returns the mapping.
Definition: tensor.h:861
Lorene prototypes.
Definition: app_hor.h:64