Phoenics网上培训

phoenics · 发表于 2003-10-14 11:46:41

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

x

[这个贴子最后由webmaster在 2003/10/14 03:16pm 第 1 次编辑]

见下面帖子：

phoenics · 发表于 2003-10-14 11:52:48

ground 的使用
在Q1 文件 group 7中有
enul=grnd （这句的意思就是 enul的内容到 ground.for中找)
ground.for见下面.

phoenics · 发表于 2003-10-14 11:58:19

在 ground.for中 group9 section 6 中,加入下面程序,编译ground.for,连接EARTH,
就可以计算了(private earth)
C * ------------------- SECTION  6 ---------------------------
C For ENUL.LE.GRND--- reference laminar kinematic viscosity
C                                                 Index VISL
C    Property name: PRPT01
   IF(ISTEP.GE.1    .AND.ISTEP.LE.LSTEP ) THEN
   IF(IZ.GE.1    .AND.IZ.LE.NZ    ) THEN
   LFVISL =L0F(AUX(VISL  ))
   LFTEMP=L0F(INAME('TEMP  '))
   DO 90601 IX=IXF    ,IXL
      IADD=NY*(IX-1)
   DO 90601 IY=IYF    ,IYL
      I=IY+IADD
   L0VISL=LFVISL+I
   L0TEMP=LFTEMP+I
90601 F(L0VISL  )=1.0000E-03*EXP(-1.6000E+00*(F(L0TEMP)-0))
   ENDIF
   ENDIF
   RETURN
97 CONTINUE

phoenics · 发表于 2003-10-14 11:59:47

把问题提出来,有典型的问题,一起来完成.

galary1979 · 发表于 2003-10-14 16:05:51

先谢谢PHOENICS，我觉得这样的努力需要靠我们大家，多多支持啊！！

mix · 发表于 2003-10-15 22:48:49

楼主很尽力
我们也要努力学啊

mix · 发表于 2003-10-21 11:22:50

LFISPH LFVISL L0ISPH L0VISL这些变量的说明在帮助里哪能找到?

galary1979 · 发表于 2003-10-21 16:03:39

下面引用由mix在 2003/10/21 11:22am 发表的内容：
LFISPH LFVISL L0ISPH L0VISL这些变量的说明在帮助里哪能找到?

应该不是一个变量，而是与VISL，isph有关的咚咚的吧，不过我也没有看明白这一段，还是请PHOENICS解释一下好么？？

phoenics · 发表于 2003-10-22 17:33:51

在那里的东东？具体到问题也许能搞清楚。

galary1979 · 发表于 2003-10-22 21:10:34

就是你在上面贴的帖子里面的咚咚啊
IF(ISTEP.GE.1    .AND.ISTEP.LE.LSTEP ) THEN
   IF(IZ.GE.1    .AND.IZ.LE.NZ    ) THEN
   LFVISL =L0F(AUX(VISL  ))
   LFTEMP=L0F(INAME('TEMP  '))
   DO 90601 IX=IXF    ,IXL
   IADD=NY*(IX-1)
   DO 90601 IY=IYF    ,IYL
   I=IY+IADD
   L0VISL=LFVISL+I
   L0TEMP=LFTEMP+I
90601 F(L0VISL  )=1.0000E-03*EXP(-1.6000E+00*(F(L0TEMP)-0))
   ENDIF
   ENDIF

phoenics · 发表于 2003-10-23 08:44:39

这只是一个临时变量呀。

galary1979 · 发表于 2003-10-23 09:32:53

请问你上面讲到的编译GROUND.for是怎么进行的？是需要用户自己在FORTRAN中编译吗？我一直不明白这个GROUND是怎么弄的，还有和PLANT的关系什么的，所以还晕着呢！！^_^，请指教！
谢谢phoenics！！

galary1979 · 发表于 2003-10-23 09:45:43

我用了面板上的compile命令，但是我的GROUND文件好像不能编译，出错信息是没有找到系统路径

phoenics · 发表于 2003-10-23 09:52:44

首先要安装digital visual fortran 5.0以上版本程序。
然后在PHOENICS VR-EDITOR 里面按 COMPILE GROUND 按钮，再BUILD EARTH 按钮。RUN PRIVATE EARTH。
PLANT就是在写GROUND，用户写表达式，PHOENICS帮你写FORTRAN程序并插入到GROUND里面。

galary1979 · 发表于 2003-10-23 16:10:46

我装的是digital visual fortran 5.0,不过还是不行,在安装上是不是需要注意什么?比如说要是不是要装在同一个目录下什么的?
我试过了,好像还是说找不到系统路径的问题,不知道phoenics有没有碰见这样的问题呢?我以前好像也出现过这样的问题,后来是将这两个都装在系统盘才好的,你能解释一下这个原因吗?
也就是说我们只是需要在PLANT中写入自己的东西,然后在GROUND中就不用自己去添加任何东西的,不知道这样的理解对吗?

		自动登录	找回密码
密码			注册

Phoenics网上培训

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。