|
Action:
|
Test whether the geometry of a tolerant edge is G1 or not.
|
|
|
Filename:
|
intr/intr_scm/tmchk_scm.cxx
|
|
|
Syntax:
|
(tm-check:tedge-crv-non-g1 edge)
|
|
|
Arg Types:
|
edge
|
tedge
|
|
|
Returns:
|
(tm-chk-info ...)
|
|
|
Errors:
|
Argument is not a
TEDGE.
|
|
|
Description:
|
Returns as
tm-check:tm-bad-topology would if the edge is not a
TEDGE. Otherwise it checks the edge geometry for being G1. If it is not, a list containing a
tm-chk-info of derived type
tedge_crv_non_g1 is returned (and
tm-chk-info:edge-param gives the parameter of the problem). If the geometry is G1, an empty list is returned.
|
|
|
edge is an argument of type
TEDGE for which the geometry is tested for G1 continuity.
|
|
|
Example:
|
; tm-check:tedge-crv-non-g1
|
|
; Check to see if the curve is G1 or not.
|
|
(define b (solid:block (position 0 0 0)
|
|
|
(position 10 10 10)))
|
|
;; b
|
|
(define e (car (tolerant:fix (car
|
|
|
(entity:edges b)))))
|
|
;; e
|
|
(tm-check:tedge-crv-non-g1 e)
|
|
;; ()
|
|
; geometry is valid
|