 id='code28744'
>cpoint.c</code>:<center id='center28750'
><table cellspacing="0" class="color" cellpadding="0" width="95%"><tbody>
<tr><td bgcolor="#ffffcc"><pre class="prog" id='prog28748'
>#include &lt;stdio.h&gt;
#include <font color="red">&quot;cpoint.h&quot;</font><br/><br/>int print_point_2d( struct point_2d *pt ) {
   printf( <font color="red">&quot;&lt;point-2d: %g, %g&gt;&quot;</font>, pt-&gt;x, pt-&gt;y );
}
</pre>
</td></tr>
</tbody></table></center>

<code id='code28751'
>spoint.scm</code>:<cen