0146     <span class="keyword">if</span> istopo,
0147        nrtopo=fscanf(input,<span class="string">'%d\n'</span>,1);
0148        <span class="keyword">for</span> nt=1:nrtopo,
0149           zeile=strrep(fgetl(input),<span class="string">','</span>,<span class="string">' '</span>);
0150           N.topo(nt,1:2)=sscanf(zeile,<span class="string">'%f'</span>,2);
0151        <span class="keyword">end</span>
0152 <span class="comment">%        N.topo=fscanf(input,'%f',[2 nrtopo])';</span>
0153     <span class