From 41967da684bd240ac61628fe25f7a6d20d3e6da2 Mon Sep 17 00:00:00 2001 From: Yi-Chin Yang Date: Tue, 17 Apr 2018 15:09:12 +0200 Subject: [PATCH] edit --- src/spectral_damage.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/spectral_damage.f90 b/src/spectral_damage.f90 index 1618f854a..ad4df0a57 100644 --- a/src/spectral_damage.f90 +++ b/src/spectral_damage.f90 @@ -104,7 +104,7 @@ subroutine spectral_damage_init() write(6,'(/,a)') ' <<<+- spectral_damage init -+>>>' write(6,'(/,a)') ' Shanthraj et. al, Handbook of Mechanics of Materials, volume in press, ' - write(6,'(/,a)') ' chapter Spectral Solvers for Crystal Plasticity and Multi-Physics Simulations. Springer, 2018 ' + write(6,'(/,a)') ' chapter Spectral Solvers for Crystal Plasticity and Multi-Physics Simulations. Springer, 2018 ' write(6,'(a15,a)') ' Current time: ',IO_timeStamp() #include "compilation_info.f90"