Annotation of OpenXM/src/hgm/mh/src/mh.h, Revision 1.8
1.8 ! takayama 1: /* $OpenXM: OpenXM/src/hgm/mh/src/mh.h,v 1.7 2013/03/08 04:54:01 takayama Exp $ */
1.1 takayama 2: struct cWishart {
3: double x;
4: double rank;
5: double *f; /* f[0],...,f[rank-1] */
6: void *aux;
7: void *aux2;
8: };
9:
10: /* Cumulative probability distribution function of the first eigenvalue of
11: Wishart matrix by Series */
12: struct cWishart *mh_cwishart_s(int m,int n,double beta[],double x0,
1.5 takayama 13: int approxDeg,double h, int dp, double x);
1.1 takayama 14: /* Cumulative probability distribution function of the first eigenvalue of
15: Wishart matrix by HGM */
16: struct cWishart *mh_cwishart_hgm(int m,int n,double beta[],double x0,
1.5 takayama 17: int approxDeg, double h, int dp, double x);
1.3 takayama 18: struct cWishart *mh_cwishart_gen(int m,int n,double beta[],double x0,
1.5 takayama 19: int approxDeg,double h, int dp, double x,int modep[]);
1.1 takayama 20: struct cWishart *new_cWishart(int rank);
1.6 takayama 21:
22: int mh_usage(void);
23: void mh_freeWorkArea(void);
24: void mh_rf(double x, double *f, int rank_not_used, double *val, int n_not_used);
1.7 takayama 25: void mh_set_strategy(int s,double err[2]);
26:
1.8 ! takayama 27: #define STRATEGY_DEFAULT 1
! 28: /* Five significant digits for checking MH_abserr. cf. M_assigned_series_error */
! 29: #define SIGDIGIT_DEFAULT (1e-4)
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>