abaqus fortran子程序怎么同时加x和z方向的体力 收藏 分享

悬赏金币：2 h08x24h08 时间：2018-12-28 14:44

  if( jltyp .eq. 3 ) then 

          do kk = 1, nblock  
        value(kk) =-tz
       end do
       end if 
   if( jltyp .eq. 1 ) then  
          do k = 1, nblock 
        value(k) =-tx
   end do
       end if 
tx和tz可以是常数，这样能施加上x和z方向的体力吗？谢谢解惑！

(其中 jltyp .eq. 3 表示z方向体力， jltyp .eq. 1 表示x方向体力)