diff --git a/lib/JTMSKsim.f90 b/lib/JTMSKsim.f90
index c9a17d605..c984deb1f 100644
--- a/lib/JTMSKsim.f90
+++ b/lib/JTMSKsim.f90
@@ -41,7 +41,7 @@ program JTMSKsim
   phi0=0.
   sig=10.0**(0.05*snrdb)
 
-  call init_random_seed(1)      ! seed Fortran RANDOM_NUMBER generator
+  call init_random_seed()       ! seed Fortran RANDOM_NUMBER generator
   call sgran()                  ! see C rand generator (used in gran)
 
 ! Generate the Tx waveform
diff --git a/lib/jt4sim.f90 b/lib/jt4sim.f90
index aabaee707..f3d85e080 100644
--- a/lib/jt4sim.f90
+++ b/lib/jt4sim.f90
@@ -45,7 +45,7 @@ program jt4sim
   freq=f0                            !Silence compiler warning
   dphi=0.0                           !Silence compiler warning
 
-  call init_random_seed(1)      ! seed Fortran RANDOM_NUMBER generator
+  call init_random_seed()       ! seed Fortran RANDOM_NUMBER generator
   call sgran()                  ! see C rand generator (used in gran)
 
   h=default_header(12000,npts)  
diff --git a/lib/jt65sim.f90 b/lib/jt65sim.f90
index 96f1331fa..257f7fc04 100644
--- a/lib/jt65sim.f90
+++ b/lib/jt65sim.f90
@@ -35,7 +35,7 @@ program jt65sim
      go to 999
   endif
 
-  call init_random_seed(1)      ! seed Fortran RANDOM_NUMBER generator
+  call init_random_seed()       ! seed Fortran RANDOM_NUMBER generator
   call sgran()                  ! see C rand generator (used in gran)
 
   csubmode='A'
diff --git a/lib/jt9sim.f90 b/lib/jt9sim.f90
index c9f4c7e79..480d49306 100644
--- a/lib/jt9sim.f90
+++ b/lib/jt9sim.f90
@@ -67,7 +67,7 @@ program jt9sim
 !  if(minutes.eq.30) f0=1025.
 
 
-  call init_random_seed(1)      ! seed Fortran RANDOM_NUMBER generator
+  call init_random_seed()       ! seed Fortran RANDOM_NUMBER generator
   call sgran()                  ! see C rand generator (used in gran)
 
   h=default_header(12000,npts)  
diff --git a/lib/noisegen.f90 b/lib/noisegen.f90
index 333fc4696..b0aa174f9 100644
--- a/lib/noisegen.f90
+++ b/lib/noisegen.f90
@@ -2,7 +2,7 @@ subroutine noisegen(d4,nmax)
 
   real*4 d4(4,nmax)
 
-  call init_random_seed(1)      ! seed Fortran RANDOM_NUMBER generator
+  call init_random_seed()       ! seed Fortran RANDOM_NUMBER generator
   call sgran()                  ! see C rand generator (used in gran)
 
   do i=1,nmax
diff --git a/lib/t1.f90 b/lib/t1.f90
index ea2a636c4..42b71fc65 100644
--- a/lib/t1.f90
+++ b/lib/t1.f90
@@ -23,7 +23,7 @@ program t1
   call getarg(3,arg)
   read(arg,*) iters
 
-  call init_random_seed(1)      ! seed Fortran RANDOM_NUMBER generator
+  call init_random_seed()       ! seed Fortran RANDOM_NUMBER generator
   call sgran()                  ! see C rand generator (used in gran)
 
   call random_number(r)