 typ==8, <span class="comment">% DIPOLE EQUATORIAL</span>
0048     mess2=sprintf(<span class="string">'Dipol-Dipol-Equatorial NOT yet supported!'</span>);
0049     <span class="keyword">return</span>;
0050 <span class="keyword">end</span>
0051 <span class="keyword">if</span> (typ==12)||(typ==13), <span class="comment">% CROSS BORHOLE</span>
0052     <span class="comment">%mess2=sprintf('Cross-Borehole NOT yet supported!');</span>
0053     <span class="comment">%return;</span>
0054     surfel=fgetl(input);
0