From 08da2b5e4d2a9e3aaf664fa55ba883ed8d811a4b Mon Sep 17 00:00:00 2001
From: Franz	Roters <f.roters@mpie.de>
Date: Tue, 29 Mar 2011 13:49:50 +0000
Subject: [PATCH] added minimum abaqus_v6.env file containing all changes
 necessary for the use of the MPIE subroutine changed comments in interface
 routines to refelect this

---
 code/abaqus_v6.env           | 40 ++++++++++++++++++++++++++++++++++++
 code/mpie_cpfem_abaqus_exp.f |  6 ++++--
 code/mpie_cpfem_abaqus_std.f |  6 ++++--
 3 files changed, 48 insertions(+), 4 deletions(-)
 create mode 100644 code/abaqus_v6.env

diff --git a/code/abaqus_v6.env b/code/abaqus_v6.env
new file mode 100644
index 000000000..3bf69f853
--- /dev/null
+++ b/code/abaqus_v6.env
@@ -0,0 +1,40 @@
+#
+#        MPIE CPFEM Abaqus Environment File
+#       ------------------------------------
+
+#
+# Linux (Opteron/EM64T) Settings:
+#
+# Compile and Link command for user subroutines.
+# Compile_cpp and link_exe for Abaqus make utility.
+#
+import os, re, glob, driverUtils
+
+# Always use the newest version
+fortDefPath = '/'
+
+dirLst = glob.glob('/opt/intel/fce/*')
+if dirLst:
+    dirLst.sort()
+    fortDefPath = dirLst[-1] + '/bin'
+
+fortCompiler = "ifort"
+
+if os.path.exists(os.path.join(fortDefPath, fortCompiler)):
+    fortCmd = os.path.join(fortDefPath, fortCompiler)
+else:
+    fortCmd = fortCompiler
+
+# Add the flag "-free" to the compile_fortran command below to use free-
+# format FORTRAN 90 syntax.
+compile_fortran = (fortCmd + " -c -fPIC -auto -extend_source -w90 -w95 " + 
+                   "-WB -I%I -free -heap-arrays 500000000 -O3 -fpp")
+
+cae_no_parts_input_file=ON
+
+# Remove the temporary names from the namespace
+del fortCmd
+del fortDefPath
+del fortCompiler
+del dirLst
+
diff --git a/code/mpie_cpfem_abaqus_exp.f b/code/mpie_cpfem_abaqus_exp.f
index b42025838..d9c6340df 100644
--- a/code/mpie_cpfem_abaqus_exp.f
+++ b/code/mpie_cpfem_abaqus_exp.f
@@ -9,8 +9,10 @@
 ! MPI fuer Eisenforschung, Duesseldorf
 ! PSI, Switzerland
 !
-! REMARK: change compile command to include
-!         "-free -heap-arrays 500000000" in "abaqus_v6.env"
+! REMARK: put the included file abaqus_v6.env in either your home
+!         or model directory, it is a minimum Abaqus environment file
+!         containing all changes necessary to use the MPIE subroutine
+!        (see Abaqus documentation for more information on the use of abaqus_v6.env)
 !
 !********************************************************************
 
diff --git a/code/mpie_cpfem_abaqus_std.f b/code/mpie_cpfem_abaqus_std.f
index 12a689a41..c5c7583cc 100644
--- a/code/mpie_cpfem_abaqus_std.f
+++ b/code/mpie_cpfem_abaqus_std.f
@@ -9,8 +9,10 @@
 ! MPI fuer Eisenforschung, Duesseldorf
 ! PSI, Switzerland
 !
-! REMARK: change compile command ("compile_fortran") to include
-!         "-free -heap-arrays 500000000" in "abaqus_v6.env"
+! REMARK: put the included file abaqus_v6.env in either your home
+!         or model directory, it is a minimum Abaqus environment file
+!         containing all changes necessary to use the MPIE subroutine
+!        (see Abaqus documentation for more information on the use of abaqus_v6.env)
 !
 !********************************************************************