projects
/
physik
/
nlsop.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
new runs
[physik/nlsop.git]
/
random.c
diff --git
a/random.c
b/random.c
index
6690531
..
30a7fab
100644
(file)
--- a/
random.c
+++ b/
random.c
@@
-73,3
+73,18
@@
u32 get_rand_lgp(u32 max,double a,double b)
return((u32)(1.0*max*(-1.0*b+sqrt(b*b+2*a*((b+a/2)*get_rand(URAND_MAX)/((long long unsigned int)URAND_MAX+1))))/a));
}
return((u32)(1.0*max*(-1.0*b+sqrt(b*b+2*a*((b+a/2)*get_rand(URAND_MAX)/((long long unsigned int)URAND_MAX+1))))/a));
}
+u32 get_rand_reject(u32 max_x,u32 max_y,u32 *graph)
+{
+ u32 x,y;
+ unsigned char ok;
+
+ ok=0;
+ while(!ok)
+ {
+ x=get_rand(max_x);
+ y=get_rand(max_y);
+ if(y<=graph[x]) ok=1;
+ }
+
+ return x;
+}