Find the intersection of a line with a plane: Difference between revisions

Content deleted Content added
Walterpachl (talk | contribs)
→‎{{header|REXX}}: beautification of plane and linedefinition
Walterpachl (talk | contribs)
m →‎version 2: minor corrections
Line 149:
pd=a'*x'
End
pd=pd
pd=pd||mk2('y',b)||mk2('z',c)'='d
pd=pd '+' mk2('y',b)
pd=pd||mk2( 'y+',b)|| mk2('z',c) '=' d
 
Say 'Plane definition:' pd
Line 195 ⟶ 197:
res=res||v1'*t'
Otherwise Do
If res=v'x=' Then Do
If v1vv=1 Then
res=res||'t'
Else