rd">if</span> num==4,
0103            bb=zeile(4:5);
0104            mm=zeile(6:7);
0105            nn=zeile(8:9);
0106        <span class="keyword">end</span>
0107        BB=[BB;bb];MM=[MM;mm];NN=[NN;nn];
0108     <span class="keyword">end</span>
0109     istopo=fscanf(input,<span class="string">'%d'</span>,1);
0110     <span class="keyword">if</span> istopo,
0111         nrtopo=fscanf(input,<span class="string">'%d\n'</span>,1);
0112         <span class="keyword">for</span> nt=1:nrtopo,
0113             z