add numerical recipes library
This commit is contained in:
10
lib/nr/ansi/recipes/metrop.c
Normal file
10
lib/nr/ansi/recipes/metrop.c
Normal file
@@ -0,0 +1,10 @@
|
||||
|
||||
#include <math.h>
|
||||
|
||||
int metrop(float de, float t)
|
||||
{
|
||||
float ran3(long *idum);
|
||||
static long gljdum=1;
|
||||
|
||||
return de < 0.0 || ran3(&gljdum) < exp(-de/t);
|
||||
}
|
||||
Reference in New Issue
Block a user