sci_set_multi_currents.sci

来自「用来实现三维阻抗及光学断层成像重建的matlab程序」· SCI 代码 · 共 21 行

function [stk,txt,top]=sci_set_multi_currents()
RHS=[]
for k=1:rhs
  RHS=[stk(top)(1),RHS]
  top=top-1
end
top=top+1
//  w(i,1) is the ith output argument type
//  w(i,2) is the ith output argument row dimension
//  w(i,2) is the ith output argument column dimension
w=['?','size(Ib,2)','1'
'?','?','1']
if lhs==1 then
  stk=list('set_multi_currents'+rhsargs(RHS),'0',w(1,1),w(1,2),w(1,3))
else
  stk=list()
  for k=1:lhs
    stk(k)=list('set_multi_currents'+rhsargs(RHS),'-1',w(k,1),w(k,2),w(k,3))
  end
end