point.sml working