Mercurial > vba-clojure
view src/SFMT/SFMT-params1279.h @ 577:df3a7eac39d7
saving progress.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 01 Sep 2012 04:42:41 -0500 |
parents | f9f4f1b99eed |
children |
line wrap: on
line source
1 #ifndef SFMT_PARAMS1279_H2 #define SFMT_PARAMS1279_H4 #define POS1 75 #define SL1 146 #define SL2 37 #define SR1 58 #define SR2 19 #define MSK1 0xf7fefffdU10 #define MSK2 0x7fefcfffU11 #define MSK3 0xaff3ef3fU12 #define MSK4 0xb5ffff7fU13 #define PARITY1 0x00000001U14 #define PARITY2 0x00000000U15 #define PARITY3 0x00000000U16 #define PARITY4 0x20000000U19 /* 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"46 #endif /* SFMT_PARAMS1279_H */