whitespace adjustment

This commit is contained in:
Martin Diehl 2020-09-24 09:36:19 +02:00
parent e6ae5c9b6d
commit 0f64954300
1 changed files with 2 additions and 2 deletions

View File

@ -415,8 +415,8 @@ subroutine readVTR(grid,geomSize,origin,material)
if(.not. allocated(material)) call IO_error(error_ID = 844, ext_msg='material data not found')
if(size(material) /= product(grid)) call IO_error(error_ID = 844, ext_msg='size(material)')
if(any(geomSize<=0)) call IO_error(error_ID = 844, ext_msg='size')
if(any(grid<1)) call IO_error(error_ID = 844, ext_msg='grid')
if(any(geomSize<=0)) call IO_error(error_ID = 844, ext_msg='size')
if(any(grid<1)) call IO_error(error_ID = 844, ext_msg='grid')
contains