IWAVEACD: adjsteptest.hh Source File

00001 #ifndef __ADJSTEPTEST__
00002 #define __ADJSTEPTEST__
00003 
00004 #include "acd_gfdm.h"
00005 #include "acd_gfdm2.h"
00006 #include "acd.hh"
00007 
00008 using namespace std;
00009 
00010 void iwave_rdom_rand(IWAVE *state);
00011 void iwave_rdom_zero(IWAVE *state);
00012 void rdom_rand(RDOM *rd);
00013 void rdom_zero(RDOM *rd);
00014 void iwave_rdom_copy(const IWAVE *state, IWAVE *state1);
00015 void rdom_copy(const RDOM *state, RDOM *state1);
00016 int  ra_a_swap(RARR *arr, RARR *arr1);
00017 
00018 // call fw to test if it satisfies adjoint relation
00019 void adjsteptest(std::vector<RDOM *> &iwf, std::vector<RDOM *> &iwa, IWaveInfo const &ic, 
00020                   void (*tsf)(std::vector<RDOM *> , bool, int, void *fdpars), int,
00021                   void *fdpars, PARARRAY * pars, FILE * stream);
00022 #endif