From f0ad07580290dbac7a43f8e0f33205aafd2fbe7d Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Thu, 19 Dec 2019 00:01:44 +0100 Subject: [PATCH] fixed indentation --- src/homogenization.f90 | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/homogenization.f90 b/src/homogenization.f90 index 6c64f0fb5..4380ee5aa 100644 --- a/src/homogenization.f90 +++ b/src/homogenization.f90 @@ -107,12 +107,12 @@ module homogenization P,& !< partitioned stresses F,& !< partitioned deformation gradients F0 !< partitioned initial deformation gradients - real(pReal), dimension(:,:,:,:,:), intent(in) :: dPdF !< partitioned stiffnesses - real(pReal), dimension(3,3), intent(in) :: avgF !< average F - real(pReal), intent(in) :: dt !< time increment - integer, intent(in) :: & - ip, & !< integration point number - el !< element number + real(pReal), dimension(:,:,:,:,:), intent(in) :: dPdF !< partitioned stiffnesses + real(pReal), dimension(3,3), intent(in) :: avgF !< average F + real(pReal), intent(in) :: dt !< time increment + integer, intent(in) :: & + ip, & !< integration point number + el !< element number end function mech_RGC_updateState