Talk:Find the intersection of two lines: Difference between revisions
Content added Content deleted
m (→a REXX version of a REXX version: included comments that were added to REXX version 2, added more comments.) |
Walterpachl (talk | contribs) m (→a REXX version of a REXX version: typo) |
||
Line 27: | Line 27: | ||
say iSect( 0 0 3 3 0 1 6 7 ) |
say iSect( 0 0 3 3 0 1 6 7 ) |
||
say iSect( 0 0 3 3 8 8 8 8 ) |
say iSect( 0 0 3 3 8 8 8 8 ) |
||
exit /* ═══a═══ ═══b═══ ═══c═══ |
exit /* ═══a═══ ═══b═══ ═══c═══ ═══d═══ stick a fork in it, we're all done. */ |
||
/*──────────────────────────────────────────────────────────────────────────────────────*/ |
/*──────────────────────────────────────────────────────────────────────────────────────*/ |
||
iSect: procedure; parse arg xa ya xb yb xc yc xd yd |
iSect: procedure; parse arg xa ya xb yb xc yc xd yd |