Fix -orispread

Fixed seed of the random number generator to make sure that it depends
on -id.

Author: rquey

VERSIONS

@@ -1,4 +1,4 @@
-New in 4.10.2-10 (06 Feb 2025):
+New in 4.10.2-11 (06 Feb 2025):
 - module -T: added -ori transform ori for tesrs, added -statcell
   oridisanisoaxes_crys, made minor bug fixes and improvements.
 - module -M: fixed -dim 2 -interface cohesive, fixed -loadmesh on $Topology=0

doc/conf.py

@@ -11,8 +11,8 @@
 import sphinx_rtd_theme
 
 project = u'Neper'
-version = u'4.10.2-10'
-release = u'4.10.2-10'
+version = u'4.10.2-11'
+release = u'4.10.2-11'
 author = u'Romain Quey'
 copyright = u'Romain Quey'
 language = 'en'

src/CMakeLists.txt

@@ -7,7 +7,7 @@ if(POLICY CMP0077)
   cmake_policy(SET CMP0077 NEW)
 endif()
 
-set(NEPER_VERSION \"4.10.2-10\")
+set(NEPER_VERSION \"4.10.2-11\")
 project(neper)
 
 if(CMAKE_CXX_COMPILER_VERSION VERSION_LESS 4.8.1)

src/neper_t/neper_t.c

@@ -315,7 +315,7 @@ neper_t (int fargc, char **fargv, int argc, char **argv)
     net_tess_tesr (In.tesrsizestring, FTess, &Tesr);
 
     if (neut_tesr_hascellorispread (Tesr))
-      net_ori_post (&Tesr);
+      net_ori_post (SSet[1], &Tesr);
   }
 
   // ###################################################################

src/neper_t/net_ori/net_ori.h

@@ -28,7 +28,7 @@ extern "C"
   extern void net_ori_file (char *label, struct OL_SET *pOSet);
   extern void net_ori_memcpy (struct OL_SET OSet, struct SEEDSET *pSSet);
 
-  extern void net_ori_post (struct TESR *pTesr);
+  extern void net_ori_post (struct SEEDSET SSet, struct TESR *pTesr);
 
 #ifdef __cplusplus
 }

src/neper_t/net_ori/net_ori1.c

@@ -173,7 +173,7 @@ net_ori (struct IN_T In, int level, struct MTESS MTess, struct TESS *Tess,
 }
 
 void
-net_ori_post (struct TESR *pTesr)
+net_ori_post (struct SEEDSET SSet, struct TESR *pTesr)
 {
   int i, j;
 
@@ -189,7 +189,7 @@ net_ori_post (struct TESR *pTesr)
     neut_tesr_cell_voxs (*pTesr, i, &voxs, &voxqty);
 
     q = ut_alloc_2d (voxqty, 4);
-    neut_ori_orispread ((*pTesr).CellOri[i], (*pTesr).CellOriDistrib[i], voxqty, i, q);
+    neut_ori_orispread ((*pTesr).CellOri[i], (*pTesr).CellOriDistrib[i], voxqty, SSet.Random + i, q);
 
     for (j = 0; j < voxqty; j++)
       ol_q_memcpy (q[j], (*pTesr).VoxOri[voxs[j][0]][voxs[j][1]][voxs[j][2]]);