File 0001-Fix-wrong-parameter-passed-to-us3_material... of Package ccx

Overview Repositories Revisions Requests Users Attributes Meta

File 0001-Fix-wrong-parameter-passed-to-us3_materialdata_me.patch of Package ccx (Revision d510adad76970a4742e79a001815acb4)

Currently displaying revision d510adad76970a4742e79a001815acb4 , Show latest

From 59b0a4eca5ea6efd138a708fc5ba4b98a499b2d4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Stefan=20Br=C3=BCns?= <stefan.bruens@rwth-aachen.de>
Date: Sun, 30 Jan 2022 17:37:38 +0100
Subject: [PATCH] Fix wrong parameter passed to us3_materialdata_me

GCC 11.2 errors out as the last parameter is syntactically wrong, and
apparently also semantically:

resultsmech_us3.f:465:18:
   353 |      &           xstiff,ncmat_)
       |                        2
 ......
   465 |      &     xstiff,alcon)
       |                  1
Error: Type mismatch between actual argument at (1) and actual argument at (2) (REAL(8)/INTEGER(4)).
---
 src/resultsmech_us3.f | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/resultsmech_us3.f b/src/resultsmech_us3.f
index bf1757b..78c8f17 100644
--- a/src/resultsmech_us3.f
+++ b/src/resultsmech_us3.f
@@ -462,7 +462,7 @@
      &     ihyper,istiff,elconloc,eth,kode,plicon,
      &     nplicon,plkcon,nplkcon,npmat_,
      &     plconloc,mi(1),dtime,k,
-     &     xstiff,alcon)
+     &     xstiff,ncmat_)
           e     = elas(1)
           un    = elas(2)
           rho   = rhcon(1,1,imat)        
-- 
2.34.1

Places

File 0001-Fix-wrong-parameter-passed-to-us3_materialdata_me.patch of Package ccx (Revision d510adad76970a4742e79a001815acb4)

Places