| Object: extended-surface (The :surf Package) |
| Mixins: surface |
Description
Extends a surface to a curve, so that curve will become one of the new boundaries for the surface. Continuity is controlled via options. Note that in the example, extended and extended-2 do not give a smooth transition to the extended part of the surface because the original surface is only degree 1 in the direction of extension.| Input Slots (required) | |
| curve gdl curve object | |
The curve to which the surface should be extended. | |
| surface gdl surface object | |
The surface to be extended. | |
| Input Slots (optional) | |
| brep-tolerance [from surface] number | |
Overall tolerance for the internal brep representation of this surface. Defaults to nil. Note that a value of nil indicates for SMLib a value of 1.0e-05 of the longest diagonal length of the brep. | |
| built-from [from surface] gdl surface | |
Specify this if you want this surface to be a clone of an existing surface (note - this uses a shared underlying surface object, it does not make a copy) | |
| color-decimal [from geometry-kernel-object-mixin] vector of three real numbers | |
The RGB color of this object as imported from an external format (e.g. IGES) or as specified in :display-controls. Defaults to the foreground color specified in *colors-default*. This message should not normally be overridden in user application code. | |
| continuity | |
Keyword symbol, if deformation-param is given this can be one of :c1, :c2, or :cmax, and if deformation-param is not given this can be one of :g1 or :cmax. Default is :c1 if deformation-param is given and :g1 if deformation-param is not given. | |
| deformation-param number, either a u or a v surface parameter | |
This value, if given, controls how far inward from the affected boundary the surface is modified. If (the direction) is :u, then this will be a U parameter, and likewise if (the direction) is :v, then this will be a V parameter. Default is nil which indicates no specific control over any deformation. | |
| direction keyword symbol, one of :u or :v | |
The direction of extension. Note that if deformation-param is given, it will be a U parameter if this input :u, and a V parameter if this input is :v. Default is :u. | |
| end-caps-on-brep? [from surface] boolean | |
Indicates whether to attempt automatic endcaps on conversion of this surface to a brep. Note that this might change in future to a keyword value for :min, :max, or :both to provide more control. | |
| hidden? [from vanilla-mixin*] boolean | |
Indicates whether the object should effectively be a hidden-object even if specified in :objects. Default is nil. | |
| iges-level [from geometry-kernel-object-mixin] integer | |
Synonym for the layer. | |
| image-file [from base-object] pathname or string | |
Points to a pre-existing image file to be displayed instead of actual geometry for this object. Defaults to nil | |
| layer [from geometry-kernel-object-mixin] integer | |
The primary IGES-compatible level (layer) on which this object resides. Defaults to the first of the levels. This slot can be overridden in user code to specify a new layer which will be written out when this object is exported with the IGES output-format. | |
| levels [from geometry-kernel-object-mixin] list of integers | |
The IGES-compatible levels (layers) on which this object resides. GDL does not currently support writing out multiple levels (layers) through the IGES writer ; only the first of these will be output if the object is exported with the IGES output-format (please contact Genworks if you need all levels (layers) to be written out). | |
| obliqueness [from base-object] 3x3 orthonormal matrix of double-float numbers | |
This is synonymous with the orientation. | |
| onclick-function [from base-object] lambda function of zero arguments, or nil | |
If non-nil, this function gets invoked when the user clicks the object in graphics front-ends which may or may not support this functionality (see viewport-html-div). | |
| rational? [from surface] boolean | |
Returns non-nil iff this surface is rational, i.e. all weights are not 1. | |
| root [from vanilla-mixin*] gdl instance | |
The root-level node in this object's ``tree'' (instance hierarchy). | |
| safe-children [from vanilla-mixin*] list of gdl instances | |
All objects from the :objects specification, including elements of sequences as flat lists. Any children which throw errors come back as a plist with error information | |
| sew-and-orient-brep? [from surface] boolean | |
Indicates whether brep representation should undergo a sew-and-orient operation. Defaults to nil. | |
| strings-for-display [from vanilla-mixin*] string or list of strings | |
Determines how the name of objects of this type will be printed in most places. This defaults to the name-for-display (generally the part's name as specified in its parent), followed by an index number if the part is an element of a sequence. | |
| tessellation-parameters [from surface] plist of keyword symbols and numbers | |
This controls tessellation for the brep of this surface. The keys are as follows:
(list
:min-number-of-segments *tess-min-number-of-segments*
:max-3d-edge-factor *tess-max-3d-edge-factor*
:min-parametric-ratio *tess-min-parametric-ratio*
:max-chord-height *tess-max-chord-height*
:max-angle-degrees *tess-max-angle-degrees*
:min-3d-edge *tess-min-3d-edge*
:min-edge-ratio-uv *tess-min-edge-ratio-uv*
:max-aspect-ratio *tess-max-aspect-ratio*)
| |
| tolerance [from surface] number | |
Approximation tolerance for display purposes. | |
| visible-children [from vanilla-mixin*] list of gdl instances | |
Additional objects to display in Tatu tree. Typically this would be a subset of hidden-children. Defaults to NIL. | |
| which-end keyword symbol, one of :start or :end | |
Default is :start. | |
| Input Slots (optional, defaulting) | |
| center [from base-object] 3d point | |
Indicates in global coordinates where the center of the reference box of this object should be located. | |
| display-controls [from base-object] plist | |
May contain keywords and values indicating display characteristics for this object. The following keywords are recognized currently:
| |
| isos [from surface] plist with keys :n-u and :n-v | |
The number of isoparametric curves to be displayed in each direction. This value comes from the value of :isos on the display-controls if that exists, and defaults to *isos-default* otherwise. | |
| orientation [from base-object] 3x3 matrix of double-float numbers | |
Indicates the absolute Rotation Matrix used to create the coordinate system of this object. This matrix is given in absolute terms (i.e. with respect to the root's orientation), and is generally created with the alignment function. It should be an orthonormal matrix, meaning each row is a vector with a magnitude of one (1.0). | |
Examples
(in-package :gdl-user)
(define-object extended-surface-test (base-object)
:computed-slots
((regression-test-data (list (multiple-value-list (the extended b-spline-data))
(multiple-value-list (the extended-2 b-spline-data))
(multiple-value-list (the extended-3 b-spline-data))
(multiple-value-list (the extended-4 b-spline-data))))
(display-list-objects (list (the loft)
(the extended)
(the extended-2))))
:objects
((test3 :type 'linear-curve
:start (make-point 0 0 0)
:end (make-point 10 0 0))
(test4 :type 'linear-curve
:start (make-point 0 10 0)
:end (make-point 10 10 0))
(mid-1 :type 'linear-curve
:start (make-point 0 5.0 1)
:end (make-point 10 5.0 1))
(mid-2 :type 'linear-curve
:start (make-point 0 8.0 1)
:end (make-point 10 8.0 1))
(bridge-1 :type 'b-spline-curve
:control-points (list (make-point 0 0 0)
(make-point -2 5.0 3)
(make-point -2 8.0 3)
(make-point 0 10 0)))
(bridge-2 :type 'b-spline-curve
:control-points (list (make-point 10 0 0)
(make-point 12 5.0 5)
(make-point 12 8.0 5)
(make-point 10 10 0)))
(bridge-3 :type 'b-spline-curve
:control-points (list (make-point 0 -1 0)
(make-point 3 -1 5)
(make-point 7 -1 5)
(make-point 10 -1 0)))
(loft :type 'lofted-surface
:curves (list (the test3) (the mid-1)
(the mid-2) (the test4)))
(extended :type 'extended-surface
:display-controls (list :color :red :line-thickness 2)
:surface (the loft)
:curve (the bridge-1)
:direction :v
:which-end :start)
(extended-2 :type 'extended-surface
:display-controls (list :color :green :line-thickness 2)
:surface (the loft)
:curve (the bridge-1)
:direction :v
:which-end :start
:deformation-param (+ (* 0.25 (- (the-child surface v-max)
(the-child surface v-min)))
(the-child surface u-min)))
(extended-3 :type 'extended-surface
:display-controls (list :color :orange
:isos (list :n-u 25 :n-v 25))
:surface (the loft)
:curve (the bridge-3)
:direction :u
:continuity :cmax
:which-end :start)
(extended-4 :type 'extended-surface
:display-controls (list :color :blue
:isos (list :n-u 25 :n-v 25))
:surface (the loft)
:curve (the bridge-3)
:direction :u
:deformation-param (+ (* 0.25 (- (the-child surface u-max)
(the-child surface u-min)))
(the-child surface u-min))
:continuity :cmax
:which-end :start)))
(generate-sample-drawing :objects (the-object (make-object 'extended-surface-test)
display-list-objects)
:projection-direction (getf *standard-views* :trimetric))
 |