Mercurial > vba-clojure

view src/SFMT/SFMT-params1279.h @ 300:bc1f62b269b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
found program that works as valid items, but now the program is too long...
author Robert McIntyre <rlm@mit.edu>
date Fri, 30 Mar 2012 23:05:38 -0500
parents f9f4f1b99eed
children
line wrap: on
line source
     1 #ifndef SFMT_PARAMS1279_H



     2 #define SFMT_PARAMS1279_H



     3 



     4 #define POS1	7



     5 #define SL1	14



     6 #define SL2	3



     7 #define SR1	5



     8 #define SR2	1



     9 #define MSK1	0xf7fefffdU



    10 #define MSK2	0x7fefcfffU



    11 #define MSK3	0xaff3ef3fU



    12 #define MSK4	0xb5ffff7fU



    13 #define PARITY1	0x00000001U



    14 #define PARITY2	0x00000000U



    15 #define PARITY3	0x00000000U



    16 #define PARITY4	0x20000000U



    17 



    18 



    19 /* PARAMETERS FOR ALTIVEC */



    20 #if defined(__APPLE__)	/* For OSX */



    21     #define ALTI_SL1	(vector unsigned int)(SL1, SL1, SL1, SL1)



    22     #define ALTI_SR1	(vector unsigned int)(SR1, SR1, SR1, SR1)



    23     #define ALTI_MSK	(vector unsigned int)(MSK1, MSK2, MSK3, MSK4)



    24     #define ALTI_MSK64 \



    25 	(vector unsigned int)(MSK2, MSK1, MSK4, MSK3)



    26     #define ALTI_SL2_PERM \



    27 	(vector unsigned char)(3,21,21,21,7,0,1,2,11,4,5,6,15,8,9,10)



    28     #define ALTI_SL2_PERM64 \



    29 	(vector unsigned char)(3,4,5,6,7,29,29,29,11,12,13,14,15,0,1,2)



    30     #define ALTI_SR2_PERM \



    31 	(vector unsigned char)(7,0,1,2,11,4,5,6,15,8,9,10,17,12,13,14)



    32     #define ALTI_SR2_PERM64 \



    33 	(vector unsigned char)(15,0,1,2,3,4,5,6,17,8,9,10,11,12,13,14)



    34 #else	/* For OTHER OSs(Linux?) */



    35     #define ALTI_SL1	{SL1, SL1, SL1, SL1}



    36     #define ALTI_SR1	{SR1, SR1, SR1, SR1}



    37     #define ALTI_MSK	{MSK1, MSK2, MSK3, MSK4}



    38     #define ALTI_MSK64	{MSK2, MSK1, MSK4, MSK3}



    39     #define ALTI_SL2_PERM	{3,21,21,21,7,0,1,2,11,4,5,6,15,8,9,10}



    40     #define ALTI_SL2_PERM64	{3,4,5,6,7,29,29,29,11,12,13,14,15,0,1,2}



    41     #define ALTI_SR2_PERM	{7,0,1,2,11,4,5,6,15,8,9,10,17,12,13,14}



    42     #define ALTI_SR2_PERM64	{15,0,1,2,3,4,5,6,17,8,9,10,11,12,13,14}



    43 #endif	/* For OSX */



    44 #define IDSTR	"SFMT-1279:7-14-3-5-1:f7fefffd-7fefcfff-aff3ef3f-b5ffff7f"



    45 



    46 #endif /* SFMT_PARAMS1279_H */