Fortran Coder

查看: 1001|回复: 1
打印 上一主题 下一主题

[求助] abaqus子程序代码报错如何解决

[复制链接]

1

帖子

1

主题

0

精华

新人

F 币
4 元
贡献
3 点
跳转到指定楼层
楼主
发表于 2024-8-24 15:23:56 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
4F 币
Analysis initiated from SIMULIA established products
Abaqus JOB Job-QXPWJ2001
Abaqus 2023
USING MEMORY DOUG-LEA ALLOCATOR
Abaqus License Manager checked out the following licenses:
Abaqus/Explicit checked out 8 tokens from Flexnet server localhost.
<9991 out of 9999 licenses remain available>.
Begin Compiling Single Precision Abaqus/Explicit User Subroutines
2024/8/24 13:21:52
Intel(R) Fortran Intel(R) 64 Compiler Classic for applications running on Intel(R) 64, Version 2021.11.1 Build 20231117_000000
Copyright (C) 1985-2023 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.
uniFiber(1).f(1): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ) * <IDENTIFIER>
       subroutine vumat(
------------------------^
uniFiber(1).f(2): error #5082: Syntax error, found IDENTIFIER 'READ' when expecting one of: ( : % [ . = =>
c Read only -
--^
uniFiber(1).f(3): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     1  nblock, ndir, nshr, nstatev, nfieldv, nprops, lanneal,
--------------^
uniFiber(1).f(3): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: :: ( : * <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
     1  nblock, ndir, nshr, nstatev, nfieldv, nprops, lanneal,
--------------------------------------------------------------^
uniFiber(1).f(4): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     2  stepTime, totalTime, dt, cmname, coordMp, charLength,
----------------^
uniFiber(1).f(4): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: :: ( : * <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
     2  stepTime, totalTime, dt, cmname, coordMp, charLength,
-------------------------------------------------------------^
uniFiber(1).f(5): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     3  props, density, strainInc, relSpinInc,
-------------^
uniFiber(1).f(5): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: :: ( : * <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
     3  props, density, strainInc, relSpinInc,
----------------------------------------------^
uniFiber(1).f(6): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     4  tempOld, stretchOld, defgradOld, fieldOld,
---------------^
uniFiber(1).f(6): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: :: ( : * <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
     4  tempOld, stretchOld, defgradOld, fieldOld,
--------------------------------------------------^
uniFiber(1).f(7): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     5  stressOld, stateOld, enerInternOld, enerInelasOld,
-----------------^
uniFiber(1).f(7): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: :: ( : * <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
     5  stressOld, stateOld, enerInternOld, enerInelasOld,
----------------------------------------------------------^
uniFiber(1).f(8): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     6  tempNew, stretchNew, defgradNew, fieldNew,
---------------^
uniFiber(1).f(8): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: :: ( : * <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
     6  tempNew, stretchNew, defgradNew, fieldNew,
--------------------------------------------------^
uniFiber(1).f(9): error #5082: Syntax error, found IDENTIFIER 'WRITE' when expecting one of: ( : % [ . = =>
c Write only -
--^
uniFiber(1).f(10): error #5276: Unbalanced parentheses
     7  stressNew, stateNew, enerInternNew, enerInelasNew )
----------------------------------------------------------^
uniFiber(1).f(10): error #5082: Syntax error, found ',' when expecting one of: ( : % [ . = =>
     7  stressNew, stateNew, enerInternNew, enerInelasNew )
-----------------^
uniFiber(1).f(10): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( % . = =>
     7  stressNew, stateNew, enerInternNew, enerInelasNew )
-----------------------------------------------------------^
uniFiber(1).f(11): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( : % [ . = =>
c
-^
uniFiber(1).f(13): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( : % [ . = =>
c
-^
uniFiber(1).f(14): error #5143: Missing mandatory separating blank
c 3D Orthotropic Elasticity with Hashin 3d Failure criterion
---^
uniFiber(1).f(14): error #5143: Missing mandatory separating blank
c 3D Orthotropic Elasticity with Hashin 3d Failure criterion
-----------------------------------------^
uniFiber(1).f(14): error #5082: Syntax error, found INTEGER_CONSTANT '3' when expecting one of: ( : % [ . = =>
c 3D Orthotropic Elasticity with Hashin 3d Failure criterion
--^
uniFiber(1).f(15): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( : % [ . = =>
c
-^
uniFiber(1).f(16): error #5082: Syntax error, found IDENTIFIER 'THE' when expecting one of: ( : % [ . = =>
c The state variables are stored as:
--^
uniFiber(1).f(17): error #5082: Syntax error, found IDENTIFIER 'STATE' when expecting one of: ( : % [ . = =>
c    state(*,1)   = material point status
-----^
uniFiber(1).f(17): error #5082: Syntax error, found IDENTIFIER 'POINT' when expecting one of: :: ) ( , : * <END-OF-STATEMENT> ; . % (/ + - [ ] /) . ** / // ...
c    state(*,1)   = material point status
-----------------------------^
uniFiber(1).f(18): error #5082: Syntax error, found IDENTIFIER 'STATE' when expecting one of: ( : % [ . = =>
c    state(*,2:7) = damping stresses
-----^
uniFiber(1).f(18): error #5082: Syntax error, found IDENTIFIER 'STRESSES' when expecting one of: :: ) ( , : * <END-OF-STATEMENT> ; . % (/ + - [ ] /) . ** / // ...
c    state(*,2:7) = damping stresses
----------------------------^
uniFiber(1).f(19): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( : % [ . = =>
c
-^
C:\Users\HKPJ\AppData\Local\Temp\1976024.i(33): catastrophic error: Too many errors, exiting
compilation aborted for uniFiber(1).f (code 1)
TypeError: not all arguments converted during string formatting

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
沙发
发表于 2024-8-28 08:41:23 | 只看该作者
估计是续行问题引起的。根本原因可能是代码中使用tab进行缩进,但不同电脑上tab的长度不同,导致代码错位。tab改为合适长度的空格。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 02:05

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表