PACK TRIMMING CURVE

PPTC

CALL SEQUENCE

CALL PPTC	(INITFL, LOOPFL, TACRI, LDR, DATREC, TCVF, TSORD, TNKA, TKNOTS, TPARL, TRTYPE, NTCCP, TPWUA, TPWVA, TPWWA, MLDR, ERRIND, TCLDR, TCREC)

INPUT PARAMETERS

LOGICAL INITFL

Data record initialization flag

LOGICAL LOOPFL

Data record new loop flag

INTERGER TACRI

Trimming curve appoximation criteria type

INTERGER LDR

Length of data record array for trimming curve approximation criteria

CHARACTER*80 DATREC (LDR)

Data record for trimming curve approximation criteria 37

INTERGER TCVF

Trimming curve visibility flag (POFF, PON)

INTERGER TSORD

Trimming curve spline order

INTERGER TNKA

Number of spline knots in array

REAL TKNOTS (*)

Trimming curve spline knots

REAL TPARL (2)

Trimming curve parameter range limits

INTERGER TRTYPE

Trimming curve spline rationality (PRAT, PNRAT)

INTERGER NTCCP

Number of trimming curve spline control points

REAL TPWUA (NTCCP)

Trimming curve U control point components

REAL TPWVA (NTCCP)

Trimming curve V control point components

REAL TPWWA (NTCCP)

Trimming curve W control point components

(unused if trimming curve is non-rational)

INTERGER MLDR

Dimension of trimming curve data record

OUTPUT PARAMETERS

INTERGER ERRIND

Error indicator (zero if no error)

INTERGER TCLDR

Total number of array elements used in TCREC

CHARACTER*80 TCREC (MLDR)

Trimming curve data record

EFFECT

Packs the input parameters in the output record. This record is used as input by NON-UNIFORM
B-SPLINE SURFACE 3 and NON-UNIFORM B-SPLINE SURFACE 3 WITH DATA.

UNPACK TRIMMING CURVE can be used to extract datas from this data record.

SEE ALSO

unpack trimming curve, non-uniform b-spline surface 3 with data