The R Project SVN – R – Diff – /trunk/src/nmath/ptukey.c

Rev 59202		Rev 60268
Line 102...		Line 102...
102	`0.233492536538354808760849898925,`	102	`0.233492536538354808760849898925,`
103	`0.249147045813402785000562436043`	103	`0.249147045813402785000562436043`
104	`};`	104	`};`
105	`double a, ac, pr_w, b, binc, c, cc1,`	105	`double a, ac, pr_w, b, binc, c, cc1,`
106	`pminus, pplus, qexpo, qsqz, rinsum, wi, wincr, xx;`	106	`pminus, pplus, qexpo, qsqz, rinsum, wi, wincr, xx;`
107	`long double blb, bub, einsum, elsum;`	107	`LDOUBLE blb, bub, einsum, elsum;`
108	`int j, jj;`	108	`int j, jj;`
109		109
110		110
111	`qsqz = w * 0.5;`	111	`qsqz = w * 0.5;`
112		112

The R Project SVN R