updated mod_perturb in prep_syndata

prep_syndata/mod_perturb.f90

@@ -208,10 +208,12 @@ module mod_perturb
     deallocate(seedvec)
 
     ! normalize random numbers
-    rvec = rvec*num/sum(rvec)
+    ! not needed with random_normal - RT 12/20
+!    rvec = rvec*num/sum(rvec)
  
     ! mean of zero
-    rvec = rvec - 1.
+    ! not needed with random_normal - RT 12/20
+!    rvec = rvec - 1.
 
   end subroutine randnum