(in-package "MAXIMA")


(clines "#include \"drawps.hc\"")

(defentry sort-ngons  (object object int) (int "sort_ngons"))
(progn 
(push '((long-float t) t #.(compiler::flags compiler::set) "(((#1)->sm.sm_fp ? fprintf((#1)->sm.sm_fp,\"%.3f\",(#0)): 0),Cnil)") (get 'print-pt1 'compiler::inline-unsafe))
(push '((long-float t) t #.(compiler::flags compiler::set) "(((#1)->sm.sm_fp ? fprintf((#1)->sm.sm_fp,\"%.3f\",(#0)): 0),Cnil)") (get 'print-pt1 'compiler::inline-unsafe))
)