dft_tools/pytriqs/wrap_test/g.hpp

#include <triqs/gfs.hpp>
using namespace triqs::gfs;
using namespace triqs;

block_gf_view<imfreq> make_bgf(double a) {

 double beta = 1;
 auto G1 = gf<imfreq>({beta, Fermion}, {2, 2});

 auto B1 = make_block_gf<imfreq>(3, G1);

 {
  H5::H5File file("ess_test_g1.h5", H5F_ACC_TRUNC);
  h5_write(file, "g", B1);
 }

 return B1;
}

void pass_bgf(block_gf_view<imfreq> g) {

 {
  H5::H5File file("ess_test_g2.h5", H5F_ACC_TRUNC);
  h5_write(file, "g", g);
 }
}

// scalar gf

gf_view<imfreq,scalar_valued> make_sgf(double a) {
 double beta = 1;
 auto G1 = gf<imfreq, scalar_valued>({beta, Fermion});
{
  H5::H5File file("ess_test_g3a.h5", H5F_ACC_TRUNC);
  h5_write(file, "g", G1);
 }
 return G1;
}

void pass_sgf(gf_view<imfreq,scalar_valued> g) {

 {
  H5::H5File file("ess_test_g3b.h5", H5F_ACC_TRUNC);
  h5_write(file, "g", g);
 }
}