-- File: IntSurf_LineOn2S.cdl -- Created: Mon Feb 22 12:45:55 1993 -- Author: Jacques GOUSSARD -- ---Copyright: Matra Datavision 1993 class LineOn2S from IntSurf ---Purpose: inherits TShared from MMgt uses PntOn2S from IntSurf, SequenceOfPntOn2S from IntSurf raises OutOfRange from Standard is Create returns mutable LineOn2S from IntSurf; Add(me: mutable; P: PntOn2S from IntSurf) ---Purpose: Adds a point in the line. ---C++: inline is static; NbPoints(me) ---Purpose: Returns the number of points in the line. returns Integer from Standard ---C++: inline is static; Value(me; Index: Integer from Standard) ---Purpose: Returns the point of range Index in the line. returns PntOn2S from IntSurf ---C++: inline ---C++: return const& raises OutOfRange from Standard --- The exception OutOfRange is raised when Index <= 0 or -- Index > NbPoints. is static; Reverse(me: mutable) ---Purpose: Reverses the order of points of the line. ---C++: inline is static; Split(me: mutable;Index: Integer from Standard) ---Purpose: Keeps in the points 1 to Index-1, and returns -- the items Index to the end. returns mutable LineOn2S from IntSurf raises OutOfRange from Standard --- The exception OutOfRange is raised when Index <= 0 or -- Index > NbPoints. is static; Value(me: mutable; Index: Integer from Standard; P: PntOn2S from IntSurf) ---Purpose: Replaces the point of range Index in the line. raises OutOfRange from Standard --- The exception OutOfRange is raised when Index <= 0 or -- Index > NbPoints. ---C++: inline is static; SetUV(me: mutable; Index: Integer from Standard; OnFirst: Boolean from Standard; U,V: Real from Standard) ---Purpose: Sets the parametric coordinates on one of the surfaces -- of the point of range Index in the line. ---C++: inline raises OutOfRange from Standard --- The exception OutOfRange is raised when Index <= 0 or -- Index > NbPoints. is static; Clear(me: mutable) ---C++: inline is static; InsertBefore(me:mutable; I: Integer from Standard; P: PntOn2S from IntSurf) is static; RemovePoint(me:mutable; I: Integer from Standard) is static; fields mySeq: SequenceOfPntOn2S from IntSurf; end LineOn2S;