Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
gendl
gendl
Commits
8b754bc7
Commit
8b754bc7
authored
Jan 31, 2013
by
Dave Cooper
Browse files
Issues 61, 63.
parent
8729d872
Changes
2
Hide whitespace changes
Inline
Side-by-side
regression/issues/source/issue-65.lisp
View file @
8b754bc7
(
in-package
:gdl-user
)
(
define-object
manifold-sample
(
base-object
)
:objects
((
box
:type
'box-solid
:width
2
:length
2
:height
2
)
:width
2
:length
2
:height
2
)
(
merged
:type
'merged-solid
:other-brep
(
the
box
:face-breps
:list-elements
))
(
merged2
:type
'merged-solid
:other-brep
(
the
box
:face-breps
:list-elements
)
:make-manifold?
t
)))
\ No newline at end of file
(
"merge trial"
merged2
:type
'merged-solid
:other-brep
(
the
box
:face-breps
:list-elements
)
:make-manifold?
t
)))
surf/source/brep.lisp
View file @
8b754bc7
...
...
@@ -541,6 +541,18 @@ and moments for the brep. The moments are labeled as: :area-static-moments, :are
(
&key
(
tolerance
(
the
adaptive-tolerance
)))
(
brep-compute-precise-properties
*geometry-kernel*
self
tolerance
))
(
"Plist with keys: :area, :volume, :mass, :moments. Returns the area, volume, mass,
and moments for the brep. The moments are labeled as: :area-static-moments, :area-moments-of-inertia,
:area-products-of-inertia, :area-second-moment-about-coordinate-axii, :volume-static-moments,
:volume-moments-of-inertia, :volume-products-of-inertia, and :volume-second-moment-about-coordinate-axii.
:&key ((tolerance (the adaptive-tolerance)) \"Controls how precisely the properties are computed\")"
precise-properties-plist
(
&key
(
tolerance
(
the
adaptive-tolerance
)))
(
multiple-value-bind
(
area
volume
mass
moments
)
(
brep-compute-precise-properties
*geometry-kernel*
self
tolerance
)
(
list
:area
area
:volume
volume
:mass
mass
:moments
moments
)))
(
"Plist with keys: :area, :volume, :barycenter. Returns the approximate area, volume,
and barycenter (center of mass) for the brep. These are computed with tessellation techniques,
which may be less precise than the analytic techniques used in precise-properties, but should
...
...
@@ -550,7 +562,7 @@ be faster to compute and exhibit more stability.
properties
(
&key
(
edge-tess-tolerance
(
the
adaptive-tolerance
))
(
face-tess-tolerance
(
the
adaptive-tolerance
)))
(
brep-compute-properties
*geometry-kernel*
self
:edge-tess-toleance
edge-tess-tolerance
(
brep-compute-properties
*geometry-kernel*
self
:edge-tess-tole
r
ance
edge-tess-tolerance
:face-tess-tolerance
face-tess-tolerance
))
(
"Number. Area covered by the faces of the brep.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment