From 4ceebb9bf4e9a9481cfec60a44823442b1b10e06 Mon Sep 17 00:00:00 2001
From: Noels Ludovic <l.noels@uliege.be>
Date: Thu, 7 Dec 2023 08:53:46 +0000
Subject: [PATCH] Update umat.f
---
MaterialModels/FiniteStrain/Finite_VEVP/umat.f | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/MaterialModels/FiniteStrain/Finite_VEVP/umat.f b/MaterialModels/FiniteStrain/Finite_VEVP/umat.f
index 78af446..8ebe81a 100644
--- a/MaterialModels/FiniteStrain/Finite_VEVP/umat.f
+++ b/MaterialModels/FiniteStrain/Finite_VEVP/umat.f
@@ -1076,7 +1076,7 @@ C END IF
END DO
coeffs(1) = 1.d0
- DO O5 = 2, order
+ DO O5 = 2, order-1
coeffs(O5) = coeffs(O5 - 1) * REAL(O5, 8)
END DO
--
GitLab