
注冊(cè)
/
登錄










local variables real*8 h1(unit1, 1), c1(unit1, 1), h2(unit2, 1), c2(unit2, 1), + h1_seq(unit1, seq_length) real*8 input1(dim_x, 1), input2(unit1, 1) !

real, dimension(ntens,ntens) :: Iddsdde real, dimension(ntens,2*ntens) :: aug real, dimension(ntens) :: DSTRESS1 real, dimension(ntens) :: STRESS1 C 調(diào)試專用


跳至頁(yè)
TOP