mel(ObcNodes);
0052 <span class="keyword">if</span>(report); fprintf(<span class="string">'Number of Open Boundary Nodes %d\n'</span>,nObcs); <span class="keyword">end</span>;
0053 
0054 [chk1,chk2] = size(Amp);
0055 <span class="keyword">if</span>( (nObcs-chk1)*(nComponents-chk2) ~= 0)
0056     fprintf(<span class="string">'Amp dimensions do not match!!!'</span>)
0057     fprintf(<span class="string">'nObcs %d nComponents %d\n'</span>,chk1,chk2)
0058     error(<span class="string">'bad'</span>);
0059 <span