/>(<font color="#6959cf"><strong id='bold35603'
>define</strong></font> (<font color="#6959cf"><strong id='bold35605'
>make-point</strong></font><font color="#00cf00"><strong id='bold35607'
>::s-point_2d*</strong></font> x<font color="#00cf00"><strong id='bold35609'
>::double</strong></font> y<font color="#00cf00"><strong id='bold35611'
>::double</strong></font>)
   (s-point_2d* x y))<br/><br/>(<font color="#6959cf"><strong id='bold35613'
>define</strong></font> (<font color="#6959cf"><strong id='bold35615'