Mercurial > vba-clojure
view src/SFMT/SFMT-params607.h @ 579:9f2b221bbf9b
row and columns increment correctly now.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 01 Sep 2012 06:03:08 -0500 |
parents | f9f4f1b99eed |
children |
line wrap: on
line source
1 #ifndef SFMT_PARAMS607_H2 #define SFMT_PARAMS607_H4 #define POS1 25 #define SL1 156 #define SL2 37 #define SR1 138 #define SR2 39 #define MSK1 0xfdff37ffU10 #define MSK2 0xef7f3f7dU11 #define MSK3 0xff777b7dU12 #define MSK4 0x7ff7fb2fU13 #define PARITY1 0x00000001U14 #define PARITY2 0x00000000U15 #define PARITY3 0x00000000U16 #define PARITY4 0x5986f054U19 /* 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"46 #endif /* SFMT_PARAMS607_H */