EQUATIONS: Adjust strings to the left in correct_unphysical_states().

Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2018-01-17 10:57:43 -02:00
parent a5400dbfb8
commit 45b703ad34

View File

@ -1165,8 +1165,8 @@ module equations
!
write(sid,'(i15)') id
write(snc,'(i15)') nc
write(msg,'("Unphysical cells in block ID:",a," (",a," counted)")') &
trim(sid), trim(snc)
write(msg,'("Unphysical cells in block ID:",a," (",a," counted).")') &
trim(adjustl(sid)), trim(adjustl(snc))
call print_warning(loc, trim(msg))
! allocate temporary vectors for unphysical states