itpp_ext.h

//
// C++ Interface: itpp_ext
//
// Description:
//
//
// Author: smidl <smidl@utia.cas.cz>, (C) 2008
//
// Copyright: See COPYING file that comes with this distribution
//
//
#include <itpp/itbase.h>

#ifndef ITEX_H
#define ITEX_H

using std::cout;
using std::endl;

namespace itpp {
Array<int> to_Arr ( const ivec &indices );
ivec linspace ( int from, int to );

vec get_vec ( const vec &v, const ivec &indexlist );

bvec operator& ( const bvec &a, const bvec &b );
bvec operator| ( const bvec &a, const bvec &b );

bvec operator> ( const vec &t1, const vec &t2 );

bvec operator< ( const vec &t1, const vec &t2 );

// template<class Num_T>
// void set_subvector(vec &ov, ivec &iv, const Vec<Num_T> &v);

void set_subvector ( vec &ov, const ivec &iv, const vec &v );

template<class Num_T> inline
void set_col_part ( mat &M, int c, const Vec<Num_T> &v ) {
        copy_vector ( v.size(), v._data(), M._data() + c*M.rows() );
}

const double inf = std::numeric_limits<double>::infinity();

#if 0

class Gamma_RNG {
public:
        Gamma_RNG ( double a = 1.0, double b = 1.0 );
        void setup ( double a0, double b0 ) {
                alpha = a0;
                beta = b0;
        }
        double get_setup() const;
        double operator() () {
                return sample();
        }
        vec operator() ( int n );
        mat operator() ( int h, int w );
protected:
private:
        double sample();
        double alpha;
        double beta;
        Random_Generator RNG;
        Normal_RNG NRNG;
        inline double exp_rand() {
                return -std::log ( RNG.random_01() );
        }
        inline double unif_rand() {
                return RNG.random_01();
        }
        inline double norm_rand() {
                return NRNG.sample();
        }

};
bool qr ( const mat &A, mat &R );
#endif
std::string num2str ( double d );

std::string num2str ( int i );

double psi ( double );

void triu(mat &A);

double randun();
vec randun(int n);
mat randun(int n, int m);

ivec unique(const ivec &in);

ivec unique_complement(const ivec &in, const ivec &base);
}


#endif //ITEX_H

---