foramtting of random_seed output to align with rest
This commit is contained in:
parent
4f666057a6
commit
225a48021d
|
@ -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!'
|
||||
|
||||
|
|
Loading…
Reference in New Issue