Citations in plastic_twin

This commit is contained in:
Sharan Roongta 2018-04-17 15:51:59 +02:00
parent 3bd09fe837
commit 3fca8da6aa
1 changed files with 4 additions and 0 deletions

View File

@ -265,6 +265,10 @@ subroutine plastic_dislotwin_init(fileUnit)
real(pReal), dimension(:), allocatable :: tempPerSlip, tempPerTwin, tempPerTrans
write(6,'(/,a)') ' <<<+- constitutive_'//PLASTICITY_DISLOTWIN_label//' init -+>>>'
write(6,'(/,a)') ' A. Ma and F. Roters, Acta Materialia, 52(12):36033612, 2004'
write(6,'(/,a)') ' https://doi.org/10.1016/j.actamat.2004.04.012'
write(6,'(/,a)') ' F.Roters et. al , Computational Materials Science, 39:9195, 2007'
write(6,'(/,a)') ' https://doi.org/10.1016/j.commatsci.2006.04.014'
write(6,'(a15,a)') ' Current time: ',IO_timeStamp()
#include "compilation_info.f90"