20 #include "headcpp.hpp"
22 #include "spheric.hpp"
24 #include "tensor_impl.hpp"
37 if ((j==0) && (mquant!=0))
41 if ((j==
nbr_coefs(1)-1) || ((j==0) && (mquant!=0)))
45 if (((j==1) && (mquant>1)) ||(j==0) || (j==
nbr_coefs(1)-1))
49 if (((j==0) && (mquant>1)) || (j==
nbr_coefs(1)-1))
53 cerr <<
"Unknow theta basis in Domain_compact::nbr_conditions_val_boundary_mquant" << endl ;
66 int kmin = 2*mlim + 2 ;
78 if ((j==0) && (k>=kmin))
82 if ((j==
nbr_coefs(1)-1) || ((j==0) && (k>=kmin)))
86 if (((j==1)&&(k>=kmin+2)) || (j==0) || (j==
nbr_coefs(1)-1))
90 if (((j==0)&&(k>=kmin+2))||(j==
nbr_coefs(1)-1))
94 cerr <<
"Unknow theta basis in Domain_compact::nbr_conditions_val_boundary" << endl ;
107 if ((bound!=INNER_BC) && (bound!=OUTER_BC)) {
108 cerr <<
"Unknown boundary in Domain_compact::nbr_conditions_boundary" << endl ;
112 int size = (n_cmp==-1) ? tt.
get_n_comp() : n_cmp ;
136 else for (
int i=0 ; i<n_cmp ; i++) {
137 if ((*p_cmp[i])(0)==1)
139 if ((*p_cmp[i])(0)==2)
141 if ((*p_cmp[i])(0)==3)
153 else for (
int i=0 ; i<n_cmp ; i++) {
154 if ((*p_cmp[i])(0)==1)
156 if ((*p_cmp[i])(0)==2)
158 if ((*p_cmp[i])(0)==3)
164 cerr <<
"Unknown type of vector Domain_compact::nbr_conditions_boundary" << endl ;
181 else for (
int i=0 ; i<n_cmp ; i++) {
182 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==1))
184 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==2))
186 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==3))
188 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==2))
190 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==3))
192 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==3))
210 else for (
int i=0 ; i<n_cmp ; i++) {
211 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==1))
213 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==2))
215 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==3))
217 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==1))
219 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==2))
221 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==3))
223 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==1))
225 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==2))
227 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==3))
242 else for (
int i=0 ; i<n_cmp ; i++) {
243 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==1))
245 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==2))
247 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==3))
249 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==2))
251 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==3))
253 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==3))
272 else for (
int i=0 ; i<n_cmp ; i++) {
273 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==1))
275 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==2))
277 if (((*p_cmp[i])(0)==1) && ((*p_cmp[i])(1)==3))
279 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==1))
281 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==2))
283 if (((*p_cmp[i])(0)==2) && ((*p_cmp[i])(1)==3))
285 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==1))
287 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==2))
289 if (((*p_cmp[i])(0)==3) && ((*p_cmp[i])(1)==3))
295 cerr <<
"Unknown type of 2-tensor Domain_compact::nbr_conditions_boundary" << endl ;
301 cerr <<
"Valence " << val <<
" not implemented in Domain_compact::nbr_conditions_boundary" << endl ;
reference set(const Index &pos)
Read/write of an element.
Bases_container bases_1d
Arrays containing the various basis of decomposition.
int get_basis(int nd) const
Read only the basis in a given domain.
int nbr_conditions_val_domain_boundary(const Val_domain &eq, int mlim) const
Computes number of discretized equations associated with a given equation on a boundary.
int nbr_conditions_val_domain_boundary_mquant(const Val_domain &eq, int mquant) const
Computes number of discretized equations associated with a given equation on a boundary.
virtual Array< int > nbr_conditions_boundary(const Tensor &, int, int, int n_cmp=-1, Array< int > **p_cmp=0x0) const
Computes number of discretized equations associated with a given tensorial equation on a boundary.
Dim_array nbr_coefs
Number of coefficients.
int get_m_order() const
Returns .
int get_m_quant() const
Returns .
bool is_m_order_affected() const
Checks whether the additional parameter order is affected (not very used).
const Param_tensor & get_parameters() const
Returns a pointer on the possible additional parameter.
const Base_tensor & get_basis() const
Returns the vectorial basis (triad) on which the components are defined.
int get_n_comp() const
Returns the number of stored components.
int get_valence() const
Returns the valence.
bool is_m_quant_affected() const
Checks whether the additional parameter is affected (used for boson stars for instance).
Class for storing the basis of decompositions of a field and its values on both the configuration and...
const Base_spectral & get_base() const
Returns the basis of decomposition.