-+-+-+-+-+-+-+-+ START OF PART 140 -+-+-+-+-+-+-+-+
XFi(stids)p Fq(.)p 1220 497 646 2 v 1220 576 2 80 v 1234 551
Xa Fb(ptkf_setcontentvie)o(wrang)o(e)p 1864 576 V 1220 578 646
X2 v 11 652 a Fq(SUBROUTINE)h Fp(ptkf_setcontentviewrange)g
XFq(\(windid,)e(range1,)h(range2\))25 741 y(IN)50 b(INTEGER)g
XFa(windid)59 b Fq(window)10 b(identi\256er)n(.)25 791 y(IN)50
Xb(INTEGER)g Fa(range1)e Fq(start)10 b(element)i(number)n(.)25
X840 y(IN)50 b(INTEGER)g Fa(range2)e Fq(end)11 b(element)h(number)n(.)0
X909 y(This)f(function)f(sets)i(the)f(range)g(of)g(elements)h(of)f(a)h
X(structure)f(content)g(diagram)g(to)g(view)g(in)g(a)g(CONTENT)h(window)m(.)p
X1413 1006 454 2 v 1413 1086 2 80 v 1427 1060 a Fb(ptkf_setframesiz)o(e)p
X1864 1086 V 1413 1088 454 2 v 11 1162 a Fq(SUBROUTINE)g Fp(ptkf_setframesize
V)
Xg Fq(\(windid,)e(size\))25 1250 y(IN)50 b(INTEGER)g Fa(windid)55
Xb Fq(window)10 b(identi\256er)n(.)25 1300 y(IN)50 b(REAL)119
Xb Fa(size\(2\))48 b Fq(frame)12 b(size.)0 1375 y(This)f(function)f(sets)i
X(the)f(thickness)g(of)g(the)g(window)f(frame.)16 b(The)c(x)g(and)f(y)g
X(dimensions)g(are)h(given)e(in)h(the)g(range)h(`5B0,)f(1`5D.)p
X1350 1472 517 2 v 1350 1552 2 80 v 1364 1526 a Fb(ptkf_seticonpositi)o(on)p
X1864 1552 V 1350 1554 517 2 v 11 1628 a Fq(SUBROUTINE)h Fp
X(ptkf_seticonposition)e Fq(\(windid,)g(position\))25 1716 y(IN)50
Xb(INTEGER)g Fa(windid)113 b Fq(window)11 b(identi\256er)n(.)25
X1766 y(IN)50 b(REAL)119 b Fa(position\(2\))46 b Fq(icon)11
Xb(position.)0 1841 y(This)i(function)e(sets)i(the)g(position)e(of)h(the)h
X(centre)g(of)g(the)g(window')n(s)e(icon)h(structure.)20 b(The)13
Xb(position)e(is)i(given)f(in)g(the)h(range)0 1891 y(`5B0,)e(1`5D.)p
X1449 1988 417 2 v 1449 2067 2 80 v 1464 2042 a Fb(ptkf_seticonsiz)o(e)p
X1864 2067 V 1449 2069 417 2 v 11 2143 a Fq(SUBROUTINE)h Fp(ptkf_seticonsize)
Vf
XFq(\(windid,)f(size\))25 2232 y(IN)50 b(INTEGER)g Fa(windid)55
Xb Fq(window)10 b(identi\256er)n(.)25 2282 y(IN)50 b(REAL)119
Xb Fa(size\(2\))48 b Fq(icon)10 b(size.)0 2357 y(This)h(function)f(sets)i(the
V)
Xf(size)h(of)f(the)g(window')n(s)f(icon)h(structure.)k(The)c(size)h(is)g
X(given)e(in)h(the)g(range)h(`5B0,)f(1`5D.)0 2956 y(13th)22 b(May)m(,)12
Xb(1992)626 b(241)828 b(2.01)p eop
X%%Page: 242 243
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1356 -19 510 2 v 1356 60 2 80 v 1370 35 a Fb
X(ptkf_setpositionaxis)p 1864 60 V 1356 62 510 2 v 11 136 a
XFq(SUBROUTINE)12 b Fp(ptkf_setpositionaxis)d Fq(\(windid,)h(axis\))25
X225 y(IN)50 b(INTEGER)g Fa(windid)55 b Fq(window)10 b(identi\256er)n(.)25
X275 y(IN)50 b(REAL)119 b Fa(axis\(3\))48 b Fq(axis)11 b(of)g(rotation.)0
X350 y(This)39 b(function)f(sets)h(the)g(axis)g(of)g(rotation)e(for)i
X(rotating)f(the)g(camera)k(position)37 b(using)h(the)h(function)0
X400 y Fi(ptk_rotatecameraposit)q(ion)p Fq(.)p 1327 497 540
X2 v 1327 576 2 80 v 1341 551 a Fb(ptkf_setptinte)o(resta)o(xis)p
X1864 576 V 1327 578 540 2 v 11 652 a Fq(SUBROUTINE)12 b Fp(ptkf_setptinter)o
X(estaxis)f Fq(\(windid,)f(axis\))25 741 y(IN)50 b(INTEGER)g
XFa(windid)55 b Fq(window)10 b(identi\256er)n(.)25 791 y(IN)50
Xb(REAL)119 b Fa(axis\(3\))48 b Fq(axis)11 b(of)g(rotation.)0
X866 y(This)27 b(function)f(sets)i(the)f(axis)h(of)f(rotation)f(for)h
X(rotating)e(the)j(camera)h(point)d(of)h(interest)g(using)f(the)i(function)0
X915 y Fi(ptk_rotatecameraptint)q(erest)p Fq(.)p 1346 1013 520
X2 v 1346 1092 2 80 v 1361 1066 a Fb(ptkf_settermi)o(nal)o(dat)o(a)p
X1864 1092 V 1346 1094 520 2 v 11 1168 a Fq(SUBROUTINE)12 b
XFp(ptkf_setterminaldata)e Fq(\(windid,)g(numlines,)h(txfont,)f(txcolour\))25
X1257 y(IN)50 b(INTEGER)g Fa(windid)90 b Fq(terminal)11 b(window)f
X(identi\256er)n(.)25 1306 y(IN)50 b(INTEGER)g Fa(numlines)e
XFq(number)11 b(of)g(lines)g(in)g(window)m(.)25 1356 y(IN)50
Xb(INTEGER)g Fa(txfont)103 b Fq(text)11 b(font.)25 1406 y(IN)50
Xb(INTEGER)g Fa(txcolour)65 b Fq(text)11 b(colour)n(.)0 1475
Xy(This)g(function)f(sets)h(the)g(number)h(of)e(lines)h(to)g(be)g(displayed)g
X(in)f(a)i(TERMINAL)g(window)e(and)h(which)g(text)g(font)f(and)h(colour)0
X1525 y(to)g(use.)p 1180 1622 686 2 v 1180 1701 2 80 v 1195
X1676 a Fb(ptkf_settermi)o(nal)o(\257oatfo)o(rma)o(t)p 1864
X1701 V 1180 1703 686 2 v 11 1777 a Fq(SUBROUTINE)h Fp
X(ptkf_setterminal\257oatformat)d Fq(\(windid,)h(rformat\))25
X1866 y(IN)50 b(INTEGER)193 b Fa(windid)60 b Fq(terminal)11
Xb(window)f(identi\256er)n(.)25 1916 y(IN)50 b(CHARACTER*\(*\))e
XFa(rformat)g Fq(string)10 b(giving)g(C-type)g(\257oat)i(number)f(output)e
X(style.)0 1991 y(This)15 b(function)e(sets)i(the)g(format)g(for)f(writing)f
X(\257oating-point)f(numbers)j(to)f(a)h(TERMINAL)h(window)m(.)25
Xb(The)15 b(format)g(used)0 2041 y(is)c(the)g(same)i(syntax)e(as)h(in)e(the)i
X(C)f(language.)p 1217 2138 650 2 v 1217 2217 2 80 v 1231 2192
Xa Fb(ptkf_settopologyvie)o(ware)o(a)p 1864 2217 V 1217 2219
X650 2 v 11 2293 a Fq(SUBROUTINE)h Fp(ptkf_settopologyviewar)o(ea)e
XFq(\(windid,)g(viewarea\))25 2382 y(IN)50 b(INTEGER)g Fa(windid)133
Xb Fq(window)10 b(identi\256er)n(.)25 2432 y(IN)50 b(REAL)119
Xb Fa(viewarea\(4\))47 b Fq(area)13 b(of)d(topology)g(to)g(view)m(.)0
X2507 y(This)g(function)f(sets)i(the)f(viewing)g(area)h(of)g(a)g(topology)d
X(diagram)i(posted)g(to)g(a)h(T)o(OPOLOGY)h(window)m(.)i(The)d(area)h(is)e
X(de\256ned)0 2556 y(in)h(the)g(range)g(`5B0,)h(1`5D.)0 2956 y(13th)22
Xb(May)m(,)12 b(1992)626 b(242)828 b(2.01)p eop
X%%Page: 243 244
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1443 -19 424 2 v 1443 60 2 80 v 1457 35 a Fb(ptkf_setusericon)p
X1864 60 V 1443 62 424 2 v 11 136 a Fq(SUBROUTINE)12 b Fp(ptkf_setusericon)g
XFq(\(windid,)e(usericon\))25 225 y(IN)50 b(INTEGER)g Fa(windid)93
Xb Fq(window)10 b(identi\256er)n(.)25 275 y(IN)50 b(INTEGER)g
XFa(user)9 b(icon)49 b Fq(icon)11 b(structure)f(identi\256er)n(.)0
X350 y(This)15 b(function)e(enables)i(the)g(application)e(to)h(specify)h(a)g
X(structure)f(identi\256er)g(to)g(use)h(as)g(a)h(window)d(icon.)26
Xb(The)15 b(structure)0 400 y(is)10 b(executed)g(from)g(the)f(window')n(s)g
X(default)g(icon)g(structure)h(and)f(the)h(icon)g(size)g(and)g(position)e
X(functions)g(still)g(apply)i(provided)0 449 y(the)h(user)h(icon)f(is)g
X(de\256ned)g(within)f(the)h(W)m(orld)f(Coordinate)g(range)i(`5B0,)f(1`5D.)p
X1303 547 563 2 v 1303 626 2 80 v 1317 600 a Fb(ptkf_setviewclippi)o(ng3)p
X1864 626 V 1303 628 563 2 v 11 702 a Fq(SUBROUTINE)h Fp
X(ptkf_setviewclipping3)e Fq(\(windid,)g(cliplims,)g(clipxy)m(,)h(clipback,)g
X(clipfront\))25 791 y(IN)50 b(INTEGER)g Fa(windid)107 b Fq(window)11
Xb(identi\256er)n(.)25 840 y(IN)50 b(REAL)119 b Fa(cliplims\(6\))47
Xb Fq(view)12 b(clipping)d(limits.)25 890 y(IN)50 b(INTEGER)g
XFa(clipxy)118 b Fq(x-y)11 b(clipping)f(indicator)n(.)25 940
Xy(IN)50 b(INTEGER)g Fa(clipback)78 b Fq(back)12 b(plane)g(clipping)d
X(indicator)n(.)25 990 y(IN)50 b(INTEGER)g Fa(clipfront)82 b
XFq(front)11 b(plane)g(clipping)e(indicator)n(.)0 1059 y(This)15
Xb(function)f(sets)i(the)f(window)f(view)h(clipping)f(values.)27
Xb(The)16 b(camera)i(must)d(be)g(switched)g(OFF)h(for)f(these)g(values)h(to)0
X1109 y(be)c(set.)p 1290 1206 577 2 v 1290 1285 2 80 v 1304
X1259 a Fb(ptkf_setviewmappi)o(ng3)p 1864 1285 V 1290 1287 577
X2 v 11 1361 a Fq(SUBROUTINE)g Fp(ptkf_setviewmapping3)d Fq(\(windid,)14
Xb(window)m(,)g(viewport,)g(proj,)g(prp,)h(viewplane,)g(back-)698
X1411 y(plane,)d(frontplane,)f(error\))25 1463 y(IN)91 b(INTEGER)50
Xb Fa(windid)124 b Fq(window)10 b(identi\256er)n(.)25 1513 y(IN)91
Xb(REAL)119 b Fa(window\(4\))63 b Fq(view)11 b(window)m(.)25
X1562 y(IN)91 b(REAL)119 b Fa(viewport\(6\))48 b Fq(projection)9
Xb(viewport.)25 1612 y(IN)91 b(INTEGER)50 b Fa(proj)165 b Fq(projection)9
Xb(type.)25 1662 y(IN)91 b(REAL)119 b Fa(prp\(3\))129 b Fq(projection)9
Xb(reference)k(point.)25 1712 y(IN)91 b(REAL)119 b Fa(viewplane)66
Xb Fq(view)11 b(plane)g(distance.)25 1762 y(IN)91 b(REAL)119
Xb Fa(backplane)61 b Fq(back)11 b(plane)h(distance.)25 1811
Xy(IN)91 b(REAL)119 b Fa(frontplane)65 b Fq(front)10 b(plane)h(distance.)25
X1861 y(OUT)50 b(INTEGER)g Fa(error)149 b Fq(error)11 b(indicator)n(.)0
X1930 y(This)k(function)e(sets)i(the)g(window)f(view)g(mapping)g(values.)27
Xb(The)15 b(camera)i(must)e(be)g(switched)f(OFF)h(for)g(these)g(values)g(to)0
X1980 y(be)d(set.)18 b(The)13 b(lar)o(gest)f(square)g(within)f(the)g(window)g
X(is)h(de\256ned)g(to)g(be)g(the)g(device)h(coordinates)e(area)i(which)f(the)
Vg
X(view)g(maps)0 2030 y(onto.)p 1240 2127 626 2 v 1240 2206 2
X80 v 1254 2181 a Fb(ptkf_setvieworienta)o(ti)o(on3)p 1864 2206
XV 1240 2208 626 2 v 11 2282 a Fq(SUBROUTINE)g Fp(ptkf_setvieworientation3)e
XFq(\(windid,)g(vrp,)h(vpn,)g(vup,)g(error\))25 2371 y(IN)91
Xb(INTEGER)50 b Fa(windid)f Fq(window)10 b(identi\256er)n(.)25
X2421 y(IN)91 b(REAL)119 b Fa(vrp\(3\))56 b Fq(view)11 b(reference)i(point.)2
V5
X2470 y(IN)91 b(REAL)119 b Fa(vpn\(3\))48 b Fq(view)11 b(plane)h(normal.)25
X2520 y(IN)91 b(REAL)119 b Fa(vup\(3\))48 b Fq(view)11 b(up)g(vector)n(.)25
X2570 y(OUT)50 b(INTEGER)g Fa(error)74 b Fq(error)11 b(indicator)n(.)0
X2639 y(This)k(function)f(sets)i(the)g(window)e(view)h(orientation)f(values.)
X28 b(The)16 b(camera)i(must)d(be)h(switched)f(OFF)h(for)f(these)h(values)0
X2689 y(to)11 b(be)g(set.)0 2956 y(13th)22 b(May)m(,)12 b(1992)626
Xb(243)828 b(2.01)p eop
X%%Page: 244 245
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1350 -19 517 2 v 1350 60 2 80 v 1364 35 a Fb(ptkf_setwindowattrs
V)
Xp 1864 60 V 1350 62 517 2 v 11 136 a Fq(SUBROUTINE)12 b Fp
X(ptkf_setwindowattrs)e Fq(\(windid,)e(titlefont,)e(titlecol,)i(bannercol,)g
X(backgdcol,)h(edgecol,)661 186 y(frametlcol,)j(frambrcol\))25
X236 y(IN)50 b(INTEGER)g Fa(windid)115 b Fq(window)10 b(identi\256er)n(.)25
X286 y(IN)50 b(INTEGER)g Fa(titlefont)100 b Fq(title)10 b(string)g(font.)25
X336 y(IN)50 b(INTEGER)g Fa(titlecol)114 b Fq(title)10 b(string)g(colour)h
X(index.)25 386 y(IN)50 b(INTEGER)g Fa(bannercol)58 b Fq(banner)12
Xb(colour)e(index.)25 436 y(IN)50 b(INTEGER)g Fa(backgdcol)k
XFq(background)11 b(colour)f(index)h(of)g(window)m(.)25 485
Xy(IN)50 b(INTEGER)g Fa(edgecol)90 b Fq(edge)12 b(colour)f(index)f(of)h
X(window)m(.)25 535 y(IN)50 b(INTEGER)g Fa(frametlcol)61 b Fq(top-left)10
Xb(frame)i(colour)f(index.)25 585 y(IN)50 b(INTEGER)g Fa(framebrcol)d
XFq(bottom-right)9 b(frame)j(colour)e(index.)0 654 y(This)k(function)e(sets)i
X(the)g(window)f(text)g(font)g(and)h(colour)f(attribute)f(values.)23
Xb(Each)15 b(window)e(has)h(a)h(banner)f(region)f(which)0 704
Xy(contains)e(the)g(title)f(string)g(of)h(the)g(window)m(.)k(The)d(text)e
X(font)h(value)g(applies)g(to)g(this)f(string.)p 1260 801 607
X2 v 1260 880 2 80 v 1274 855 a Fb(ptkf_setwindowposition)p
X1864 880 V 1260 882 607 2 v 11 956 a Fq(SUBROUTINE)i Fp
X(ptkf_setwindowposition)d Fq(\(windid,)h(position\))25 1045
Xy(IN)50 b(INTEGER)g Fa(windid)113 b Fq(window)11 b(identi\256er)n(.)25
X1095 y(IN)50 b(REAL)119 b Fa(position\(2\))46 b Fq(window)11
Xb(position.)0 1170 y(This)k(function)e(sets)i(the)f(position)f(of)h(the)h
X(centre)g(of)f(the)h(window)m(.)24 b(The)16 b(position)c(is)j(given)f(in)g
X(the)g(range)h(`5B0,)h(1`5D.)25 b(If)14 b(the)0 1220 y(position)d(results)i(
Vin)g
X(part)h(of)f(the)g(window)f(being)h(clipped)g(then)g(the)h(position)d(is)i
X(adjusted)g(so)h(that)f(the)g(whole)g(window)f(is)0 1269 y(visible.)p
X1360 1367 507 2 v 1360 1446 2 80 v 1374 1420 a Fb(ptkf_setwindowsize)p
X1864 1446 V 1360 1448 507 2 v 11 1522 a Fq(SUBROUTINE)g Fp
X(ptkf_setwindowsize)f Fq(\(windid,)f(size\))25 1611 y(IN)50
Xb(INTEGER)g Fa(windid)55 b Fq(window)10 b(identi\256er)n(.)25
X1660 y(IN)50 b(REAL)119 b Fa(size\(2\))48 b Fq(window)10 b(size.)0
X1736 y(This)15 b(function)e(sets)i(the)g(size)h(of)e(the)h(window)f(using)g
X(the)g(x)h(value)g(as)h(the)e(width)g(and)h(the)g(y)f(value)h(as)h(the)e
X(height.)26 b(The)0 1785 y(values)11 b(are)h(given)f(in)f(the)h(range)g(`5B0
V,)g
X(1`5D.)16 b(If)10 b(the)h(size)h(results)f(in)f(part)h(of)f(the)h(window)f
X(being)h(clipped)f(then)h(the)g(window)f(size)0 1835 y(is)h(adjusted)g(to)g
X(give)f(as)i(lar)o(ge)g(a)g(window)e(as)i(possible.)p 1170
X1932 696 2 v 1170 2011 2 80 v 1185 1986 a Fb(ptkf_setwindowtrani)o(nputpr)o
X(i)p 1864 2011 V 1170 2013 696 2 v 11 2087 a Fq(SUBROUTINE)g
XFp(ptkf_setwindowtraninputpri)e Fq(\(windid,)g(refwindid,)g(priority\))25
X2176 y(IN)50 b(INTEGER)g Fa(windid)90 b Fq(window)10 b(identi\256er)n(.)25
X2226 y(IN)50 b(INTEGER)g Fa(refwindid)e Fq(reference)13 b(window)d
X(identi\256er)n(.)25 2276 y(IN)50 b(INTEGER)g Fa(priority)83
Xb Fq(relative)11 b(priority)m(.)0 2345 y(This)g(function)e(sets)j(the)f
X(transformation)e(input)h(priority)e(of)j(the)g(window')n(s)e(view)i
X(representation)f(relative)h(to)f(another)h(win-)0 2395 y(dow)m(.)k(The)d
X(relative)f(priority)e(is)i(also)h(set)f(relative)g(to)g(view)g(index)g(0.)0
X2956 y(13th)22 b(May)m(,)12 b(1992)626 b(244)828 b(2.01)p eop
X%%Page: 245 246
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1350 -19 517 2 v 1350 60 2 80 v 1364 35 a Fb(ptkf_setwindowtype)
Vp
X1864 60 V 1350 62 517 2 v 11 136 a Fq(SUBROUTINE)12 b Fp(ptkf_setwindowtype)
Vf
XFq(\(windid,)f(windtype\))25 225 y(IN)50 b(INTEGER)g Fa(windid)88
Xb Fq(window)10 b(identi\256er)n(.)25 275 y(IN)50 b(INTEGER)g
XFa(windtype)e Fq(window)10 b(type.)0 350 y(This)j(function)f(sets)i(the)g
X(type)f(of)g(a)h(window)f(to)g(one)g(of)g(STRUCT)m(,)i(T)o(OPOLOGY)-5
Xb(,)14 b(CONTENT)h(and)e(TERMINAL.)i(The)0 400 y(default)c(window)f(type)h
X(is)g(STRUCT)m(.)h(All)e(items)i(are)g(unposted)e(from)h(the)g(window)f
X(before)i(the)f(type)g(is)g(set.)p 1253 497 613 2 v 1253 576
X2 80 v 1268 551 a Fb(ptkf_stringscanwindows)p 1864 576 V 1253
X578 613 2 v 0 652 a Fq(LOGICAL)h(FUNCTION)f Fp(ptkf_stringscanwindows)g
XFq(\(wsid,)g(str)n(,)g(windowid\))25 741 y(IN)91 b(INTEGER)193
Xb Fa(wsid)124 b Fq(workstation)10 b(identi\256er)n(.)25 791
Xy(IN)91 b(CHARACTER*\(*\))48 b Fa(str)155 b Fq(string.)25 840
Xy(OUT)50 b(INTEGER)193 b Fa(windowid)49 b Fq(window)10 b(identi\256er)n(.)0
X909 y(This)h(function)f(compares)i(the)f(character)i(string)d
XFi(str)h Fq(with)g(title)e(string)h(of)h(all)g(the)g(windows)f(posted)h(to)g
X(workstation)e Fi(wsid)p Fq(.)0 959 y(The)j(string)e(comparison)h(is)g(case)
Vi
X(sensitive)e(and)g(begins)g(with)f(the)h(front)g(window)f(and)h(works)g(back
V)
Xh(to)f(the)g(lowest)g(priority)0 1009 y(window)m(.)k(The)d(function)d
X(returns)i(TRUE)h(if)f(a)h(match)f(is)g(found,)g(otherwise)g(F)m(ALSE.)p
X1184 1106 683 2 v 1184 1185 2 80 v 1198 1160 a Fb(ptkf_unpostallfrom)o
X(window)p 1864 1185 V 1184 1187 683 2 v 11 1261 a Fq(SUBROUTINE)h
XFp(ptkf_unpostallfr)o(omwindow)d Fq(\(windid\))25 1361 y(IN)50
Xb(INTEGER)g Fa(windid)f Fq(window)10 b(identi\256er)n(.)0 1460
Xy(This)h(function)f(unposts)g(all)h(items)h(posted)e(to)h(window)f
XFi(windid)p Fq(.)p 1244 1558 623 2 v 1244 1637 2 80 v 1258
+-+-+-+-+-+-+-+-  END  OF PART 140 +-+-+-+-+-+-+-+-