/*2:*/
#line 33 "gb_flip.w"
#include <stdio.h>
#include "gb_flip.h"
#line 4 "gb_flip.ch"
int main(void)
#line 38 "gb_flip.w"
{long j;
gb_init_rand(-314159L);
if(gb_next_rand()!=119318998){
fprintf(stderr,"Failure on the first try!\n");return-1;
}
for(j= 1;j<=133;j++)
gb_next_rand();
if(gb_unif_rand(0x55555555L)!=748103812){
fprintf(stderr,"Failure on the second try!\n");return-2;
}
fprintf(stderr,"OK, the gb_flip routines seem to work!\n");
return 0;
}
/*:2*/
syntax highlighted by Code2HTML, v. 0.9.1