Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.
28496 Discussions

Error in user subroutine verificarion in ABAQUS

Shivam4
Beginner
294 Views

I have installed

Abaqus 2022

Microsoft Visual Studio 2019

Intel OneAPI base toolkit 2024.1

Intel OneAPI HPC toolkit 2024.1

I have tried many linking methods present on the internet but still getting ERRORS while running "abaqus verify -user_std" code

"abaqus info=system" code shows Fortran compiler as Intel Fortran Compiler 2021.12

 

std_user.log file says

Analysis initiated from SIMULIA established products
Abaqus JOB std_user
Abaqus 2022
Abaqus License Manager checked out the following licenses:
Abaqus/Standard checked out 5 tokens from Flexnet server WS-02.
<9994 out of 9999 licenses remain available>.
Begin Compiling Abaqus/Standard User Subroutines
5/3/2024 8:10:35 PM
Intel(R) Fortran Intel(R) 64 Compiler Classic for applications running on Intel(R) 64, Version 2021.12.0 Build 20240222_000000
Copyright (C) 1985-2024 Intel Corporation. All rights reserved.

ifort: remark #10448: Intel(R) Fortran Compiler Classic (ifort) is now deprecated and will be discontinued late 2024. Intel recommends that customers transition now to using the LLVM-based Intel(R) Fortran Compiler (ifx) for continued Windows* and Linux* support, new language support, new language features, and optimizations. Use '/Qdiag-disable:10448' to disable this message.
End Compiling Abaqus/Standard User Subroutines
Begin Linking Abaqus/Standard User Subroutines
Creating library standardU.lib and object standardU.exp
End Linking Abaqus/Standard User Subroutines
5/3/2024 8:10:36 PM
Begin Analysis Input File Processor
5/3/2024 8:10:36 PM
Run pre.exe
5/3/2024 8:10:39 PM
End Analysis Input File Processor
Begin Abaqus/Standard Analysis
5/3/2024 8:10:39 PM
Run standard.exe
5/3/2024 8:10:39 PM
Abaqus Error: Abaqus/Standard Analysis exited with an error - Please see the
message file for possible error messages if the file exists.
Begin SIM Wrap-up
5/3/2024 8:10:39 PM
Run SMASimUtility.exe
5/3/2024 8:10:39 PM
End SIM Wrap-up
Abaqus/Analysis exited with errors

 

std_user.for file code is:-

SUBROUTINE DISP(U,KSTEP,KINC,TIME,NODE,NOEL,JDOF,COORDS)

C
INCLUDE 'ABA_PARAM.INC'
C
DIMENSION U(3),TIME(2),COORDS(3)
C
C THE PRIMARY FUNCTION IS F(T)=1.5 SIN(OMEGA T) + .5 COS(OMEGA T)
C WHERE OMEGA IS .1 PI AND T THE CURRENT TIME.
C THE APPROPRIATE INTEGRALS AND DERIVATIVES ARE COMPUTED ACCORDINGLY.
C
OMEGA=.314159
AOMGT=OMEGA*TIME(2)
CS=COS(AOMGT)
SN=SIN(AOMGT)
AN=.5
BN=1.5
IF(NODE.EQ.2.AND.JDOF.EQ.1) THEN
C THE FUNCTION IS DISPLACEMENT FOR NODE 2
C (DIFFERENTIATE FOR VEL AND ACC)
U(1)=AN*CS+BN*SN
U(2)=OMEGA*(-AN*SN+BN*CS)
U(3)=-OMEGA**2*(AN*CS+BN*SN)
ELSE IF(NODE.EQ.3.AND.JDOF.EQ.1) THEN
C THE FUNCTION IS VELOCITY FOR NODE 3 (INTEGRATE FOR DISP,
C DIFFERENTIATE FOR ACCELERATION)
U(1)=(AN*SN+BN*(1.0-CS))/OMEGA
U(2)=AN*CS+BN*SN
U(3)=OMEGA*(-AN*SN+BN*CS)
ELSE IF(NODE.EQ.4.AND.JDOF.EQ.1) THEN
C THE FUNCTION IS ACCELERATION FOR NODE 4
C (INTEGRATE FOR DISP AND VELOCITY)
U(1)=(AN*(1.0-CS)+BN*(AOMGT-SN))/OMEGA**2
U(2)=(AN*SN+BN*(1.0-CS))/OMEGA
U(3)=AN*CS+BN*SN
ENDIF
RETURN
END

 

some pics are attached

 

 

0 Kudos
1 Solution
Steve_Lionel
Honored Contributor III
240 Views

I see no error messages related to Fortran here. Please find an ABAQUS support forum and ask there. I do see that ABAQUS correctly located the Intel compiler.

View solution in original post

1 Reply
Steve_Lionel
Honored Contributor III
241 Views

I see no error messages related to Fortran here. Please find an ABAQUS support forum and ask there. I do see that ABAQUS correctly located the Intel compiler.

Reply