trcat(<span class="string">'s_'</span>,list_solid{i},<span class="string">'=s;'</span>))
0044     <span class="keyword">else</span>
0045         eval(strcat(<span class="string">'s_'</span>,list_solid{i},<span class="string">'=s_'</span>,list_solid{i-1},<span class="string">'+1;'</span>))
0046     <span class="keyword">end</span>
0047 <span class="keyword">end</span>
0048 
0049 <span class="comment">% find the number of the mother from the attachment point: 'attachment_pt'</span>
0050 <span class="keyword">