From 2f3b5185623da4fdcadf438e2c7bcb9ae07a7304 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Sat, 5 Jan 2019 10:06:37 +0100 Subject: [PATCH] rename was missing --- src/plastic_none.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/plastic_none.f90 b/src/plastic_none.f90 index 5470c4a43..5b5bb49d1 100644 --- a/src/plastic_none.f90 +++ b/src/plastic_none.f90 @@ -48,7 +48,7 @@ subroutine plastic_none_init phase, & NofMyPhase - write(6,'(/,a)') ' <<<+- constitutive_'//PLASTICITY_NONE_label//' init -+>>>' + write(6,'(/,a)') ' <<<+- plastic_'//PLASTICITY_NONE_label//' init -+>>>' write(6,'(a15,a)') ' Current time: ',IO_timeStamp() #include "compilation_info.f90"