mirror of
https://github.com/triqs/dft_tools
synced 2024-12-27 06:43:40 +01:00
39edb2f846
- Make more general constructors for the gf.
gf( mesh, target_shape_t)
- remove the old make_gf for the basic gf.
- 2 var non generic gf removed.
- clean evaluator
- add tensor_valued
- add a simple vertex test.
- clean specialisation
- Fix bug introduced in 1906dc3
- forgot to resize the gf in new version of operator =
- Fix make_singularity in gf.hpp
- clean resize in operator =
- update h5 read/write for block gf
- changed a bit the general trait to save *all* the gf.
- allows a more general specialization, then a correct for blocks
- NOT FINISHED : need to save the block indice for python.
How to reread ?
Currently it read the blocks names and reconstitute the mesh from it.
Is it sufficient ?
- clean block constructors
- block constructors simplest possible : an int for the number of blocks
- rest in free factories.
- fixed the generic constructor from GfType for the regular type :
only enable iif GfType is ImmutableGreenFunction
- multivar. fix linear index in C, and h5 format
- linear index now correctly flatten in C mode
(was in fortran mode), using a simple reverse of the tuple in the folding.
- fix the h5 read write of the multivar fonctions
in order to write an array on dimension # variables + dim_target
i.e. without flattening the indices of the meshes.
Easier for later data analysis, e.g. in Python.
- merge matrix/tensor_valued. improve factories
- matrix_valued now = tensor_valued<2>
(simplifies generic code for h5).
- factories_one_var -> factories : this is the generic case ...
only a few specialization, code is simpler.
- clef expression call with rvalue for *this
- generalize matrix_proxy to tensor and clean
- clean exception catch in tests
- exception catching catch in need in test
because the silly OS X does not print anything, just "exception occurred".
Very convenient for the developer...
- BUT, one MUST add return 1, or the make test will *pass* !!
- --> systematically replace the catch by a macro TRIQS_CATCH_AND_ABORT
which return a non zero error code.
- exception : curry_and_fourier which does not work at this stage
(mesh incompatible).
- gf: clean draft of gf 2 times
- comment the python interface for the moment.
- rm useless tests
66 lines
1.6 KiB
C++
66 lines
1.6 KiB
C++
#define TRIQS_ARRAYS_ENFORCE_BOUNDCHECK
|
|
#include <triqs/gfs.hpp>
|
|
using namespace triqs::gfs;
|
|
using namespace triqs::arrays;
|
|
#define TEST(X) std::cout << BOOST_PP_STRINGIZE((X)) << " ---> "<< (X) <<std::endl<<std::endl;
|
|
|
|
int main() {
|
|
|
|
try {
|
|
|
|
auto m = gf_mesh<retime>{0,10,99,full_bins};
|
|
auto G = gf<cartesian_product<retime,retime>> { {m,m}, {2,2}};
|
|
auto G2 = G;
|
|
|
|
auto gg = gf<retime> { {m}, {2,2}};
|
|
|
|
triqs::clef::placeholder<0> t_;
|
|
triqs::clef::placeholder<1> tp_;
|
|
|
|
array<double,2> A(2,2);
|
|
A(t_,tp_) << t_ - 3*tp_;
|
|
std::cout <<A << std::endl ;
|
|
|
|
std::cout << G.data().shape() << 2*G(0,0)<<std::endl;
|
|
|
|
auto xx =eval ( G(t_,tp_), t_=2, tp_=1.2);
|
|
//xx =0;
|
|
std::cout << eval ( gg(t_), t_=2)<< std::endl ;
|
|
|
|
double beta = 1;
|
|
double wmin=0.;
|
|
double wmax=1.0;
|
|
int n_im_freq=100;
|
|
|
|
auto G_w_wn2 = gf<cartesian_product<imfreq,imfreq>>( {gf_mesh<imfreq>(beta, Fermion, n_im_freq), gf_mesh<imfreq>(beta, Fermion, n_im_freq)}, {2,2});
|
|
|
|
auto zz = G_w_wn2(t_,tp_);
|
|
//std::cout << std::get<0>(zz.childs).data() << std::endl ;
|
|
auto yy = eval ( zz, t_=2, tp_=3);
|
|
std::cout << yy.indexmap()<< std::endl ;
|
|
std::cout << yy << std::endl ;
|
|
//std::cout << eval ( zz, t_=2, tp_=3)<< std::endl ;
|
|
//std::cout << eval ( G_w_wn2(t_,tp_), t_=2, tp_=3)<< std::endl ;
|
|
|
|
//std::cout << eval ( G(t_,tp_), t_=2, tp_=1.2)<< std::endl ;
|
|
//G(t_,tp_) << t_ - 3*tp_;
|
|
//G2(t_,tp_) << t_ + 3*tp_;
|
|
|
|
//G2(t_,tp_) << 2* G(t_,tp_);
|
|
|
|
TEST( G(1,1) );
|
|
TEST( G[G.mesh()(1,1) ]);
|
|
TEST( G.on_mesh(1,1));
|
|
|
|
//G2(t_,tp_) << G(tp_,t_);
|
|
TEST( G(2,1) );
|
|
TEST( G2(1,2) );
|
|
TEST( G(1,2) );
|
|
TEST( G2(2,1) );
|
|
|
|
//TEST( G2(2,1,3) ); // should not compile
|
|
|
|
}
|
|
TRIQS_CATCH_AND_ABORT;
|
|
}
|