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

mapping renamed 

now we have two mappings, 'phase' and 'homogenization'. They `unwind`
the definition in 'materialpoint' in 'material.yaml'. Since we
never introduced the inverse mapping, I have removed the cellResults
subfolder.
This commit is contained in:
Martin Diehl 2020-08-25 11:02:51 +02:00
parent 55443a3ff5
commit 4fe4190ee0
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/results.f90
View File

@ -613,8 +613,8 @@ subroutine results_mapping_constituent(phaseAt,memberAtLocal,label)
! write the components of the compound type individually
call h5pset_preserve_f(plist_id, .TRUE., ierr)
loc_id = results_openGroup('/mapping/cellResults')
call h5dcreate_f(loc_id, 'constituent', dtype_id, filespace_id, dset_id, ierr)
loc_id = results_openGroup('/mapping')
call h5dcreate_f(loc_id, 'phase', dtype_id, filespace_id, dset_id, ierr)
if (ierr < 0) call IO_error(1,ext_msg='results_mapping_constituent: h5dcreate_f')
call h5dwrite_f(dset_id, name_id, reshape(label(pack(phaseAtMaterialpoint,.true.)),myShape), &
@ -635,6 +635,9 @@ subroutine results_mapping_constituent(phaseAt,memberAtLocal,label)
call h5tclose_f(name_id, ierr)
call h5tclose_f(position_id, ierr)
! for backward compatibility
call results_setLink('/mapping/phase','/mapping/cellResults/constituent')
end subroutine results_mapping_constituent
@ -748,8 +751,8 @@ subroutine results_mapping_materialpoint(homogenizationAt,memberAtLocal,label)
! write the components of the compound type individually
call h5pset_preserve_f(plist_id, .TRUE., ierr)
loc_id = results_openGroup('/mapping/cellResults')
call h5dcreate_f(loc_id, 'materialpoint', dtype_id, filespace_id, dset_id, ierr)
loc_id = results_openGroup('/mapping')
call h5dcreate_f(loc_id, 'homogenization', dtype_id, filespace_id, dset_id, ierr)
if (ierr < 0) call IO_error(1,ext_msg='results_mapping_materialpoint: h5dcreate_f')
call h5dwrite_f(dset_id, name_id, reshape(label(pack(homogenizationAtMaterialpoint,.true.)),myShape), &
@ -770,6 +773,9 @@ subroutine results_mapping_materialpoint(homogenizationAt,memberAtLocal,label)
call h5tclose_f(name_id, ierr)
call h5tclose_f(position_id, ierr)
! for backward compatibility
call results_setLink('/mapping/homogenization','/mapping/cellResults/materialpoint')
end subroutine results_mapping_materialpoint