CAD programy 4M
(inters bod1 bod2 bod3 bod4 [flag])
Najde průsečík.
Tato funkce vrací průsečík dvou přímek. Bod1 a bod2 představují koncové body první přímky. Bod 3 a bod 4 představují koncové body druhé přímky. Když se protínají dvě čáry, vrátí se průsečík. Pokud se neprotínají, vrátí se nil.
Flag je volitelná: pokud není flag nil (obvykle se používá T), funkce inters provádí, jak je vysvětleno výše. Pokud je flag nil, přímky definované čtyřmi body jsou považovány za nekonečné. Inters vrací bod, ve kterém se eventuelně můžou protnout (pokud nejsou rovnoběžné čáry, v takovém případě je vrácen nil).
PŘÍKLAD
Tato funkce vrací průsečík dvou přímek. Bod1 a bod2 představují koncové body první přímky. Bod 3 a bod 4 představují koncové body druhé přímky. Když se protínají dvě čáry, vrátí se průsečík. Pokud se neprotínají, vrátí se nil.
Flag je volitelná: pokud není flag nil (obvykle se používá T), funkce inters provádí, jak je vysvětleno výše. Pokud je flag nil, přímky definované čtyřmi body jsou považovány za nekonečné. Inters vrací bod, ve kterém se eventuelně můžou protnout (pokud nejsou rovnoběžné čáry, v takovém případě je vrácen nil).
PŘÍKLAD
| Kód | Vrací |
|---|---|
| (inters '(2 3) '(2 -4) '(4 1) '(0 1)) | (2 1) |
| (inters '(2 3) '(2 -4) '(4 1) '(3 1)) | nil |
| (inters '(2 3) '(2 -4) '(4 1) '(3 1) nil) | (2 1) |
| (inters '(2 3) '(2 -4) '(4 1) '(3 1) T) | nil |
| (inters '(1 1) '(3 1) '(1 0) '(3 0) nil) | nil |