File mttroot/mtt/bin/trans/m/mtt_zeroswitches.m artifact ac6908b24d part of check-in 2e8cbaac42

function [x] = mtt_zeroswitches(x,Nx,open)
  I_open = nozeros(open.*[1:Nx]'); # Indices of open switches
  x(I_open) = 0.0;		   # Open switches have zero states
endfunction;