找回密码
 注册
Simdroid-非首页
查看: 87|回复: 3

[子程序] umat中求解主应力及其主方向函数

[复制链接]
发表于 2018-3-15 21:02:43 | 显示全部楼层 |阅读模式 来自 北京
我看了帮助文件,其中是用 SPRIND(S,PS,AN,LSTR,NDI,NSHR) 其中,PS(I), I=1,2,3 为三个主应力的返回值
主方向的返回值 AN(K1,I), I=1,2,3  The direction cosines of the principal directions corresponding to PS(K1).
但是我用在umat中主应力是有值的,方向却返不回值,这是为什么呢
以下是我的程序
lstr=2
call sprind(e,ps,an,lstr,ndi,nshr)
l1=an(1,1)
m1=an(1,2)
n1=an(1,3)
l2=an(2,1)
m2=an(2,2)
n2=an(2,3)
l3=an(3,1)
m3=an(3,2)
n3=an(3,3)
 楼主| 发表于 2018-3-16 18:23:08 | 显示全部楼层 来自 北京
Simdroid开发平台
有没有人知道为什么
回复 不支持

使用道具 举报

 楼主| 发表于 2018-3-19 16:41:21 | 显示全部楼层 来自 北京
已解决,Fortran规定变量的第一个字母是I-N中的字母时,该变量为整型变量,其他字母时为实型变量。这是隐性说明的。可以通过implicit none语句去掉这条规则。
我在使用变量的时候没有注意这个问题
回复 不支持

使用道具 举报

发表于 2018-4-13 17:04:03 | 显示全部楼层 来自 天津
感谢楼主:lol
回复 不支持

使用道具 举报

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

本版积分规则

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-3-28 22:26 , Processed in 0.026776 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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