-+-+-+-+-+-+-+-+ START OF PART 182 -+-+-+-+-+-+-+-+
Xextern void ptk_setstandardviewport ARGS((  Plimit3 *  vlimits,   Pviewrep3
V *  rep));
X
Xextern void ptk_poststruct ARGS((  Pint  wsid,   Pint  stid,   Pfloat  prior
Vity));
X
Xextern void ptk_postrelative ARGS((  Pint  ws,   Pint  structid,
X                               Pvpri  relpriority,   Pint  relstruct,
X                               Pint *  error));
X
Xextern void ptk_changepostpriority ARGS((  Pint  ws,   Pint  structid,
X                             Pvpri  relpriority,   Pint  relstruct,
X                             Pint *  error));
X
Xextern void ptk_inqpostpriority ARGS((  Pint  wsid,   Pint  structid,
X                                  Pfloat *  priority,   Pint *  err));
X
Xextern void ptk_copycolourtable ARGS((  Pint  sourcewsid,   Pint  destwsid))
V;
X
Xextern void ptk_copylinetable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copymarkertable ARGS((  Pint  sourcewsid,   Pint  destwsid))
V;
X
Xextern void ptk_copytexttable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copyinttable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copyedgetable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copyviewtable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copypattable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copywssttable ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_copypostedstruct ARGS((  Pint  sourcewsid,   Pint  destwsid)
V);
X
Xextern void ptk_copyhilightfilter ARGS((  Pint  sourcewsid,   Pint  destwsid
V));
X
Xextern void ptk_copyinvisfilter ARGS((  Pint  sourcewsid,   Pint  destwsid))
V;
X
Xextern void ptk_copyhlhsrmode ARGS((  Pint  sourcewsid,   Pint  destwsid));
X
Xextern void ptk_inqmaxdevicecoords ARGS((  Pint  wsid,   Pfloat *  maxdevx,
X                                     Pfloat *  maxdevy));
X
Xextern void ptk_inqmaxdevicecoords3 ARGS((  Pint  wsid,   Pfloat *  maxdevx,
X                                      Pfloat *  maxdevy,   Pfloat *  maxdevz
V));
X
Xextern void ptk_drawcolourtable ARGS((  Pint  stid,   Pint  llim,   pint  ul
Vim));
X
Xextern void ptk_arrow ARGS((  Pfloat  length,   Pfloat  width,   Ppoint3 *
V  centre,
X                        Pfloat  angle));
X
Xextern void ptk_grid ARGS((  Pint  stid));
X
Xextern void ptk_framebox ARGS((  Ppoint3 *  boxcentre,   Ppoint *  boxsize,
X             Ppoint *  framesize,   Pint  boxcolour,   Pint  edgecolour,
X             Pint  tlcolour,   Pint  brcolour));
$ CALL UNPACK [.INCLUDE]PLIBFNS.H;1 746223599
$ create 'f'
X/* types from plib.c */
X
X#ifndef _PLIBTYPE_
X#define _PLIBTYPE_
X
Xtypedef struct`20
X`7B
X  Peltype eltype;
X  Pint size;
X  Peldata eldata;
X`7D ptkselcontent;
X
X#endif
X
X/* end of plibtype.h */
$ CALL UNPACK [.INCLUDE]PLIBTYPE.H;1 978283443
$ create 'f'
X/* include file for complete PHIGS Toolkit */
X
X#ifndef _PTK_
X#define _PTK_
X
X#include "machine.h"
X
X#ifdef NURB
X
X/* include transforms and nurbs but nothing else */
X
X#include "ptktype.h"
X
X#include "trantype.h"
X
X#include "tranfns.h"
X
X#include "nurbtype.h"
X
X#include "nurbfns.h"
X
X#endif
X
X/* toolkit constants */
X
X/* toolkit types */
X
X#ifndef NURB
X
X/* include toolkit provided nurb only is not requested */
X
X#include "ptktype.h"
X
X#ifdef VMS
X#include "dectype.h"
X#endif
X
X#include "trantype.h"
X
X#include "hashtype.h"
X
X#include "plibtype.h"
X
X#include "cnstype.h"
X
X#include "menutype.h"
X
X#include "topotype.h"
X
X#include "windtype.h"
X
X/* toolkit functions */
X
X#include "tranfns.h"
X
X#include "hashfns.h"
X
X#include "plibfns.h"
X
X#include "cnsfns.h"
X
X#include "menufns.h"
X
X#include "phinfns.h"
X
X#include "topofns.h"
X
X#include "stctfns.h"
X
X#include "miscfns.h"
X
X#include "tslfns.h"
X
X#include "windfns.h"
X
X#include "perrfns.h"
X
X#include "dbugfns.h"
X
X#include "viewfns.h"
X
X#endif
X
X#ifdef PTKNURB
X
X/* include nurbs with rest of toolkit */
X
X#include "nurbtype.h"
X
X#include "nurbfns.h"
X
X#endif
X
X#endif
X
X/* end of ptk.h */
$ CALL UNPACK [.INCLUDE]PTK.H;1 406927762
$ create 'f'
X#ifndef _PTKTYPE_
X#define _PTKTYPE_
X
Xtypedef unsigned char ptkboolean;
X
X#define FALSE 0
X#define TRUE 1
X
X#define MAX(a, b) (((a) > (b)) ? (a) : (b))
X#define MIN(a, b) (((a) < (b)) ? (a) : (b))
X
X#endif
X
X/* end of ptktype.h */
$ CALL UNPACK [.INCLUDE]PTKTYPE.H;1 135663723
$ create 'f'
X/* This is file include/stctfns.h created by Extract */
X/* Date: */
X
X/*-------------------------------*/
X/*  Including from:source/library/stct.c  */
X
Xextern void ptk_structcontent ARGS((  Pint  wsid,   Pint  stid,   Pint  firs
Vtel,
X                                Pint  lastel,   Pint  elemptr,   Pint  font,
X`09`09`09        Pint *  error));
X
Xextern void ptk_inqstructcontentrange ARGS((  Pint  contentstid,   Pint *  f
Virstel,
X                                        Pint *  lastel,   Pint *  err));
X
Xextern void ptk_setstructcontentelemptr ARGS((  Pint  contentstid,   Pint  e
Vlemptr));
X
Xextern void ptk_inqstructcontentelemptr ARGS((  Pint  contentstid,
X                       Pint *  elemptr,   Pint *  err));
$ CALL UNPACK [.INCLUDE]STCTFNS.H;1 991581696
$ create 'f'
X/* This is file include/topofns.h created by Extract */
X/* Date: */
X
X/*-------------------------------*/
X/*  Including from:source/library/topo.c  */
X
Xextern void ptk_createtopology ARGS((  Pint  topid,   Pint  root,   Pint *
V  err));
X
Xextern void ptk_settopologyattrs ARGS((  Pint  topid,   Pint  txfont,
X                           Pint  linecol,   Pint  textcol,   Pint  edgecol,
X                           Pint  intcol,   Pint  htedgecol,   Pint  htintcol
V));
X
Xextern void ptk_inqtopologyattrs ARGS((  Pint  topid,   Pint *  txfont,
X                    Pint *  linecol,   Pint *  textcol,   Pint *  edgecol,
X                    Pint *  intcol,   Pint *  htedgecol,   Pint *  htintcol,
X                    Pint *  err));
X
Xextern void ptk_createtopologypaths ARGS((  Pint  topid,   Pexecreflstlst *
V  paths,
X                                      Pint *  error));
X
Xextern void ptk_settopologytype ARGS((  Pint  topid,   ptketopologytype  top
Vtype));
X
Xextern void ptk_inqtopologytype ARGS((  Pint  topid,   ptketopologytype *  t
Voptype,
X                                  Pint *  err));
X
Xextern void ptk_setnodeposition ARGS((  Pint  topid,   Pint  structid,
X                                 Ppoint *  nodept,   ptkenodetype  nodetype)
V);
X
Xextern void ptk_inqnodeposition ARGS((  Pint  topid,   Pint  structid,
X                                 Ppoint *  nodept,   Pint *  err));
X
Xextern void ptk_tidytopology ARGS((  Pint  wsid,   Pint  topid,
X              ptkenodetype  nodetype,
X              Pint  pickdev,   Pint  pickpet,   Ppickrec *  pickdatarec,
X              Pint  locdev,   Pint  locpet,   Plocrec *  locdatarec));
X
Xextern void ptk_posttopology ARGS((  Pint  wsid,   Pint  topid,   Pfloat  pr
Viority));
X
Xextern void ptk_unposttopology ARGS((  Pint  wsid,   Pint  topid));
X
Xextern ptkboolean ptk_deltopology ARGS((  Pint  topid));
X
Xextern void ptk_storetopologylayout ARGS((  FILE *  fileptr,   Pint  topid))
V;
X
Xextern void ptk_restoretopologylayout ARGS((  FILE *  fileptr,   Pint  topid
V));
X
Xextern void ptk_inqpostedtopologies ARGS((  Pint  wsid,   Pint  size,
X              Pintlst *  topids,   Pint *  totalsize,   Pint *  err));
X
Xextern void ptk_inqtopologyids ARGS((  Pint  size,   Pintlst *  topids,
X                                 Pint *  totalsize,   Pint *  err));
X
Xextern void ptk_inqtopologystructid ARGS((  Pint  topid,   Pint *  topstid,
X                                      Pint *  err));
X
Xextern void ptk_inqtopologyname ARGS((  Pint  topid,   Pint *  name,   Pint
V *  err));
X
Xextern void ptk_settopologyhighlightnode ARGS((  Pint  topid,   Pint  topnod
Vestid));
X
Xextern void ptk_inqtopologyhighlightnode ARGS((  Pint  topid,
X                                Pint *  topnodestid,   Pint *  err));
$ CALL UNPACK [.INCLUDE]TOPOFNS.H;1 170098537
$ create 'f'
X/* types from topo.c */
X
X#ifndef _TOPOTYPE_
X#define _TOPOTYPE_
X
Xtypedef enum
X`7B
X  PTKESINGLE,
X  PTKEGROUP
X`7D ptkenodetype;
X
Xtypedef enum
X`7B
X  PTKEBOXTOPOLOGY,
X  PTKESTRUCTTOPOLOGY,
X  PTKESTRUCTNETTOPOLOGY
X`7D ptketopologytype;
X
X#endif
X
X/* end of topotype.h */
$ CALL UNPACK [.INCLUDE]TOPOTYPE.H;1 1327362189
$ create 'f'
X/* This is file include/tranfns.h created by Extract */
X/* Date: */
X
X/*-------------------------------*/
X/*  Including from:source/library/tran.c  */
X
Xextern ptkboolean ptk_equal ARGS((  Pfloat  one,   Pfloat  two));
X
Xextern Ppoint ptk_point ARGS((  Pfloat  x,   Pfloat  y));
X
Xextern Ppoint3 ptk_point3 ARGS((  Pfloat  x,   Pfloat  y,   Pfloat  z));
X
Xextern Pvector ptk_vector ARGS((  Pfloat  x,   Pfloat  y));
X
Xextern Pvector3 ptk_vector3 ARGS((  Pfloat  x,   Pfloat  y,   Pfloat  z));
X
Xextern Plimit ptk_limit ARGS((  Pfloat  xmin,   Pfloat  xmax,   Pfloat  ymin
V,
X                          Pfloat  ymax));
X
Xextern Plimit3 ptk_limit3 ARGS((  Pfloat  xmin,   Pfloat  xmax,   Pfloat  ym
Vin,
X                            Pfloat  ymax,   Pfloat  zmin,   Pfloat  zmax));
X
Xextern Ppoint3 ptk_vec3topt3 ARGS((  Pvector3 *  vec));
X
Xextern Pvector3 ptk_pt3tovec3 ARGS((  Ppoint3 *  pt));
X
Xextern Pfloat ptk_dotv3 ARGS((  Ppoint3 *  v1,   Ppoint3 *  v2));
X
Xextern Pfloat ptk_dotv ARGS((  Ppoint *  v1,   Ppoint *  v2));
X
Xextern Ppoint3 ptk_crossv3 ARGS((  Ppoint3 *  v1,   Ppoint3 *  v2));
X
Xextern ptkboolean ptk_nullv3 ARGS((  Ppoint3 *  vec));
X
Xextern ptkboolean ptk_nullv ARGS((  Ppoint *  vec));
X
Xextern Pfloat ptk_modv3 ARGS((  Ppoint3 *  vec));
X
Xextern Pfloat ptk_modv ARGS((  Ppoint *  vec));
X
Xextern Ppoint3 ptk_unitv3 ARGS((  Ppoint3 *  vec));
X
Xextern Ppoint ptk_unitv ARGS((  Ppoint *  vec));
X
Xextern Ppoint3 ptk_scalev3 ARGS((  Ppoint3 *  vec,   Pfloat  scale));
X
Xextern Ppoint ptk_scalev ARGS((  Ppoint *  vec,   Pfloat  scale));
X
Xextern Ppoint3 ptk_subv3 ARGS((  Ppoint3 *  p1,   Ppoint3 *  p2));
X
Xextern Ppoint ptk_subv ARGS((  Ppoint *  p1,   Ppoint *  p2));
X
Xextern Ppoint3 ptk_addv3 ARGS((  Ppoint3 *  p1,   Ppoint3 *  p2));
X
Xextern Ppoint ptk_addv ARGS((  Ppoint *  p1,   Ppoint *  p2));
X
Xextern void ptk_unitmatrix ARGS((  Pmatrix  matrix));
X
Xextern void ptk_unitmatrix3 ARGS((  Pmatrix3  matrix));
X
Xextern void ptk_transposematrix3 ARGS((  Pmatrix3  matrix,   Pmatrix3  resul
Vt));
X
Xextern void ptk_transposematrix ARGS((  Pmatrix  matrix,   Pmatrix  result))
V;
X
Xextern void ptk_multiplymatrix3 ARGS((  Pmatrix3  matrix1,   Pmatrix3  matri
Vx2,
X                            Pmatrix3  result));
X
Xextern void ptk_multiplymatrix ARGS((  Pmatrix  matrix1,   Pmatrix  matrix2,
X                            Pmatrix  result));
X
Xextern void ptk_concatenatematrix3 ARGS((  Pcomptype  operation,
X              Pmatrix3  matrix1,   Pmatrix3  matrix2,   Pmatrix3  result));
X
Xextern void ptk_concatenatematrix ARGS((  Pcomptype  operation,
X              Pmatrix  matrix1,   Pmatrix  matrix2,   Pmatrix  result));
X
Xextern void ptk_shift3 ARGS((  Ppoint3 *  shift,   Pcomptype  operation,
X                         Pmatrix3  matrix));
X
Xextern void ptk_shift ARGS((  Ppoint *  shift,   Pcomptype  operation,
X                         Pmatrix  matrix));
X
Xextern void ptk_scale3 ARGS((  Ppoint3 *  scale,   Pcomptype  operation,
X                         Pmatrix3  matrix));
X
Xextern void ptk_scale ARGS((  Ppoint *  scale,   Pcomptype  operation,
X                         Pmatrix  matrix));
X
Xextern void ptk_rotatecs3 ARGS((  Pfloat  costheta,   Pfloat  sinetheta,
X                            ptkeaxistype  axis,   Pcomptype  operation,
X                            Pmatrix3  matrix));
X
Xextern void ptk_rotatecs ARGS((  Pfloat  costheta,   Pfloat  sinetheta,
X                            ptkeaxistype  axis,   Pcomptype  operation,
X                            Pmatrix  matrix));
X
Xextern void ptk_rotate3 ARGS((  Pfloat  rotation,   ptkeaxistype  axis,
X                          Pcomptype  operation,   Pmatrix3  matrix));
X
Xextern void ptk_rotate ARGS((  Pfloat  rotation,   ptkeaxistype  axis,
X                          Pcomptype  operation,   Pmatrix  matrix));
X
Xextern void ptk_shear3 ARGS((  ptkeaxistype  shearaxis,   ptkeaxistype  shea
Vrdir,
X                         Pfloat  shearfactor,   Pcomptype  operation,
X                         Pmatrix3  matrix));
X
Xextern void ptk_shear ARGS((  ptkeaxistype  shearaxis,   ptkeaxistype  shear
Vdir,
X                         Pfloat  shearfactor,   Pcomptype  operation,
X                         Pmatrix  matrix));
X
Xextern void ptk_rotatevv3 ARGS((  Ppoint3 *  v1,   Ppoint3 *  v2,
X                            Pcomptype  operation,
X                            Pmatrix3  matrix,   Pint * error));
X
Xextern void ptk_rotatevv ARGS((  Ppoint *  v1,   Ppoint *  v2,
X                            Pcomptype  operation,
X                            Pmatrix  matrix,   Pint * error));
X
Xextern void ptk_rotateline3 ARGS((  Ppoint3 *  p1,   Ppoint3 *  p2,
X                              Pfloat  theta,   Pcomptype  operation,
X                              Pmatrix3  matrix,   Pint * error));
X
Xextern void ptk_rotateline ARGS((  Ppoint *  p1,   Ppoint *  p2,
X                              Pfloat  theta,   Pcomptype  operation,
X                              Pmatrix  matrix,   Pint * error));
X
Xextern Ppoint4 ptk_pt3topt4 ARGS((  Ppoint3 *  point));
X
Xextern Ppoint3 ptk_pt4topt3 ARGS((  Ppoint4 *  point));
X
Xextern Ppoint4 ptk_transform4 ARGS((  Pmatrix3  matrix,   Ppoint4 *  point))
V;
X
Xextern Ppoint3 ptk_transform3 ARGS((  Pmatrix3  matrix,   Ppoint3 *  point))
V;
X
Xextern Ppoint ptk_transform ARGS((  Pmatrix  matrix,   Ppoint *  point));
X
Xextern void ptk_matrixtomatrix3 ARGS((  Pmatrix  mat,   Pmatrix3  mat3));
X
Xextern void ptk_outputmatrix3 ARGS((  FILE *  fileptr,   Pmatrix3  matrix,
X                                Pchar *  string));
X
Xextern void ptk_box3tobox3 ARGS((  Plimit3 *  box1,   Plimit3 *  box2,
X                             ptkboolean  preserve,   Pcomptype  operation,
X                             Pmatrix3  matrix,   Pint * error));
X
+-+-+-+-+-+-+-+-  END  OF PART 182 +-+-+-+-+-+-+-+-