Initial hpc batch submission script and clean whitespace in umat.

JMBBM13b/README.md

@@ -1,3 +1,4 @@
-Journal Article: https://zenodo.org/records/11184080
+Journal Article: https://doi.org/10.1016/j.jmbbm.2014.01.007
+
+Supporting Data - including original software versions: https://zenodo.org/records/11184080
 
-Supporting Data - including original software versions: https://doi.org/10.1016/j.jmbbm.2014.01.007

JMBBM13b/UCrys_HCP_Only.for

@@ -4,7 +4,7 @@
      3     nstatv,props,nprops,coords,drot,pnewdt,celent,
      4     dfgrd0,dfgrd1,noel,npt,layer,kspt,kstep,kinc)
 c     
-		include 'aba_param.inc'
+c     include 'aba_param.inc'
 c     modified from huang umat- jg:20/07/12
 c     *******************************************************************
 c     - only suitable for finite deformation isotropic elasticity
@@ -29,7 +29,8 @@ c		*******************************************************************
      2     dgamod(18),dtauod(18),dgspod(18),dspnro(3,18),
      3     dspdro(3,18),dhdgdg(18,18),rwkdir(3,24),rwknor(3,24),
      3     indxL(3),termd(3),termn(3),gamma(18),tauslpL(18)
-C-----  Elastic matrix in GLOBAL system
+c
+c-----  Elastic matrix in GLOBAL system
       gshear = props(1)/(2.*(1.+props(2)))
       e11 = 2.*gshear*(one-props(2))/(1.-2.*props(2))
       e12 = 2.*gshear*props(2)/(1.-2.*props(2))
@@ -205,7 +206,7 @@ c				slip normals
                rwknor(1,j) = -rwknor(1,j-3)
                rwknor(2,j) = -rwknor(2,j-3)
             enddo
-				rlength=sqrt(3.*(1.+aspect*aspect))					
+            rlength=sqrt(3.*(1.+aspect*aspect)
             do j = 1,6
                do i = 1,3
                   rwknor(i,j) = rwknor(i,j)/rlength
@@ -941,7 +942,7 @@ C     	absolute values of shear strains in all slip systems)
       end
 c----------------------------------------------------------------------
       subroutine ludcmp (a, n, np, indx, d)
-        include 'aba_param.inc'
+c     include 'aba_param.inc'
       parameter (nmax=200, tiny=1.0e-20)
       dimension a(np,np), indx(n), vv(nmax)
       d = 1.d0
@@ -996,7 +997,7 @@ c----------------------------------------------------------------------
       end
 C----------------------------------------------------------------------
       subroutine lubksb (a, n, np, indx, b)
-        include 'aba_param.inc'
+c     include 'aba_param.inc'
       dimension a(np,np), indx(n), b(n)
       ii = 0
       do i = 1,n

JMBBM13b/batch_submission/lxp_system_test.sh

@@ -0,0 +1,25 @@
+#!/bin/bash -l
+
+#SBATCH -J AbaqusUMatCheck
+#SBATCH -A myaccount
+#SBATCH --nodes=1
+#SBATCH --time=00:05:00
+#SBATCH -p cpu
+#SBATCH --qos test
+# disable multithreading. Please check both cases to see which gives better performance
+#SBATCH --hint=nomultithread
+#SBATCH --ntasks-per-node=128
+#SBATCH --cpus-per-task=1
+#SBATCH -o %x-%j.log
+
+### Load ABAQUS module
+module load abaqus/2023
+module load intel-compilers
+
+### Configure environment variables, need to unset SLURM's Global Task ID for ABAQUS's PlatformMPI to work
+unset SLURM_GTIDS
+
+### Set input file and job (file prefix) name here
+job_name=${SLURM_JOB_NAME}
+
+abaqus job=${job_name} input=CDIE_1E.inp user=UCrys_HCP_Only double=both interactive