toeplitz.cpp

Go to the documentation of this file.
00001 #include "toeplitz.h"
00002 #include "CFatalException.h"
00003 /* This code is based on toeplz in Numerical Recipes p. 95*/
00004  
00005 void SolveToeplitz(ublas::vector<double> &R,ublas::vector<double> &x, const ublas::vector<double> &y)
00006 {
00007         if (R(n) == 0)
00008            throw CFatalException("Singular minor in SolveToeplitz");
00009         if (R.size() != x.size()*2-1 || R.size() != y.size()*2-1)
00010            throw CFatalException("Input Vectors do not have the same size in SolveToeplitz");
00011         const int size = x.size(); 
00012         x(0) = y(0)/R(size-1);
00013         if (size == 1)
00014            return;
00015     ublas::vector<double> g(size), h(size);
00016     g(0) = R(size-2)/R(size-1);
00017     h(0) = R(size)/R(size-1);
00018     for (m=0; m < size; ++m)
00019     {
00020     }
00021 }

Generated on Fri Jun 27 13:05:11 2008 for GPLIB++ by  doxygen 1.5.5