
>print-point</strong></font> p<font color="#00cf00"><strong id='bold35617'
>::s-point_2d*</strong></font>)
   (print_point_2d p))<br/><br/>(<font color="#6959cf"><strong id='bold35619'
>define</strong></font> (<font color="#6959cf"><strong id='bold35621'
>point?</strong></font> obj<font color="#00cf00"><strong id='bold35623'
>::obj</strong></font>)
   (s-point_2d*? obj)
   obj)
</pre>
</td></tr>
</tbody></table></center>

<code id='code28778'
>makelib.scm</code>:
We want our library to be composed of the w