From 225a48021d596c53015a11b3654860ffa2768d69 Mon Sep 17 00:00:00 2001
From: Philip Eisenlohr <eisenlohr@egr.msu.edu>
Date: Mon, 8 Oct 2018 17:01:27 -0400
Subject: [PATCH] foramtting of random_seed output to align with rest

---
 src/numerics.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/numerics.f90 b/src/numerics.f90
index e797bd328..e4ceec622 100644
--- a/src/numerics.f90
+++ b/src/numerics.f90
@@ -429,7 +429,7 @@ subroutine numerics_init
 #endif
        case default                                                                                ! found unknown keyword
          call IO_error(300_pInt,ext_msg=tag)
-     endselect
+     end select
    enddo
    close(FILEUNIT)
 
@@ -502,7 +502,7 @@ subroutine numerics_init
 
 !--------------------------------------------------------------------------------------------------
 ! Random seeding parameter
- write(6,'(a24,1x,i16,/)')    ' random_seed:            ',randomSeed
+ write(6,'(a16,1x,i16,/)')    ' random_seed:    ',randomSeed
  if (randomSeed <= 0_pInt) &
    write(6,'(a,/)')           ' random seed will be generated!'