From 7c0224675f3c4fcaa14ab0aef614c5564d67267d Mon Sep 17 00:00:00 2001 From: Georgino Kaleng Tshikwand Date: Tue, 10 Sep 2024 09:55:45 +0000 Subject: [PATCH] Update TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f --- TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f b/TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f index 631ed4c..4e9b2e6 100644 --- a/TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f +++ b/TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f @@ -352,9 +352,8 @@ C************************************************************************* E1_MA=EPSIL1EQ+C_MA*(T2-T1)/YOUNG E2_MA=EPSIL2EQ C************************************************************************* -C VERIFY START CONDITIONS OF THE TRANSFORMATION OF AUSTENITE OR/AND -C TWINNED MARTENSITE TO DETWINNED MARTENSITE -C AND UPDATE THE VALUES OF VOLUME FACTIONS OF MARTENSITE +C VERIFY START CONDITIONS OF THE TRANSFORMATION OF AUSTENITE TO DETWINNED +C MARTENSITE AND UPDATE THE VALUES OF VOLUME FACTIONS OF MARTENSITE C************************************************************************* CALL FORWARD_TRANS(T3,E1_AM,E2_AM,ES_AM,EF_AM, + XCI,XCI_T,XCI_D,H,DXCI,DEPSILTR,V_FORWORD) -- GitLab