integer*4 jzsn real*8 cx,cy,cz integer:: statue=0 real*8 Mbl(3*bn),Eqbl(bn*3,bn*3),Stc(3*sn) real*8 Mv(bn*3),Mb(bn*3,(sn-jzsn)*3),vbl(sn*3),Ml(bn*3) real*8 det,Mte(bn*3) real*8 AEqbl(bn*3,bn*3) 什么意思
时间: 2023-03-25 10:03:37 浏览: 192
潮流计算+二阶锥松弛+对偶形式的matlab源码+对偶理论说明文档.zip
这是一段 Fortran 代码,定义了一些变量和数组。其中 integer*4 jzsn 定义了一个 4 字节整型变量 jzsn,real*8 cx,cy,cz 定义了三个 8 字节实型变量 cx、cy、cz。数组 Mbl、Eqbl、Stc、Mv、Mb、vbl、Ml、Mte、AEqbl 分别定义了不同维度和类型的实型数组。statue 则定义了一个整型变量,初始值为 。
阅读全文