[Krieger]

Как создать функцию с необязательным вводом параметра? Например также как у функции
(inters pt1 pt2 pt3 pt4 [onseg])
Т.е. здесь вот этот onseg можно не вводить и он будет приянят "по умолчанию" как "T".

[ShaggyDoc]

В Lisp нельзя сделать свою функцию с переменным количеством аргументов. Такие встроенные функции написаны на других языках.

Но один или несколько аргументов могут быть списками. А в списке может быть сколько угодно элементов. Тогда такой аргумент анализируется внутри функции.

И не забываем, что аргумент может имет значение NIL. Это внутри функции можно проверить и присвоить какое-то значение по умолчанию.

Например:

Код:

[Выделить все]

 (defun my_inters pt1 pt2 pt3 pt4 onseg () 
 (if (null onseg) (setq onseg T))
 (inters pt1 pt2 pt3 pt4 onseg)
)

[Krieger]

Жаль. Спасибо.