Changeset 3615 in Sophya for trunk/FrEROS/AnaLC/nbgene.cc
- Timestamp:
- May 1, 2009, 1:34:31 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/FrEROS/AnaLC/nbgene.cc
r3308 r3615 1 1 #include "machdefs.h" 2 #include "sopnamsp.h" // using SOPHYA namespace 2 3 #include <stdio.h> 3 4 #include <stdlib.h> … … 6 7 #include "fsvcache.h" 7 8 #include "nbtri.h" 8 #include "nbrandom.h"9 9 #include "nbmath.h" 10 10 #include "nbinteg.h" 11 11 #include "strutil.h" 12 12 #include "fsvst.h" 13 #include "srandgen.h" 13 14 #include "nbsread.h" 14 15 #include "nbgene.h" … … 68 69 seed_16v[1]=(unsigned short) mc.iseed2; 69 70 seed_16v[2]=(unsigned short) mc.iseed3; 70 Ini_Ranf(seed_16v,0);71 RandGen->SetSeed(seed_16v); 71 72 72 73 mc.NGene = mc.NPoints_ampli = mc.NPoints_ampli_tf = mc.Net_ampli_tf = 0; … … 238 239 printf("Nb d'etoiles amplifiees avec taille finie %d\n" 239 240 ,mc.Net_ampli_tf); 240 Get_Ranf(seed_16v,0);241 RandGen->SetSeed(seed_16v); 241 242 mc.iseed1 = (int_4)seed_16v[0]; 242 243 mc.iseed2 = (int_4)seed_16v[1];
Note:
See TracChangeset
for help on using the changeset viewer.