-+-+-+-+-+-+-+-+ START OF PART 111 -+-+-+-+-+-+-+-+
XFq(,)15 b(according)e(to)f Fi(relative)19 b(priority)p Fq(.)i(If)12
Xb Fi(relative)20 b(structure)f(identifier)c Fq(does)e(not)e(exist,)i
XFi(error)0 604 y Fq(is)e(set)h(to)e(1.)16 b(Otherwise,)11 b(its)g(value)g(is
V)
Xg(0.)p 1499 701 367 2 v 1499 780 2 80 v 1513 755 a Fb(ptk_poststruct)p
X1864 780 V 1499 782 367 2 v 0 856 a Fq(void)f Fp(ptk_poststruct)i
XFq(\()f(Pint)f Fa(wsid)p Fq(,)i(Pint)e Fa(stid)p Fq(,)h(P\257oat)g
XFa(priority)e Fq(\))25 945 y(IN)50 b(Pint)78 b Fa(wsid)85 b
XFq(workstation)9 b(identi\256er)n(.)25 995 y(IN)50 b(Pint)78
Xb Fa(stid)100 b Fq(structure)11 b(identi\256er)n(.)25 1045
Xy(IN)50 b(P\257oat)f Fa(priority)f Fq(priority)9 b(with)h(which)h(to)g(post)
Vf
X(structure.)0 1114 y(This)h(function)f(posts)h(structure)f
XFi(stid)j Fq(to)d(workstation)g Fi(wsid)p Fq(,)i(but)f(only)f(if)h(the)g
X(structure)f(exists.)p 1522 1211 344 2 v 1522 1290 2 80 v 1537
X1265 a Fb(ptk_read\257oat)p 1864 1290 V 1522 1292 344 2 v 0
X1366 a Fq(P\257oat)h Fp(ptk_r)o(ead\257oat)h Fq(\()f(Pint)f
XFa(ws)p Fq(,)i(P\257oat)f Fa(defreal)p Fq(,)f(Pchar)i(*)p Fa(prompt)p
XFq(,)e(Plimit)g(*)p Fa(echoarea)359 1416 y Fq(\))25 1466 y(IN)50
Xb(Pint)115 b Fa(ws)154 b Fq(workstation)9 b(identi\256er)n(.)25
X1516 y(IN)50 b(P\257oat)86 b Fa(defreal)h Fq(default)11 b(\257oating)f(point
V)
Xg(number)n(.)25 1566 y(IN)50 b(Pchar)11 b(*)57 b Fa(prompt)86
Xb Fq(prompt)10 b(string.)25 1616 y(IN)50 b(Plimit)9 b(*)50
Xb Fa(echoarea)d Fq(string)10 b(echo)i(area.)0 1685 y(This)e(function)f(reads
V)
Xi(and)g(returns)e(a)i(real)g(number)f(from)g(string)f(device)i(1)f(on)g
X(workstation)f Fi(ws)p Fq(,)i(using)f Fi(prompt)h Fq(as)g(a)g(prompt)0
X1735 y(string.)21 b(If)13 b(the)g(user)h(types)g(a)g(carriage-return)f
X(instead)g(of)g(supplying)f(an)i(real)f(value,)i(the)e(function)f(returns)h
X(the)h(speci\256ed)0 1784 y(default)d(value)g Fi(defreal)p
XFq(.)17 b Fi(echoarea)c Fq(speci\256es)f(the)f(echo)h(area)g(to)f(use)h(for)
Vf
X(the)g(string)f(device.)p 1566 1881 301 2 v 1566 1961 2 80
Xv 1580 1935 a Fb(ptk_readint)p 1864 1961 V 1566 1963 301 2
Xv 0 2037 a Fq(Pint)g Fp(ptk_r)o(eadint)i Fq(\()f(Pint)f Fa(ws)p
XFq(,)i(Pint)f Fa(de\256nt)p Fq(,)f(Pchar)i(*)p Fa(prompt)p
XFq(,)e(Plimit)g(*)p Fa(echoarea)e Fq(\))25 2125 y(IN)50 b(Pint)115
Xb Fa(ws)154 b Fq(workstation)9 b(identi\256er)n(.)25 2175 y(IN)50
Xb(Pint)115 b Fa(de\256nt)109 b Fq(default)11 b(integer)n(.)25
X2225 y(IN)50 b(Pchar)11 b(*)57 b Fa(prompt)86 b Fq(prompt)10
Xb(string.)25 2275 y(IN)50 b(Plimit)9 b(*)50 b Fa(echoarea)d
XFq(string)10 b(echo)i(area.)0 2344 y(This)i(function)e(reads)j(and)f(returns
V)
Xf(an)h(integer)f(from)h(string)e(device)j(1)f(on)f(workstation)f
XFi(ws)p Fq(,)j(using)e Fi(prompt)i Fq(as)g(a)f(prompt)0 2394
Xy(string.)f(If)c(the)g(user)h(types)f(a)h(carriage-return)f(instead)f(of)h
X(supplying)e(an)j(integer)n(,)g(the)f(function)e(returns)i(the)g(speci\256ed
V)
Xh(default)0 2443 y(value)h Fi(defint)p Fq(.)17 b Fi(echoarea)c
XFq(speci\256es)f(the)f(echo)h(area)h(to)d(use)i(for)f(the)g(string)f(device.
V)
X0 2956 y(13th)22 b(May)m(,)12 b(1992)636 b(96)839 b(2.01)p
Xeop
X%%Page: 97 98
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1493 -19 374 2 v 1493 60 2 80 v 1507 35 a Fb(ptk_readstring)p
X1864 60 V 1493 62 374 2 v 0 136 a Fq(void)10 b Fp(ptk_r)o(eadstring)i
XFq(\()28 b(Pint)g Fa(ws)p Fq(,)33 b(Pchar)c(*)p Fa(defstring)p
XFq(,)i(Pchar)e(*)p Fa(prompt)p Fq(,)i(Plimit)361 186 y(*)p
XFa(echoarea)p Fq(,)9 b(Pint)h Fa(len)p Fq(,)h(Pchar)h(*)p Fa(instr)p
XFq(,)e(Pint)g(*)p Fa(inlen)g Fq(\))25 236 y(IN)91 b(Pint)116
Xb Fa(ws)153 b Fq(workstation)10 b(identi\256er)n(.)25 286 y(IN)91
Xb(Pchar)12 b(*)57 b Fa(defstring)h Fq(default)11 b(string.)25
X336 y(IN)91 b(Pchar)12 b(*)57 b Fa(prompt)85 b Fq(prompt)11
Xb(string.)25 386 y(IN)91 b(Plimit)10 b(*)50 b Fa(echoarea)c
XFq(string)10 b(echo)i(area.)25 436 y(IN)91 b(Pint)116 b Fa(len)148
Xb Fq(number)12 b(of)f(characters)h(allocated)g(for)e(input)g(string.)25
X485 y(OUT)50 b(Pchar)12 b(*)57 b Fa(instr)128 b Fq(input)10
Xb(string.)25 535 y(OUT)50 b(Pint)10 b(*)85 b Fa(inlen)120 b
XFq(length)11 b(of)g(input)e(string.)0 604 y(This)h(function)f(reads)i(and)g
X(returns)e(a)i(real)g(number)f(from)g(string)f(device)i(1)f(on)g(workstation
V)
Xf Fi(ws)p Fq(,)i(using)f Fi(prompt)h Fq(as)g(a)g(prompt)0 654
Xy(string.)k(If)c(the)h(user)g(types)f(a)h(carriage-return)g(instead)f(of)g
X(supplying)f(a)i(string,)f(the)g(function)f(returns)h(the)h(speci\256ed)g
X(default)0 704 y(value)f Fi(defstring)p Fq(.)17 b Fi(echoarea)c
XFq(speci\256es)g(the)e(echo)h(area)g(to)f(use)h(for)e(the)i(string)d(device.
V)
Xp 1420 801 447 2 v 1420 880 2 80 v 1434 855 a Fb(ptk_removestruc)o(t)p
X1864 880 V 1420 882 447 2 v 0 956 a Fq(ptkboolean)h Fp(ptk_r)o(emovestruct)i
XFq(\()g(Pint)e Fa(stid)g Fq(\))25 1056 y(IN)50 b(Pint)e Fa(stid)h
XFq(structure)11 b(identi\256er)n(.)0 1155 y(This)k(function)f(deletes)h
X(structure)g Fi(stid)p Fq(,)i(if)e(it)f(already)i(exists,)g(returning)d(TRUE
V)
Xj(if)f(the)g(structure)f(was)i(deleted,)h(other)o(-)0 1205
Xy(wise)12 b(F)m(ALSE.)p 1456 1302 411 2 v 1456 1381 2 80 v
X1470 1356 a Fb(ptk_setallatt)o(rasf)p 1864 1381 V 1456 1383
X411 2 v 0 1457 a Fq(void)e Fp(ptk_setallattrasf)g Fq(\()h(Pasf)h
XFa(asf)f Fq(\))25 1557 y(IN)50 b(Pasf)g Fa(asf)f Fq(aspect)12
Xb(source)g(\257ag.)0 1657 y(This)k(function)f(inserts)h(a)h(structure)e
X(element)i(into)e(the)h(open)h(structure)e(to)h(set)h(the)f(aspect)h(source)
Vg
X(\257ags)g(for)e(all)h(primi-)0 1706 y(tive)11 b(attribiutes,)f(according)h
X(to)f Fi(asf)p Fq(.)p 1516 1804 351 2 v 1516 1883 2 80 v 1530
X1857 a Fb(ptk_setattrasf)p 1864 1883 V 1516 1885 351 2 v 0
X1959 a Fq(void)g Fp(ptk_setattrasf)h Fq(\()h(Pint)e Fa(numattrs)p
XFq(,)g(Pattrid)g(*)p Fa(attrs)p Fq(,)g(Pasf)i Fa(asf)f Fq(\))25
X2048 y(IN)50 b(Pint)124 b Fa(numattrs)48 b Fq(length)10 b(of)h(attribute)f
X(list.)25 2097 y(IN)50 b(Pattrid)10 b(*)49 b Fa(attrs)117 b
XFq(attribute)10 b(list.)25 2147 y(IN)50 b(Pasf)121 b Fa(asf)139
Xb Fq(aspect)12 b(source)g(\257ag.)0 2216 y(This)j(function)e(inserts)h(a)h
X(structure)f(element)h(into)e(the)i(open)f(structure)g(to)g(set)h(the)g
X(aspect)g(source)g(\257ags)g(for)f(each)i(of)e(the)0 2266 y
XFi(numattrs)f Fq(attributes)d(in)g(the)i(list)e Fi(attrs)p
XFq(,)i(according)f(to)g Fi(asf)p Fq(.)0 2956 y(13th)22 b(May)m(,)12
Xb(1992)636 b(97)839 b(2.01)p eop
X%%Page: 98 99
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1317 -19 550 2 v 1317 60 2 80 v 1331 35 a Fb(ptk_setedgebundle)o
X(re)o(c)p 1864 60 V 1317 62 550 2 v 0 136 a Fq(Pedgebundl)10
Xb Fp(ptk_setedgebundler)o(ec)15 b Fq(\()c(Pedgef)g Fa(e\257ag)p
XFq(,)g(Pint)f Fa(etype)p Fq(,)g(P\257oat)h Fa(escale)p Fq(,)f(Pint)h
XFa(ecolour)e Fq(\))25 225 y(IN)50 b(Pedgef)g Fa(e\257ag)87
Xb Fq(edge)12 b(on)f(or)g(of)o(f.)25 275 y(IN)50 b(Pint)97 b
XFa(etype)77 b Fq(edge)12 b(type)f(\(solid,)f(dotted,..\).)25
X324 y(IN)50 b(P\257oat)68 b Fa(escale)61 b Fq(edge)12 b(width)e(scale)i
X(factor)n(.)25 374 y(IN)50 b(Pint)97 b Fa(ecolour)47 b Fq(edge)12
Xb(colour)e(index.)0 443 y(This)h(function)f(sets)i(creates)g(and)g(returns)e
X(an)i(edge)g(bundle)e(attribute)g(record)h(whose)h(\256elds)f(are)h(set)g(as
V)
Xg(speci\256ed.)p 1443 540 424 2 v 1443 619 2 80 v 1457 594
Xa Fb(ptk_seteditmod)o(e)p 1864 619 V 1443 621 424 2 v 0 695
Xa Fq(void)e Fp(ptk_seteditmode)h Fq(\()h(Peditmode)f Fa(editmode)e
XFq(\))25 795 y(IN)50 b(Peditmode)f Fa(editmode)f Fq(edit)11
Xb(mode.)0 895 y(This)g(function)f(stores)h(the)g(current)g(edit)g(mode)h(on)
Vf
X(the)g(editmode)g(stack)g(and)h(then)f(sets)g(the)g(edit)g(mode)h(to)f(given
V)
Xf(value.)p 1254 992 613 2 v 1254 1071 2 80 v 1268 1046 a Fb(ptk_setinterio)o
X(rbundle)o(re)o(c)p 1864 1071 V 1254 1073 613 2 v 0 1147 a
XFq(Pinterbundl)f Fp(ptk_setinteriorbundler)o(ec)14 b Fq(\()d(Pinterstyle)f
XFa(istyle)p Fq(,)g(Pint)g Fa(index)p Fq(,)g(Pint)h Fa(icolour)e
XFq(\))25 1236 y(IN)50 b(Pinterstyle)e Fa(istyle)72 b Fq(interior)9
Xb(style)i(\(solid,)f(hollow)m(,..\).)25 1286 y(IN)50 b(Pint)159
Xb Fa(index)68 b Fq(interior)9 b(style)i(index)g(for)g(pattern)f(or)h(hatch.)
X25 1335 y(IN)50 b(Pint)159 b Fa(icolour)48 b Fq(interior)9
Xb(colour)i(index.)0 1404 y(This)g(function)f(sets)i(creates)g(and)g(returns)
Ve
X(an)i(interior)e(bundle)g(attribute)g(record)h(whose)h(\256elds)f(are)h(set)
Vg
X(as)g(speci\256ed.)p 1234 1502 633 2 v 1234 1581 2 80 v 1248
X1555 a Fb(ptk_setpolyline)o(bundle)o(re)o(c)p 1864 1581 V 1234
X1583 633 2 v 0 1657 a Fq(Plnbundl)d Fp(ptk_setpolylinebundler)o(ec)j
XFq(\()g(Pint)e Fa(ltype)p Fq(,)g(P\257oat)i Fa(lwidth)p Fq(,)f(Pint)f
XFa(lcolour)f Fq(\))25 1745 y(IN)50 b(Pint)78 b Fa(ltype)g Fq(line)11
Xb(type)g(\(solid,)f(dotted,..\).)25 1795 y(IN)50 b(P\257oat)f
XFa(lwidth)63 b Fq(line)11 b(width)f(scale)i(factor)n(.)25 1845
Xy(IN)50 b(Pint)78 b Fa(lcolour)48 b Fq(line)11 b(colour)f(index.)0
X1914 y(This)h(function)f(sets)i(creates)g(and)g(returns)e(a)i(polyline)e
X(bundle)g(attribute)g(record)h(whose)h(\256elds)f(are)h(set)g(as)g
X(speci\256ed.)p 1154 2011 713 2 v 1154 2090 2 80 v 1168 2065
Xa Fb(ptk_setpolymarke)o(rbundle)o(re)o(c)p 1864 2090 V 1154
X2092 713 2 v 0 2166 a Fq(Pmkbundl)e Fp(ptk_setpolymarkerbundler)o(ec)j
XFq(\()f(Pint)e Fa(mtype)p Fq(,)h(P\257oat)g Fa(msize)p Fq(,)g(Pint)f
XFa(mcolour)g Fq(\))25 2255 y(IN)50 b(Pint)78 b Fa(mtype)g Fq(marker)12
Xb(type)f(\(dot,)g(circle,..\).)25 2305 y(IN)50 b(P\257oat)f
XFa(msize)82 b Fq(marker)12 b(size)g(scale)h(factor)n(.)25 2355
Xy(IN)50 b(Pint)78 b Fa(mcolour)48 b Fq(marker)12 b(colour)f(index.)0
X2424 y(This)g(function)f(sets)i(creates)g(and)g(returns)e(an)i(polymarker)f
X(bundle)f(attribute)g(record)h(whose)h(\256elds)f(are)h(set)g(as)g
X(speci\256ed.)0 2956 y(13th)22 b(May)m(,)12 b(1992)636 b(98)839
Xb(2.01)p eop
X%%Page: 99 100
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1250 -19 616 2 v 1250 60 2 80 v 1264 35 a Fb
X(ptk_setstandardviewpor)o(t)p 1864 60 V 1250 62 616 2 v 0 136
Xa Fq(void)10 b Fp(ptk_setstandardviewport)i Fq(\()f(Plimit3)f(*)p
XFa(vlimits)p Fq(,)g(Pviewrep3)h(*)p Fa(rep)f Fq(\))25 225 y(IN)91
Xb(Plimit3)10 b(*)105 b Fa(vlimits)48 b Fq(viewport)10 b(bounding)g(box.)25
X275 y(OUT)50 b(Pviewrep3)11 b(*)50 b Fa(rep)95 b Fq(view)11
Xb(representation.)0 350 y(For)g(a)h(window)e(of)h(`5B0,1`5D,)g(this)g(functi
Von)f
X(creates)i(in)f Fi(rep)h Fq(a)g(view)f(representation)f(for)h(a)h(viewport)e
X(of)h Fi(vlimits)p Fq(.)p 1340 447 527 2 v 1340 526 2 80 v
X1354 501 a Fb(ptk_settextbundle)o(re)o(c)p 1864 526 V 1340
X528 527 2 v 0 602 a Fq(Ptxbundl)e Fp(ptk_settextbundler)o(ec)14
Xb Fq(\()e(Pint)g Fa(tfont)p Fq(,)g(Ptxprec)h Fa(tprec)p Fq(,)f(P\257oat)h
XFa(texp)p Fq(,)f(P\257oat)h Fa(tspace)p Fq(,)f(Pint)546 652
Xy Fa(tcolour)d Fq(\))25 702 y(IN)50 b(Pint)108 b Fa(tfont)86
Xb Fq(text)11 b(font.)25 752 y(IN)50 b(Ptxprec)f Fa(tprec)76
Xb Fq(text)11 b(precision.)25 802 y(IN)50 b(P\257oat)79 b Fa(texp)88
Xb Fq(character)12 b(expansion)f(factor)n(.)25 852 y(IN)50 b(P\257oat)79
Xb Fa(tspace)50 b Fq(character)12 b(spacing.)25 902 y(IN)50
Xb(Pint)108 b Fa(tcolour)48 b Fq(text)11 b(colour)f(index.)0
X971 y(This)h(function)f(sets)i(creates)g(and)g(returns)e(a)i(text)f(bundle)f
X(attribute)g(record)i(whose)f(\256elds)g(are)h(set)g(as)g(speci\256ed.)p
X1476 1068 391 2 v 1476 1147 2 80 v 1490 1121 a Fb(ptk_stackstruct)p
X1864 1147 V 1476 1149 391 2 v 0 1223 a Fq(void)e Fp(ptk_stackstruct)i
XFq(\()g(void)21 b(\))0 1372 y(This)15 b(function)f(stores)h(the)f(name)i(of)
Vf
X(the)g(currently)f(open)h(structure,)h(and)f(the)g(position)e(of)h(the)h
X(element)h(pointer)e(on)g(the)0 1422 y(structure)d(stack,)h(and)f(closes)h
X(the)f(structure)p 1463 1519 404 2 v 1463 1598 2 80 v 1477
X1573 a Fb(ptk_structexists)p 1864 1598 V 1463 1600 404 2 v
X0 1674 a Fq(ptkboolean)f Fp(ptk_structexists)i Fq(\()f(Pint)f
XFa(stid)h Fq(\))25 1774 y(IN)50 b(Pint)e Fa(stid)h Fq(structure)11
Xb(identi\256er)n(.)0 1874 y(This)g(function)f(checks)i(if)f(structure)g
XFi(stid)h Fq(exists)f(in)g(the)g(CSS,)g(returning)f(TRUE)i(if)f(it)f(exists,
V)
Xh(otherwise)g(F)m(ALSE.)0 2956 y(13th)22 b(May)m(,)12 b(1992)636
Xb(99)839 b(2.01)p eop
X%%Page: 100 101
Xbop 0 -137 a Fq(PHIGS)11 b(T)m(oolkit)f(User)i(Manual)1235
Xb(PTK/100)p 1376 -19 490 2 v 1376 60 2 80 v 1390 35 a Fb(ptk_structsummary)p
X1864 60 V 1376 62 490 2 v 0 136 a Fq(void)10 b Fp(ptk_structsummary)h
XFq(\()h(FILE)g(*)p Fa(\256leptr)d Fq(\))25 236 y(IN)50 b(FILE)12
Xb(*)49 b Fa(\256leptr)f Fq(\256le)12 b(pointer)n(.)0 335 y(This)j(function)f
X(outputs)g(a)i(summary)h(of)e(all)g(the)g(structures)g(in)g(the)h(CSS)f(to)g
X(\256le)h Fi(fileptr)p Fq(,)i(which)d(should)g(be)h(an)f(open)0
X385 y(writeable)c(\256le.)16 b(The)d(structure)e(identi\256er)f(of)h(each)i
X(structure)e(is)g(printed,)g(together)g(with)f(its)h(hashed)h(string)e(name,
V)
Xj(if)e(it)g(has)0 435 y(one.)16 b(The)c(format)f(of)g(the)g(list)f(is:)0
X485 y Fi(List)19 b(of)f(structures)i(in)e(the)h(CSS)0 535 y
X(---------------------)q(------)q(--)0 634 y(structure)h(1)e("helicopter")0
X684 y(structure)i(45)0 734 y(structure)g(51)e("helicopter")0
X784 y(etc.)34 b Fq(.)p 1383 881 484 2 v 1383 960 2 80 v 1397
X935 a Fb(ptk_unseteditmod)o(e)p 1864 960 V 1383 962 484 2 v
X0 1036 a Fq(void)10 b Fp(ptk_unseteditmode)i Fq(\()f(void)22
Xb(\))0 1235 y(This)11 b(function)f(restores)i(the)f(current)g(edit)f(mode)i
X(from)f(the)g(edit)g(mode)h(stack.)p 1416 1332 450 2 v 1416
X1411 2 80 v 1430 1386 a Fb(ptk_unstackstruct)p 1864 1411 V
X1416 1413 450 2 v 0 1487 a Fq(void)e Fp(ptk_unstackstruct)j
XFq(\()e(void)21 b(\))0 1637 y(This)11 b(function)f(pops)h(the)g(structure)g
X(stack,)h(opens)f(the)g(structure)g(and)g(sets)h(the)f(element)h(pointer)n(.
V)
X0 2956 y(13th)22 b(May)m(,)12 b(1992)626 b(100)828 b(2.01)p
Xeop
X%%Page: 101 102
Xbop 0 349 a Fj(Chapter)24 b(16)0 585 y Fs(T)-8 b(raversal)27
Xb(State)i(List)g(functions)p 1416 800 451 2 v 1416 879 2 80
Xv 1430 854 a Fb(ptk_boundingbox)p 1864 879 V 1416 881 451 2
Xv 0 956 a Fq(ptkboolean)10 b Fp(ptk_boundingbox)g Fq(\()h(Pint)g
XFa(structid)p Fq(,)e(Plimit3)h(*)p Fa(wcbounds)p Fq(,)f(ptkboolean)h
XFa(descend)f Fq(\))25 1044 y(IN)91 b(Pint)166 b Fa(structid)93
Xb Fq(structure)11 b(network)f(identi\256er)n(.)25 1094 y(OUT)50
Xb(Plimit3)10 b(*)79 b Fa(wcbounds)48 b Fq(bounding)9 b(box)i(in)g(world)f
X(coordinates.)25 1144 y(IN)91 b(ptkboolean)48 b Fa(descend)73
Xb Fq(\257ag)12 b(to)e(indicate)h(traversal.)0 1213 y(This)e(function)e
X(evaluates)j(the)f(bounding)e(box)h(for)h(a)g(structure)g(or)f(structure)h
X(network.)14 b(If)8 b Fi(descend)j Fq(is)e(set)g(to)f(TRUE)i(then)e(the)0
X1263 y(bounding)i(box)h(for)g(the)g(complete)h(structure)f(network)g(is)g
X(returned,)h(otherwise)f(just)g(for)g(a)h(single)f(structure.)16
+-+-+-+-+-+-+-+-  END  OF PART 111 +-+-+-+-+-+-+-+-