1 #ifndef MEMBER2ANISO_H_
2 #define MEMBER2ANISO_H_
13 const int nlayers = member.size() / 4;
15 trealdata rho1(nlayers, 0);
16 trealdata rho2(nlayers, 0);
17 trealdata zeros(nlayers, 0);
18 trealdata strike(nlayers, 0);
19 trealdata thick(nlayers, 0);
21 transform(member.begin(), member.begin() + nlayers, rho1.begin(),
22 boost::bind(gplib::fopow<double, double>(), 10., _1));
24 copy(member.begin() + nlayers, member.begin() + 2 * nlayers,
27 transform(member.begin() + 2 * nlayers, member.begin() + 3 * nlayers,
28 rho2.begin(), boost::bind(gplib::fopow<double, double>(), 10., _1));
30 transform(rho2.begin(), rho2.end(), rho1.begin(), rho2.begin(),
31 std::multiplies<double>());
33 copy(member.begin() + 3 * nlayers, member.end(), strike.begin());
ublas::vector< double > ttranscribed
void SetRho1(const trealdata &a)
Set the first principal resistivity for each layer in Ohm.m.
void SetThicknesses(const trealdata &thick)
Set the thicknes in km.
void SetRho2(const trealdata &a)
Set the second principal resistivity for each layer in Ohm.m.
Calculate response of a 1D anisotropic model, code is based on Pek and Santos fortran code...
void Member2Aniso(const ttranscribed &member, C1DAnisoMTSynthData &Synth)
This function sets the properties for the 1D MT anisotropic forward calculation, from the variable me...
void SetStrikes(const trealdata &a)
Set the anisotropy strike for each layer in degree.
void SetDips(const trealdata &a)
Set the anisotropy dip for each layer in degree.
void SetSlants(const trealdata &a)
Set the anisotropy slant for each layer in degree.
void SetRho3(const trealdata &a)
Set the first principal resistivity for each layer in Ohm.m.