home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l216 / 1.ddi / GDOMS.PRO < prev    next >
Encoding:
Prolog Source  |  1987-03-23  |  1.0 KB  |  31 lines
  1. /***************************************************************
  2.      Turbo Prolog Toolbox
  3.      (C) Copyright 1987 Borland International.
  4. ***************************************************************/
  5.  
  6. domains
  7.  
  8.   vrow,vcol,vradius,vwidth,vheigth,size= integer  /*VIRTUAL COORDINATES*/
  9.   width,height    = integer  /* TEXT COORDINATES:  ROW, COL*/
  10.   increment,    /*Used in arc-predicate*/
  11.   color,    /*Any foreground or background color*/
  12.   kind,        /*Select function. Value range 0 and upwards*/
  13.   mode,        /*Graphics mode. 1,2,3,4 or 5*/
  14.   fill,        /*Fill or no fill*/
  15.   degrees,    /*Angle in degrees 0 - 359*/
  16.   palette    = integer /*Palette number*/
  17.   filename    = string
  18.   bar = bar(vheigth,string,color,color)  /*value,label,Framecolor,FillColor*/
  19.       ; space    
  20.   barlist=bar*
  21.   barratio,theta,factor = real /*All used in BarChart*/
  22.  
  23.   x,y=real /* SUBSTITUTE TO INTEGER TO OPTIMIZE SPEED*/
  24.   point=p(x,y)
  25.   drawing=point*
  26.   d=d(color,drawing)
  27.   drawings=d*
  28.   ScaleNo=integer
  29.   xmarker = marker(x,symbol,integer)
  30.   ymarker = marker(y,symbol,integer)
  31.