From ea9434432e71d03fa57e4e8eae587061713bb3e0 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Mon, 9 Apr 2018 15:04:37 +0200 Subject: [PATCH] added reference for the tungsten model --- src/plastic_disloUCLA.f90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/plastic_disloUCLA.f90 b/src/plastic_disloUCLA.f90 index 9c0a6c494..8d44d28c8 100644 --- a/src/plastic_disloUCLA.f90 +++ b/src/plastic_disloUCLA.f90 @@ -176,6 +176,8 @@ subroutine plastic_disloUCLA_init(fileUnit) real(pReal), dimension(:), allocatable :: tempPerSlip write(6,'(/,a)') ' <<<+- constitutive_'//PLASTICITY_DISLOUCLA_label//' init -+>>>' + write(6,'(/,a)') ' Cereceda et. al, International Journal of Plasticity 78, 2016, 242-256' + write(6,'(/,a)') ' http://dx.doi.org/10.1016/j.ijplas.2015.09.002' write(6,'(a15,a)') ' Current time: ',IO_timeStamp() #include "compilation_info.f90"