27char et_rot_extr_curv_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Etoile/et_rot_extr_curv.C,v 1.2 2014/10/13 08:52:57 j_novak Exp $" ;
64 if ( (
mp.
get_mg())->get_np(0) == 1) {
79 dnpdr.
va = (dnpdr.
va).mult_st() ;
83 dnpdt.
va = (dnpdt.
va).mult_ct() ;
86 Cmp tmp = dnpdr + dnpdt ;
98 dnpdr =
nphi().dsdr() ;
99 dnpdt =
nphi().srdsdt() ;
102 dnpdr.
va = (dnpdr.
va).mult_ct() ;
106 dnpdt.
va = (dnpdt.
va).mult_st() ;
109 tmp = dnpdr - dnpdt ;
151 for (
int i=0; i<3; i++) {
152 for (
int j=i; j<3; j++) {
153 tkij.
set(i, j) = dn(i, j) + dn(j, i) ;
155 tkij.
set(i, i) -= double(2) /double(3) * divn() ;
162 assert( divn.
get_etat() == ETATZERO ) ;
178 for (
int i=0; i<3; i++) {
179 for (
int j=0; j<3; j++) {
Component of a tensorial field *** DEPRECATED : use class Scalar instead ***.
void mult_rsint()
Multiplication by .
int get_etat() const
Returns the logical state.
Valeur va
The numerical value of the Cmp
Tenseur nphi
Metric coefficient .
void extrinsic_curvature()
Computes tkij and ak_car from shift , nnn and b_car .
Tenseur_sym tkij
Tensor related to the extrinsic curvature tensor by .
Tenseur b_car
Square of the metric factor B.
Tenseur nnn
Total lapse function.
Map & mp
Mapping associated with the star.
Tenseur shift
Total shift vector.
Base class for pure radial mappings.
const Mg3d * get_mg() const
Gives the Mg3d on which the mapping is defined.
Tensor handling *** DEPRECATED : use class Tensor instead ***.
Cmp & set()
Read/write for a scalar (see also operator=(const Cmp&) ).
void set_etat_qcq()
Sets the logical state to ETATQCQ (ordinary state).
const Tenseur & gradient() const
Returns the gradient of *this (Cartesian coordinates)
void set_etat_zero()
Sets the logical state to ETATZERO (zero state).
int get_etat() const
Returns the logical state.
Tenseur contract(const Tenseur &, int id1, int id2)
Self contraction of two indices of a Tenseur .