iwtry 发表于 2004-9-1 21:43:59

【求助】问个低级的问题

想用MODULE声明一些常量,但是为什么不能声明常量数租?

kuangtq 发表于 2004-9-2 09:09:00

回复: 【求助】问个低级的问题

在MODULE中声明常量很简单,但常量数组我通常是在模块中声明,在程序中赋值。
比如:
在模块中声明
  MODULE DATA_MODULE
                                ......
    DOUBLE PRECISION, PARAMETER :: LENGTH=0.1      ! 计算区域长度(取得是1/4平板)
    DOUBLE PRECISION, PARAMETER :: WIDTH=0.12      ! 计算区域宽度
    DOUBLE PRECISION, PARAMETER :: HALF_THICKNESS=0.0018  ! 矩形型腔半高(单位: m )
    DOUBLE PRECISION, PARAMETER :: RADIUS=0.004      ! 气道半径(单位: m )
    DOUBLE PRECISION, PARAMETER :: PI=3.1415926      
    ......
    DOUBLE PRECISION TRI_ELE_STIF(3, 3)            ! 三角形单元刚度矩阵
                                ......
  END MODULE
在主程序中给数组赋值

iwtry 发表于 2004-9-2 19:11:50

回复: 【求助】问个低级的问题

有点明白了,谢谢~~
页: [1]
查看完整版本: 【求助】问个低级的问题