21char param_elliptic_2d_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Param_elliptic/param_elliptic_2d.C,v 1.3 2014/10/13 08:53:37 j_novak Exp $" ;
52#include "ope_elementary.h"
53#include "param_elliptic.h"
54#include "change_var.h"
61 int dzpuis =
source.get_dzpuis() ;
64 cout <<
"set_poisson_2d only defined for an affine mapping..." <<
endl ;
69 int nz =
get_mp().get_mg()->get_nzone() ;
76 for (
int l=0 ;
l<nz ;
l++) {
78 nr =
get_mp().get_mg()->get_nr(
l) ;
79 alpha = get_alpha (
l) ;
82 for (
int k=0 ;
k<
get_mp().get_mg()->get_np(
l)+1 ;
k++)
83 for (
int j=0 ;
j<
get_mp().get_mg()->get_nt(
l) ;
j++) {
102 int dzpuis =
source.get_dzpuis() ;
106 cout <<
"set_helmholtz_minus_2d only defined for an affine mapping..." <<
endl ;
111 int nz =
get_mp().get_mg()->get_nzone() ;
119 for (
int l=0 ;
l<nz ;
l++) {
121 nr =
get_mp().get_mg()->get_nr(
l) ;
122 alpha = get_alpha (
l) ;
123 beta = get_beta (
l) ;
125 for (
int k=0 ;
k<
get_mp().get_mg()->get_np(
l)+1 ;
k++)
126 for (
int j=0 ;
j<
get_mp().get_mg()->get_nt(
l) ;
j++) {
130 source.get_spectral_va().base.give_quant_numbers
Time evolution with partial storage (*** under development ***).
Class for the operator of the Helmholtz equation in 2D.
Class for the operator of the Poisson equation in 2D.
const Map_radial & get_mp() const
Returns the mapping.
Ope_elementary ** operateurs
Array on the elementary operators.
void set_poisson_2d(const Scalar &, bool indic=false)
Set everything to do a 2d-Poisson, with or without l=0 (not put by default...)
int type_map
Type of mapping either MAP_AFF or MAP_LOG.
void set_helmholtz_minus_2d(int zone, double mas, const Scalar &)
Set the 2D Helmholtz operator (with minus sign)
Tensor field of valence 0 (or component of a tensorial field).