Cited HybridIA algorithm

This commit is contained in:
Sharan Roongta 2018-04-18 14:18:48 +02:00
parent e77e0b6f20
commit 90a1af5096
1 changed files with 3 additions and 0 deletions

View File

@ -560,6 +560,9 @@ function IO_hybridIA(Nast,ODFfileName)
IO_hybridIA = 0.0_pReal ! initialize return value for case of error IO_hybridIA = 0.0_pReal ! initialize return value for case of error
write(6,'(/,a,/)',advance='no') ' Using linear ODF file: '//trim(ODFfileName) write(6,'(/,a,/)',advance='no') ' Using linear ODF file: '//trim(ODFfileName)
write(6,'(/,a)') 'Eisenlohr et.al, Computational Materials Science, 42(4):670678, 2008'
write(6,'(/,a)') 'https://doi.org/10.1016/j.commatsci.2007.09.015'
!-------------------------------------------------------------------------------------------------- !--------------------------------------------------------------------------------------------------
! parse header of ODF file ! parse header of ODF file