29char star_bhns_chi_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Star_bhns/star_bhns_chi.C,v 1.3 2014/10/13 08:53:40 j_novak Exp $" ;
58#include "utilitaires.h"
111 cout <<
"chi(" <<
i <<
") = " << chi(
i)
113 <<
" [M_PI]" <<
endl ;
124 if ( chi(
i+1) < 1.e-12 )
160 while (
dp > 1.e-15 ) {
166 while (
diff > 0. && (ppp+mm*
dp) < 2.*
M_PI ) {
178 ppp += (mm - 2) *
dp ;
182 if ( (ppp+2.*
dp) >= 2.*
M_PI ) {
185 <<
" [M_PI]" <<
endl ;
192 while (
dp > 1.e-15 ) {
198 while (
diff > 0. && (ppp-mm*
dp) > 0. ) {
210 ppp -= (mm - 2) *
dp ;
214 if ( (ppp-2.*
dp) < 0. ) {
217 <<
" [M_PI]" <<
endl ;
Time evolution with partial storage (*** under development ***).
virtual double val_r(int l, double xi, double theta, double pphi) const =0
Returns the value of the radial coordinate r for a given in a given domain.
const Mg3d * get_mg() const
Gives the Mg3d on which the mapping is defined.
int get_np(int l) const
Returns the number of points in the azimuthal direction ( ) in domain no. l.
Tensor field of valence 0 (or component of a tensorial field).
const Scalar & dsdr() const
Returns of *this .
double radius_p(double phi)
Radius of the star to the direction of and .
double chi_rp(double radius, double phi)
Sensitive indicator of the mass-shedding to the direction of , , .
double phi_local_min(double phi_ini)
Azimuthal angle when the indicator of the mass-shedding takes its local minimum.
double phi_min()
Azimuthal angle when the indicator of the mass-shedding takes its minimum chi_min.
Map & mp
Mapping associated with the star.
int nzet
Number of domains of *mp occupied by the star.
double ray_pole() const
Coordinate radius at [r_unit].
void set_etat_qcq()
Sets the logical state to ETATQCQ (ordinary state).
double & set(int i)
Read/write of a particular element (index i) (1D case)