Mercurial > vba-clojure

view src/SFMT/SFMT-params607.h @ 467:ac0ed5c1a1c4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
working on drums.
author Robert McIntyre <rlm@mit.edu>
date Fri, 04 May 2012 05:17:18 -0500
parents f9f4f1b99eed
children
line wrap: on
line source
     1 #ifndef SFMT_PARAMS607_H



     2 #define SFMT_PARAMS607_H



     3 



     4 #define POS1	2



     5 #define SL1	15



     6 #define SL2	3



     7 #define SR1	13



     8 #define SR2	3



     9 #define MSK1	0xfdff37ffU



    10 #define MSK2	0xef7f3f7dU



    11 #define MSK3	0xff777b7dU



    12 #define MSK4	0x7ff7fb2fU



    13 #define PARITY1	0x00000001U



    14 #define PARITY2	0x00000000U



    15 #define PARITY3	0x00000000U



    16 #define PARITY4	0x5986f054U



    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)(5,6,7,0,9,10,11,4,13,14,15,8,19,19,19,12)



    32     #define ALTI_SR2_PERM64 \



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



    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	{5,6,7,0,9,10,11,4,13,14,15,8,19,19,19,12}



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



    43 #endif	/* For OSX */



    44 #define IDSTR	"SFMT-607:2-15-3-13-3:fdff37ff-ef7f3f7d-ff777b7d-7ff7fb2f"



    45 



    46 #endif /* SFMT_PARAMS607_H */