User:Samboy

SEMI-RETIRED

This user is no longer very active on Wikipedia as of May of 2020.

 #include <stdio.h> // cc -o microrg32 microrg32.c ; WORK=3 ; LEN=4 #######
 #include <stdint.h> // SECRET="Something random like qhohxks5mx9elv6ujgx3"
 #include <stdlib.h> // export P="$LEN:$SECRET:x.org" ## Public domain code
 #define b(z) for(c=0;c<(z);c++) // ./microrg32 $WORK $LEN | head -1 | tail
 uint32_t c,e[42],f[42],g=19,h=13,r,s,n[45],i,k;char*q;void m(){int c;r=0;b
 (12)f[c+c%3*h]^=e[c+1];b(g){r=(r+c)%32;i=c*7%g;k=e[i++];k^=e[i%g]|~e[(i+1)
 %g];n[c]=n[c+g]=k>>r|k<<-r%32;}for(c=39;c--;f[c+1]=f[c])e[c]=n[c]^n[c+1]^n
 [c+4];*e^=1;b(3)e[c+h]^=f[c*h]=f[c*h+h];}int main(int p,char **v){q=getenv
 ("P");if(q&&p>2){for(;;m()){b(3){for(r=0;r<4;){f[c*h]^=k=(*q?*q&255:1)<<8*
 r++;e[16+c]^=k;if(!*q++){p=0;b(17+(1<<*v[1]%32))m();b(983){s=e[1+c%2];r=c;
 b(4){p=p>0?p:*v[2]%16;i=s;s>>=8;if(p!=0){i&=31;i+=i<8?50:89;}printf(p?"%c"
 :"%02x",i&255);}c=r;if(c%2)m();if(--p<1||c>981)puts("");}return 0;}}}}}}//

I have a website and a blog.

I have, over the years, contributed a number of images to the Wikipedia.

My preferred gender pronouns are he/him/his.

The Fine-structure constant:

$$\alpha ={\frac {e^{2}}{2\varepsilon _{0}hc}}\approx {\frac {1}{137}}$$

where

• e is the elementary charge (1.602176634×10⁻¹⁹ C‍);
• h is the Planck constant (6.62607015×10⁻³⁴ J⋅Hz⁻¹‍);
• c is the speed of light (299792458 m⋅s⁻¹‍);
• ε₀ is the electric constant (8.8541878188(14)×10⁻¹² F⋅m⁻¹‍).