diff --git a/TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f b/TSHIKWAND_JABER_FULLY_COUPLED_STRAIN_BASED_SMA_MODEL.f
index 631ed4c67b5645c499a548cd9fbab6b426a5ba4c..4e9b2e64a9ba76827e108fcbb278421b836211b3 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)