223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Merge branch 'fix-vtr-sanity-check' into 'development' 

Fix VTR sanity check

See merge request damask/DAMASK!222
This commit is contained in:
Franz Roters 2020-09-15 10:15:18 +02:00
parent 77026e5d53 50599bc5c5
commit 7cda092ab9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/grid/discretization_grid.f90
View File

@ -433,7 +433,7 @@ subroutine readVTR(grid,geomSize,origin,microstructure)
coords = as_pReal(base64_str,headerType,compressed,dataType) coords = as_pReal(base64_str,headerType,compressed,dataType)
delta = coords(2:) - coords(:size(coords)-1) delta = coords(2:) - coords(:size(coords)-1)
if(any(delta<0.0_pReal) .or. dNeq(maxval(delta),minval(delta))) & if(any(delta<0.0_pReal) .or. dNeq(maxval(delta),minval(delta),1.0e-8_pReal*maxval(abs(coords)))) &
call IO_error(error_ID = 844, ext_msg = 'grid spacing') call IO_error(error_ID = 844, ext_msg = 'grid spacing')
grid(direction) = size(coords)-1 grid(direction) = size(coords)-1