vis-ftp.cs.umass.edu

home *** CD-ROM | disk | FTP | other *** search

/ vis-ftp.cs.umass.edu / vis-ftp.cs.umass.edu.tar / vis-ftp.cs.umass.edu / pub / Software / ASCENDER / model.tar / model-board-1 / gcp.fs < prev next >

Wrap

Lisp/Scheme | 1995-08-10 | 242KB | 3,321 lines

(in-package "CME") (setq cme::*object-feature-sets* (list (MAKE-INSTANCE '3D-FEATURE-SET :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :INFERIORS (LIST (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 117 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1134.9916666666666 -331.85416666666663 13.454166666666668)) :NAME '"GCP 117" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j2" 1072.5162897503808 861.0366256590197))) :CONTROL-PT-ID 116 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1257.2666666666665 -173.4958333333333 7.7333333333333325)) :NAME '"GCP 116" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 115 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1074.6041666666668 767.55 -82.86666666666666)) :NAME '"GCP 115" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual ground corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 10.058956483125425 196.62338034739867) ("MB1-j6" 15.876195873219267 102.13250850005028) ("MB1-j5" 134.92428050198018 75.94544180564552) ("MB1-j4" 27.281389498568395 169.7576308780055) ("MB1-j2" 1166.9620008562138 800.5120607629399))) :CONTROL-PT-ID 114 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1139.2124999999999 -332.875 74.28333333333333)) :NAME '"GCP 114" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 440.2508257317847 272.6127784293291) ("MB1-j2" 796.6264496606863 717.6046793033863))) :CONTROL-PT-ID 113 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 946.75 479.65833333333325 -84.91666666666666)) :NAME '"GCP 113" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 191.82000679825868 295.9627260952406) ("MB1-j7" 233.80010857395232 359.1900090545032) ("MB1-j5" 298.97497023542775 258.7804300684627))) :CONTROL-PT-ID 112 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 832.1125 34.38333333333333 -84.99583333333333)) :NAME '"GCP 112" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 89.86220271307218 86.8628339531439) ("MB1-j7" 101.11377108384511 176.7705725535159) ("MB1-j6" 106.0425005610018 85.45048470549944) ("MB1-j5" 220.61692570212338 48.75682145708775) ("MB1-j4" 104.32953601493979 146.41212607551748) ("MB1-j2" 1099.804514447028 829.7853748246533))) :CONTROL-PT-ID 111 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1183.3874999999999 -175.49999999999997 66.23333333333332)) :NAME '"GCP 111" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j2" 1089.8234951526063 1022.4497332430684) ("MB1-j1" 65.10766300479365 1036.2436247428862))) :CONTROL-PT-ID 110 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1543.4625 -175.54583333333332 93.66666666666667)) :NAME '"GCP 110" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j1" 61.59200940881396 924.2516755624222))) :CONTROL-PT-ID 109 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1571.4333333333332 29.879166666666663 76.70416666666667)) :NAME '"GCP 109" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 108 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1543.3958333333333 -51.59166666666666 -16.979999999999997)) :NAME '"GCP 108" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 531.3229378450405 131.53305177841492) ("MB1-j6" 524.0698884910742 78.28987297053611) ("MB1-j1" 258.98679570775926 667.4500029199218))) :CONTROL-PT-ID 107 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1257.3166666666666 542.8958333333334 -84.95833333333333)) :NAME '"GCP 107" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 446.82979595134367 251.6401704738443) ("MB1-j7" 488.1144981610765 315.320173911006) ("MB1-j5" 549.485983064374 183.10483677635293) ("MB1-j4" 437.37472598614227 279.3482077283445) ("MB1-j2" 812.0898608484284 726.4768549664387) ("MB1-j1" 385.98521550813104 741.6343310018372))) :CONTROL-PT-ID 106 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 948.0541666666666 488.51249999999994 -25.391666666666666)) :NAME '"GCP 106" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 584.8398666835856 244.90658956693676) ("MB1-j7" 640.1343556400334 277.59003478601807) ("MB1-j6" 620.88595243382 207.8869884185368) ("MB1-j5" 675.5757944918063 140.70220973332292) ("MB1-j4" 573.4530852282663 240.2854127866736) ("MB1-j3" 319.0428283308307 583.6307423494108) ("MB1-j1" 362.28210311658006 595.929519467993))) :CONTROL-PT-ID 105 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1023.1291666666666 737.9875 -48.574999999999996)) :NAME '"GCP 105" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"cylinder end-center")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 454.92747590357647 40.313460983549675) ("MB1-j3" 50.1562894881986 736.2075987281203) ("MB1-j1" 128.56592931672844 666.5057195803281))) :CONTROL-PT-ID 104 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1504.7416666666666 514.0458333333332 -37.97083333333333)) :NAME '"GCP 104" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 103 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1622.0624999999998 481.8041666666666 -53.09583333333333)) :NAME '"GCP 103" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 878.763295472538 88.78243493317747) ("MB1-j1" 138.6387313984754 237.16841785954136))) :CONTROL-PT-ID 102 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1501.3291666666667 1328.4916666666666 -48.6875)) :NAME '"GCP 102" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 809.2176771390576 87.19333452624957) ("MB1-j1" 142.3557861898749 305.07132193433336))) :CONTROL-PT-ID 101 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1506.7416666666666 1194.9583333333333 -61.85833333333333)) :NAME '"GCP 101" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j2" 523.5182892278948 1029.0053770351515) ("MB1-j1" 158.9875351802724 376.4537361161842))) :CONTROL-PT-ID 100 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1441.2708333333333 1082.4041666666665 -21.04583333333333)) :NAME '"GCP 100" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 729.9334391636423 110.72451587704751) ("MB1-j2" 522.1764259474894 1015.6221966340587) ("MB1-j1" 177.80867630823838 389.9545982438154))) :CONTROL-PT-ID 99 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1436.9916666666666 1041.6833333333332 -84.91666666666666)) :NAME '"GCP 99" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 850.6694905702832 86.6802744221145))) :CONTROL-PT-ID 98 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1502.5041666666666 1271.1208333333334 -48.73333333333333)) :NAME '"GCP 98" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 818.4615083549311 108.46685969312499) ("MB1-j2" 457.3652999228908 1034.1106478247114) ("MB1-j1" 168.54109907960495 305.8067503977707))) :CONTROL-PT-ID 97 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1438.375 1205.4041666666667 -48.891666666666666)) :NAME '"GCP 97" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 96 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1743.1583333333333 1299.6166666666666 -46.87083333333333)) :NAME '"GCP 96" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 95 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1509.0333333333333 1537.3958333333333 -33.94166666666666)) :NAME '"GCP 95" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1026.0980539432258 63.509491592105036) ("MB1-j1" 94.87383530991058 79.66666244087239))) :CONTROL-PT-ID 94 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1580.8208333333335 1613.4625 -16.770833333333332)) :NAME '"GCP 94" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1030.2245348872853 127.3459389263304) ("MB1-j3" 53.50338112438125 96.98062513085651) ("MB1-j1" 171.13051323281513 89.91053956627064))) :CONTROL-PT-ID 93 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1428.3666666666666 1613.4416666666666 -32.729166666666664)) :NAME '"GCP 93" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1041.333716184089 214.4226669849669) ("MB1-j5" 1100.0038985333258 35.44139910463629) ("MB1-j4" 1021.9328934197865 137.95329046139435) ("MB1-j3" 184.2020677398883 90.07358580107086) ("MB1-j1" 281.0040868119543 109.35648852764553))) :CONTROL-PT-ID 92 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 1203.1583333333333 1609.2124999999999 -30.24583333333333)) :NAME '"GCP 92" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 928.6808745811194 292.41814982710577) ("MB1-j7" 1014.8018815055034 313.7099433336424) ("MB1-j6" 983.0 239.0) ("MB1-j5" 988.4999999999999 155.0) ("MB1-j4" 901.0 262.0) ("MB1-j3" 312.75 216.0) ("MB1-j2" 400.0 792.0000000000001) ("MB1-j1" 384.51487981521945 253.37259655038298))) :CONTROL-PT-ID 90 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 997.6458333333333 1381.095833333333 -47.87916666666666)) :NAME '"GCP 90" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 976.6274389146979 306.3523189501183) ("MB1-j6" 1041.2794174828453 247.86239251584274) ("MB1-j5" 1025.0592367053892 155.18682237646206) ("MB1-j3" 309.1244446863427 157.89943245146867) ("MB1-j1" 396.09890646489305 195.09951722097227))) :CONTROL-PT-ID 89 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 992.9166666666665 1479.5208333333333 -84.91666666666666)) :NAME '"GCP 89" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1100.8995929525475 418.11384868784916) ("MB1-j7" 1186.9391504590954 460.0290751807117) ("MB1-j5" 1127.4738691816392 292.1577314645958) ("MB1-j4" 1071.3124022049204 415.9421082271912))) :CONTROL-PT-ID 84 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 739.8416666666666 1689.3791666666664 -78.78333333333333)) :NAME '"GCP 84" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1147.8847477352654 475.8057640523661) ("MB1-j7" 1222.2824054253647 546.3629647943856) ("MB1-j6" 1187.5315142763912 474.7341785824221) ("MB1-j5" 1169.1670038640714 369.8099809801349) ("MB1-j4" 1098.1160249466523 503.2009343366856) ("MB1-j1" 593.0455179656123 74.01053742580831))) :CONTROL-PT-ID 83 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 600.0124999999999 1761.2208333333333 -50.94166666666666)) :NAME '"GCP 83" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1015.675272435106 353.27476229527474) ("MB1-j6" 1065.7569340832509 316.79715789541826) ("MB1-j5" 1060.913299604309 226.73141957368293) ("MB1-j4" 980.7883064316113 341.74907720870937))) :CONTROL-PT-ID 82 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 859.9166666666667 1534.7125 -49.69583333333333)) :NAME '"GCP 82" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 725.4446643229846 379.7469245413564) ("MB1-j7" 774.8560343928448 458.8682855926975) ("MB1-j6" 743.5964107743896 384.77494130257896) ("MB1-j5" 802.3828110019753 314.3061279536326) ("MB1-j3" 484.0578677328501 434.7843804125126))) :CONTROL-PT-ID 81 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 717.3291666666667 987.5541666666666 -41.037499999999994)) :NAME '"GCP 81" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1001.0791000434616 350.19676511440315) ("MB1-j5" 1052.4383232893206 242.6105091249998) ("MB1-j4" 950.3099002397928 355.63160003452345) ("MB1-j1" 457.1857950892585 207.82096151034273))) :CONTROL-PT-ID 80 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 836.4208333333334 1495.4416666666666 -19.254166666666667)) :NAME '"GCP 80" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1015.5341891874032 486.0847794149851) ("MB1-j7" 1070.664419828531 573.0983299386775) ("MB1-j6" 1034.2767927041682 502.75867230740124) ("MB1-j5" 1050.257200477627 409.27003387790154) ("MB1-j4" 958.4350850212974 534.2140808180216) ("MB1-j1" 617.4694896436849 226.69628178222416))) :CONTROL-PT-ID 79 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 538.7041666666667 1503.7624999999999 -50.31666666666666)) :NAME '"GCP 79" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 936.0746113642313 474.63498802723604) ("MB1-j6" 948.5077287143562 499.8474909474815) ("MB1-j3" 576.1643115357632 213.16213599541496) ("MB1-j2" 439.31803619322676 529.4240164727381) ("MB1-j1" 610.5636747425148 311.6694638720306))) :CONTROL-PT-ID 78 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 537.3916666666667 1354.5208333333333 -37.295833333333334)) :NAME '"GCP 78" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 895.4680739492251 374.17243426193977) ("MB1-j7" 957.6389614192768 437.20819834621495) ("MB1-j6" 926.7596955227648 362.347181099155) ("MB1-j5" 953.3013653050933 278.9940179716333) ("MB1-j2" 452.3096387818526 664.3952107525598) ("MB1-j1" 491.03428187727656 319.05543158614944))) :CONTROL-PT-ID 77 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 773.6333333333333 1300.9333333333332 -40.574999999999996)) :NAME '"GCP 77" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 817.2770711047205 443.766851782804) ("MB1-j6" 842.7777139173808 444.1697863158734) ("MB1-j3" 530.5314057474221 329.5951891145687) ("MB1-j1" 571.1758774386879 404.0664300246754))) :CONTROL-PT-ID 76 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 627.6791666666666 1158.0833333333333 -84.99583333333333)) :NAME '"GCP 76" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 878.0873290061545 389.07725408231477) ("MB1-j6" 845.1477704581597 309.1584010503516) ("MB1-j5" 889.304510537061 233.1625349894377) ("MB1-j4" 773.4539763910329 341.4735241034267) ("MB1-j2" 522.0032154914587 705.6307825986604) ("MB1-j1" 441.69575292437066 394.8911895822366))) :CONTROL-PT-ID 75 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 853.0083333333333 1149.6541666666665 -21.94583333333333)) :NAME '"GCP 75" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 726.8325124470983 281.9151878989403) ("MB1-j7" 768.2865222562656 396.274617973357) ("MB1-j6" 733.8954309503678 294.1273915722142) ("MB1-j5" 825.5878800636084 234.34389881498584) ("MB1-j4" 653.7370830092407 338.70204280595465) ("MB1-j1" 412.6291119005542 508.2398577359726))) :CONTROL-PT-ID 74 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 853.0499999999998 972.1541666666667 68.92916666666666)) :NAME '"GCP 74" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 73 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 826.7791666666667 818.4666666666666 -46.925000000000004)) :NAME '"GCP 73" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 72 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 818.0833333333333 708.9625 -23.599999999999998)) :NAME '"GCP 72" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 564.7626715034998 390.8700285448635) ("MB1-j7" 602.6016851036467 481.6735799377146) ("MB1-j6" 573.7611228659888 412.46521867641946) ("MB1-j4" 541.0658638400595 449.86012375175767) ("MB1-j2" 731.4222483501937 573.8918087494893) ("MB1-j1" 538.1935877038437 661.9969485845096))) :CONTROL-PT-ID 71 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 658.5041666666666 695.4041666666666 -46.34166666666667)) :NAME '"GCP 71" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 424.7066370052748 287.2366907666541) ("MB1-j7" 458.1681884194276 377.46160455112835) ("MB1-j6" 436.0362085615832 297.14226182718057) ("MB1-j4" 409.9184901967938 341.3041032768293) ("MB1-j3" 429.0012810360381 758.2392553439784) ("MB1-j2" 844.0685234793759 667.4674107116456))) :CONTROL-PT-ID 70 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 838.85 436.5083333333333 -8.3125)) :NAME '"GCP 70" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 201.09371488535172 268.3974683706119) ("MB1-j7" 227.68355855725042 369.6246337212856) ("MB1-j6" 212.4926591904523 293.4261375340177) ("MB1-j5" 318.5052532940686 258.4625838444301) ("MB1-j4" 220.25 343.5) ("MB1-j1" 428.22070191268205 991.7936155912672))) :CONTROL-PT-ID 69 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 829.3333333333333 35.1875 -10.208333333333333)) :NAME '"GCP 69" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 184.26261153745227 314.2355413913274) ("MB1-j7" 207.24056853213006 440.1333775891172) ("MB1-j4" 198.7285450801162 411.934499856614) ("MB1-j3" 520.2600142751759 1001.1260236413615))) :CONTROL-PT-ID 68 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 705.8791666666666 4.95 3.533333333333333)) :NAME '"GCP 68" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 348.0979166929219 325.43738282171876) ("MB1-j7" 376.6600076346157 434.13018398289626) ("MB1-j6" 353.3963396563688 355.5058032766113) ("MB1-j5" 459.4528382880153 313.706951689732) ("MB1-j4" 341.7529155363989 401.77986312980517) ("MB1-j2" 906.62656411294 601.9856673332547) ("MB1-j1" 483.24155679395284 867.1212516034285))) :CONTROL-PT-ID 67 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 737.0291666666667 295.99583333333334 -8.8875)) :NAME '"GCP 67" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 93.22608250386885 371.0698352395021) ("MB1-j7" 131.41853273397248 467.67541531972205) ("MB1-j6" 115.18280622568418 407.06625337953693) ("MB1-j5" 204.9328190202554 381.2750240363376) ("MB1-j4" 156.92056411672022 450.4749627186627))) :CONTROL-PT-ID 66 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 634.8708333333333 -144.37916666666666 -84.99583333333333)) :NAME '"GCP 66" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner (typo: 2.0399 changed to -2.0399)")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 65 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 825.7208333333333 -374.32916666666665 -52.050000000000004)) :NAME '"GCP 65" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 63.895134543920705 641.1073466036486) ("MB1-j6" 33.200800521322506 584.7245522371915) ("MB1-j4" 101.87910642420997 626.6502956693871))) :CONTROL-PT-ID 64 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 309.21666666666664 -257.3125 -84.95416666666667)) :NAME '"GCP 64" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 97.74884564198962 266.1130655301979) ("MB1-j7" 127.11057826008875 366.777691443493) ("MB1-j6" 114.2953564608676 294.4821635928091) ("MB1-j5" 217.9334639913963 263.38875422959865) ("MB1-j4" 141.11539922274142 343.9186999576775))) :CONTROL-PT-ID 63 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 826.3791666666667 -149.025 -22.7875)) :NAME '"GCP 63" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 126.51801060404627 469.733905231398) ("MB1-j6" 107.2038669833066 401.34520149268394) ("MB1-j5" 219.1195482784287 378.6421826368953) ("MB1-j4" 142.75150638407382 450.11142052455785) ("MB1-j2" 1081.1996064788375 530.3823190034042))) :CONTROL-PT-ID 62 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 642.2416666666667 -144.17916666666668 -36.0375)) :NAME '"GCP 62" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 43.6845102803052 473.67488790036737) ("MB1-j7" 78.6317199366735 608.2574520208851) ("MB1-j6" 49.05510205052674 550.1874708329931) ("MB1-j5" 169.2116567993368 541.4958790225936) ("MB1-j4" 112.2849679335403 595.1168433194308))) :CONTROL-PT-ID 61 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 374.91666666666663 -226.70833333333332 -66.85)) :NAME '"GCP 61" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 36.221754257641855 437.024135276742) ("MB1-j7" 44.18018500808966 671.182486981373) ("MB1-j6" 6.295773988715825 569.4380369465312) ("MB1-j5" 192.67978961154282 582.5973630123709) ("MB1-j4" 44.87826237840932 631.5119945769098) ("MB1-j2" 1195.4009857079423 366.1315681846298))) :CONTROL-PT-ID 60 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 306.1208333333333 -263.325 95.33749999999999)) :NAME '"GCP 60" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 94.76347038110228 465.4002056584646) ("MB1-j7" 122.22136906636459 615.9032220299908) ("MB1-j5" 222.6346627165492 537.1776639173228) ("MB1-j4" 138.70450069247693 595.7265200069039))) :CONTROL-PT-ID 59 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 379.6166666666666 -142.67916666666668 -35.67083333333333)) :NAME '"GCP 59" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 66.28850318646642 648.2961351672086) ("MB1-j7" 100.53664306561464 818.1585042675488) ("MB1-j6" 53.84386234354908 767.0065824185813) ("MB1-j5" 198.79553104118315 769.9814844415405) ("MB1-j4" 126.47864460656291 806.794453507348))) :CONTROL-PT-ID 58 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -4.4375 -181.4625 -66.3625)) :NAME '"GCP 58" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 41.02963128421896 530.8454335838768) ("MB1-j7" 43.855902283692636 813.3890729110043) ("MB1-j5" 212.5120818666512 732.1174502052363) ("MB1-j4" 29.867994589307717 770.4014327758072) ("MB1-j2" 1224.1241170910392 237.56588761682747))) :CONTROL-PT-ID 57 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 71.58333333333333 -252.16249999999997 140.79166666666666)) :NAME '"GCP 57" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 172.98188996119706 662.4702582255557))) :CONTROL-PT-ID 56 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 8.716666666666667 5.175 -84.95833333333333)) :NAME '"GCP 56" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 283.7136336577101 621.2119561115402) ("MB1-j7" 291.7331207384047 829.3318547942188) ("MB1-j6" 241.40283665159322 754.9217234398307) ("MB1-j5" 409.49862950635304 743.4107677702469) ("MB1-j4" 262.57162193859387 803.5798341544746) ("MB1-j3" 914.2918640919705 880.9937780625747))) :CONTROL-PT-ID 55 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 20.045833333333335 170.33333333333332 20.2)) :NAME '"GCP 55" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-peak roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 312.3321910282887 615.2285624910875) ("MB1-j7" 322.2818716022415 821.2986504626612) ("MB1-j6" 271.4712535989595 746.4273804565138) ("MB1-j5" 437.4188974817659 730.737992228229) ("MB1-j4" 287.5342744154089 794.5545851901048) ("MB1-j1" 821.0361994288718 993.0486794231739))) :CONTROL-PT-ID 54 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 37.40833333333333 225.95833333333332 18.5875)) :NAME '"GCP 54" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-peak roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 197.78385320902567 615.9724890303802) ("MB1-j6" 161.5622784049941 751.2708633430254) ("MB1-j5" 333.44644321967496 747.2740398069426) ("MB1-j4" 197.5351474814316 799.036532260186) ("MB1-j3" 915.278678280011 962.3476505597685))) :CONTROL-PT-ID 53 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 19.0875 29.566666666666667 14.229166666666666)) :NAME '"GCP 53" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 265.01024371879334 327.97557784600065) ("MB1-j7" 288.1234460987046 458.0953637412108) ("MB1-j6" 265.3784161801809 372.54418969769813) ("MB1-j4" 263.4073496499078 421.5515885134299) ("MB1-j3" 525.7494040768146 917.8937221673638) ("MB1-j2" 980.7125583106678 576.0391826201156) ("MB1-j1" 493.93860003763587 954.4810770963528))) :CONTROL-PT-ID 52 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 686.0583333333333 148.14583333333332 14.98333333333333)) :NAME '"GCP 52" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 484.3585116927616 464.05230935727036) ("MB1-j2" 836.4509098095796 439.5010351251506))) :CONTROL-PT-ID 51 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 416.4340416943705 522.5336307264147 13.770833333333334)) :NAME '"GCP 51" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 501.1533486031136 690.3135489179141) ("MB1-j6" 473.44812156592855 789.2723231406855) ("MB1-j4" 481.6073079068318 824.0248869305277) ("MB1-j2" 809.713646946158 190.07217585416237) ("MB1-j1" 881.3927887181894 796.6602445486718))) :CONTROL-PT-ID 50 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 0.14166666666666666 563.1458333333333 -84.99583333333333)) :NAME '"GCP 50" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 510.9999999999999 658.5) ("MB1-j7" 514.0 850.5) ("MB1-j6" 463.75000000000006 782.0) ("MB1-j5" 611.0 741.5000000000001) ("MB1-j4" 455.0 829.0) ("MB1-j3" 914.0 651.75) ("MB1-j2" 842.4999999999999 199.49999999999955) ("MB1-j1" 858.8384410782954 814.1882258086104))) :CONTROL-PT-ID 49 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -0.14166666666666666 563.1458333333333 3.208333333333333)) :NAME '"GCP 49" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 481.9118993786753 349.27759413667593) ("MB1-j7" 507.6389493643252 478.0021483134898) ("MB1-j6" 477.79578925646445 388.9674070942257) ("MB1-j4" 444.3493525191123 439.4952854315918) ("MB1-j3" 523.4413981669552 697.0829940504048) ("MB1-j2" 824.9363464139553 584.7174408932838) ("MB1-j1" 506.4644854492486 758.2044609845817))) :CONTROL-PT-ID 48 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 676.8458333333333 528.15 20.991666666666667)) :NAME '"GCP 48" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-peak roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 498.99999999999995 344.0) ("MB1-j7" 528.4147196392751 455.0139900037116) ("MB1-j6" 500.27229651326065 374.482697423836) ("MB1-j5" 603.0 325.0) ("MB1-j4" 466.72162734229494 418.6190424855191) ("MB1-j3" 500.75 678.0) ("MB1-j2" 801.610587650114 603.2698701601921) ("MB1-j1" 494.81924805173753 730.9798605969204))) :CONTROL-PT-ID 47 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 708.9875 555.2208333333333 3.825)) :NAME '"GCP 47" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 46 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 476.75416666666667 589.9749999999999 97.75833333333333)) :NAME '"GCP 46" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual smoke-stack")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 45 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 21.333333333333332 850.0666666666666 -34.516666666666666)) :NAME '"GCP 45" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 579.6102812022531 775.7075278364936) ("MB1-j5" 655.5979298551777 835.705859172711) ("MB1-j3" 1006.9928609934869 566.5203244439815) ("MB1-j2" 760.4393205936855 94.19014616125367) ("MB1-j1" 974.3587976988018 745.9147485135742))) :CONTROL-PT-ID 44 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -176.33333333333334 696.0416666666665 -84.95)) :NAME '"GCP 44" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 579.8559141832435 610.3071222787984) ("MB1-j7" 595.4910251439827 765.6893293705165) ("MB1-j6" 550.8792727433171 698.8894298673921) ("MB1-j5" 663.4599866510869 646.6300463839351) ("MB1-j4" 534.9490849665 742.936809984116) ("MB1-j3" 821.0638313435231 582.4554510950285) ("MB1-j1" 793.4896191939797 716.3989688600459))) :CONTROL-PT-ID 43 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 145.97083333333333 693.9999999999999 -38.949999999999996)) :NAME '"GCP 43" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 566.4578515883806 408.7842423486334) ("MB1-j7" 599.0 518.0) ("MB1-j6" 567.3229271175411 444.068157089047) ("MB1-j5" 661.0 386.0) ("MB1-j4" 533.25 485.0) ("MB1-j1" 563.4195879823508 673.8817501599062))) :CONTROL-PT-ID 42 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 594.4708333333333 687.4416666666666 -24.808333333333334)) :NAME '"GCP 42" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 790.1114383082335 433.71216829869195) ("MB1-j7" 836.0150826249724 526.3076888503532) ("MB1-j6" 802.429584833406 450.6824830963212) ("MB1-j5" 858.5973837385154 377.20451358175967) ("MB1-j4" 743.5396445885639 488.32053155190545) ("MB1-j3" 546.4503388876935 364.66423107856474) ("MB1-j2" 556.2074922342384 558.9182744772911) ("MB1-j1" 570.6196139639856 448.94906532397704))) :CONTROL-PT-ID 41 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 601.2874999999999 1094.6499999999999 -38.670833333333334)) :NAME '"GCP 41" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 798.9999999999999 454.99999999999995) ("MB1-j7" 836.0 567.0) ("MB1-j6" 799.0 488.0) ("MB1-j5" 864.9422986421519 415.9645264766355) ("MB1-j4" 741.0 527.2499999999999) ("MB1-j3" 584.5 361.75) ("MB1-j2" 562.8356632692044 522.8197356578146) ("MB1-j1" 601.2923405305 455.44201452787366))) :CONTROL-PT-ID 40 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 536.1125 1098.8083333333334 -24.71666666666666)) :NAME '"GCP 40" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 814.9999999999999 608.0) ("MB1-j7" 831.0 758.0) ("MB1-j6" 787.0 687.0) ("MB1-j5" 871.0 613.0) ("MB1-j4" 737.6599292696969 731.5291947165141) ("MB1-j3" 784.8136564952466 346.5378436228418) ("MB1-j2" 578.7520581103999 320.04355905194825) ("MB1-j1" 780.2460105990193 488.30001383889476))) :CONTROL-PT-ID 39 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 193.23749999999998 1104.05 -25.12083333333333)) :NAME '"GCP 39" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 557.3490717769264 430.68389124629067) ("MB1-j7" 601.3694109333728 512.3422084858183))) :CONTROL-PT-ID 38 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 594.6999999999999 686.8124999999999 -85.08333333333332)) :NAME '"GCP 38" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 739.4818532903041 625.7918702913307) ("MB1-j7" 754.4020820898995 776.7515246653082) ("MB1-j6" 713.3415200970543 710.3734686505945) ("MB1-j5" 806.021776931836 639.6337437755319) ("MB1-j4" 674.8229972216553 755.2918317674025) ("MB1-j3" 814.7194591807165 418.00154970663067))) :CONTROL-PT-ID 37 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 140.42499999999998 976.2458333333333 -36.795833333333334)) :NAME '"GCP 37" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j6" 801.8395198061206 761.3448503246337) ("MB1-j4" 764.8689980716023 798.5972581983676) ("MB1-j3" 851.420241153961 327.3692096631997))) :CONTROL-PT-ID 36 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 72.725 1129.3041666666666 -84.64583333333333)) :NAME '"GCP 36" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 976.4774186587418 674.0265465741342) ("MB1-j7" 991.9376914171743 817.257141919679) ("MB1-j6" 952.2621569719225 756.3335724709983) ("MB1-j5" 1005.6494368481531 659.4349126394686) ("MB1-j4" 889.7272048504754 795.0653782822288))) :CONTROL-PT-ID 35 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 92.50416666666666 1392.1999999999999 -39.64583333333333)) :NAME '"GCP 35" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 923.299497991705 635.341247869923) ("MB1-j7" 946.4524669548379 768.0516997166241) ("MB1-j6" 904.4552850255223 706.6046688776748) ("MB1-j4" 847.92755213781 746.3345383704311))) :CONTROL-PT-ID 34 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 174.55833333333334 1312.925 -53.145833333333336)) :NAME '"GCP 34" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 899.7780388904862 489.3842006097611) ("MB1-j5" 944.2748235420019 413.8295425506923) ("MB1-j3" 578.3895276083556 244.73995834185445) ("MB1-j1" 624.1315864978743 337.2675647461457))) :CONTROL-PT-ID 33 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 529.8166666666666 1297.55 -82.625)) :NAME '"GCP 33" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1079.5436875623998 629.8578799220493) ("MB1-j7" 1112.541603139703 747.6085014582928) ("MB1-j6" 1075.1603863670714 687.6897264236418) ("MB1-j5" 1092.9748693578447 581.3058374642247) ("MB1-j4" 1006.465781532967 720.3301487689093) ("MB1-j3" 745.5098314570192 62.086196073957304))) :CONTROL-PT-ID 32 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 225.72916666666669 1598.9291666666666 -64.97916666666667)) :NAME '"GCP 32" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j2" 302.53594093621257 469.24498140834567) ("MB1-j7" 1146.377145567229 642.5569808966233) ("MB1-j6" 1108.3870657053886 575.5229600648276) ("MB1-j5" 1112.5272242156785 474.09574670761583) ("MB1-j4" 1031.6429529774987 609.7413538284534))) :CONTROL-PT-ID 31 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 415.79166666666663 1641.5124999999999 -58.229166666666664)) :NAME '"GCP 31" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1191.6340350998862 550.1840644044994) ("MB1-j7" 1247.4760315869433 654.7855476598284) ("MB1-j6" 1209.0387422634645 582.9254677001345) ("MB1-j5" 1200.433997397613 472.46352359396917) ("MB1-j4" 1119.6205296606025 615.4418982782196))) :CONTROL-PT-ID 30 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 411.5208333333333 1815.5541666666668 -31.812499999999997)) :NAME '"GCP 30" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 1232.550377243537 878.1498306236348) ("MB1-j4" 1112.9348342583112 861.5043984995282) ("MB1-j1" 901.2808861110993 96.88900414025223))) :CONTROL-PT-ID 28 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 4.016666666666667 1815.4041666666665 -33.9375)) :NAME '"GCP 28" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1022.1798578546936 551.0978427490965) ("MB1-j7" 1066.0591005514753 653.4198213514404) ("MB1-j6" 1030.1344038338225 587.3787629353973) ("MB1-j5" 1050.591926467811 488.5465425710912) ("MB1-j4" 959.7804407961204 618.8075814468098) ("MB1-j3" 653.7295407646307 120.34204893847329))) :CONTROL-PT-ID 27 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 393.20833333333326 1507.9666666666667 -56.104166666666664)) :NAME '"GCP 27" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-peak-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 1135.402726312479 790.233111352083) ("MB1-j6" 1096.5627875988994 723.9457837831217) ("MB1-j5" 1121.7427792495546 616.7097440250285) ("MB1-j4" 1019.2428316879768 764.1671985722517) ("MB1-j3" 784.6093653982914 34.798493466348646) ("MB1-j1" 814.610457586805 186.1636533579569))) :CONTROL-PT-ID 26 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX 157.825 1637.5666666666666 -36.62083333333333)) :NAME '"GCP 26" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j7" 1124.3473040484169 962.5303534213859) ("MB1-j5" 1122.6252512683066 798.3417359699471) ("MB1-j4" 1019.2811406142459 957.7865329991466) ("MB1-j3" 972.8752989294275 21.071281813130156) ("MB1-j2" 331.66723627883346 119.68120161096722) ("MB1-j1" 992.9315814570888 214.90405408802644))) :CONTROL-PT-ID 25 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -166.23333333333332 1640.2708333333333 -51.283333333333324)) :NAME '"GCP 25" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 1101.9419355471155 795.1044935353759) ("MB1-j5" 1104.7571428563356 799.6833928328108) ("MB1-j3" 975.4666806160363 50.533440485512095) ("MB1-j2" 365.5 120.99995000000004) ("MB1-j1" 985.7954802856401 247.68831503888674))) :CONTROL-PT-ID 24 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -166.39166666666665 1587.6041666666666 -28.47083333333333)) :NAME '"GCP 24" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-peak-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 980.4276271434027 709.1822919543795) ("MB1-j7" 978.2429622682715 893.1165350558891) ("MB1-j6" 932.9711623876194 825.6842208245911) ("MB1-j4" 864.9641058782089 871.7885402724847))) :CONTROL-PT-ID 23 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -30.379166666666663 1376.2333333333334 10.587499999999999)) :NAME '"GCP 23" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-frob-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 991.2966868436223 783.5468745978166) ("MB1-j7" 984.3110600851918 960.5519933858562) ("MB1-j6" 939.9369751802697 904.8476043202717) ("MB1-j5" 1012.8015242452511 806.9718350413551) ("MB1-j4" 881.8150392265038 949.3322177551482) ("MB1-j2" 461.88554558086054 118.27639335553678))) :CONTROL-PT-ID 22 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -165.08333333333334 1393.9625 -22.52083333333337)) :NAME '"GCP 22" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j5" 1084.7692376759808 1028.928714459443) ("MB1-j3" 1213.825570709642 52.37561542752886))) :CONTROL-PT-ID 21 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -577.4791666666666 1562.7625 -55.40416666666667)) :NAME '"GCP 21" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-peak-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j3" 1107.2621011234653 303.5436092444744) ("MB1-j1" 1096.6186109367846 517.1625678682416))) :CONTROL-PT-ID 20 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -371.25416666666667 1142.5708333333332 -84.54583333333334)) :NAME '"GCP 20" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j3" 1260.7862942002198 113.00286752858558) ("MB1-j1" 1257.8629558708003 372.2206977572405))) :CONTROL-PT-ID 19 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -650.3166666666666 1452.8291666666665 -50.412499999999994)) :NAME '"GCP 19" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 753.830192563041 767.4789820539999) ("MB1-j7" 748.6968164450158 951.8095564668926) ("MB1-j6" 697.245198086371 898.5967917543494) ("MB1-j5" 812.7414244531981 826.051384844876) ("MB1-j3" 998.2851085113839 404.94516439548085) ("MB1-j1" 969.6487180977382 596.4584314881095))) :CONTROL-PT-ID 18 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -173.2458333333333 980.6416666666665 -24.708333333333332)) :NAME '"GCP 18" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 698.5692863013763 768.2305117354551) ("MB1-j7" 698.6100480761495 944.9760285287451) ("MB1-j5" 764.8654279355244 827.7724735614785) ("MB1-j4" 625.9647070205542 934.4359664370376) ("MB1-j3" 1000.0635365565635 457.6807288567238) ("MB1-j2" 691.1710961360069 103.27951233257463) ("MB1-j1" 968.8457049692412 644.9734023241427))) :CONTROL-PT-ID 17 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -169.77916666666667 889.1708333333332 -39.61666666666666)) :NAME '"GCP 17" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 862.5655974043367 945.0988194335436) ("MB1-j5" 897.300611856336 1023.8301179025789) ("MB1-j3" 1203.6806356708703 296.9211120782046) ("MB1-j1" 1171.5095819683436 545.6959454482093))) :CONTROL-PT-ID 16 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -533.3041666666667 1142.7583333333335 -22.97083333333333)) :NAME '"GCP 16" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j6" 612.3801014098583 1015.6145329874278) ("MB1-j5" 746.9127592182441 948.171036561649) ("MB1-j1" 1082.7648994913496 691.5686917195611))) :CONTROL-PT-ID 15 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -385.47499999999997 846.2 -38.679166666666674)) :NAME '"GCP 15" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j3" 1230.835796896931 297.4850981395904) ("MB1-j1" 1190.100208260682 557.9854380961165))) :CONTROL-PT-ID 14 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -582.4625 1142.3125 5.129166666666666)) :NAME '"GCP 14" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"smoke-stack")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 597.5820246802506 831.5537826551151) ("MB1-j6" 514.8275264434376 1006.4606648564535) ("MB1-j5" 691.0066803718886 959.3372530384438) ("MB1-j1" 1054.84184805135 794.9037156366638))) :CONTROL-PT-ID 13 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -388.625 690.7041666666665 35.92916666666666)) :NAME '"GCP 13" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 659.2310681472968 949.8187204582424) ("MB1-j1" 1193.8951335728373 781.2042827625226))) :CONTROL-PT-ID 12 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -635.975 775.6208333333333 64.67083333333334)) :NAME '"GCP 12" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 582.3698077026252 872.8672415714354) ("MB1-j5" 657.4009371196843 953.2110567643939))) :CONTROL-PT-ID 11 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -387.5583333333333 690.7208333333333 -85.59166666666666)) :NAME '"GCP 11" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 296.24265071557267 756.2869988413463) ("MB1-j7" 314.37946528666794 938.6931854334281) ("MB1-j6" 257.0758595368395 891.1338812137979) ("MB1-j5" 412.68407336137784 873.3828591831546) ("MB1-j4" 298.3388968519078 928.7663795032758) ("MB1-j3" 1040.2674200676313 848.5066566962227) ("MB1-j2" 981.3991282938077 76.28962910754422) ("MB1-j1" 965.3622434869385 1019.5921666919567))) :CONTROL-PT-ID 10 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -206.7833333333333 207.19166666666666 -54.49166666666667)) :NAME '"GCP 10" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 366.2735071883911 829.2705265043262) ("MB1-j7" 373.8825454592095 1025.6437024860777) ("MB1-j6" 310.4091425011154 982.6756888552935) ("MB1-j5" 477.078613856865 957.5296789566605) ("MB1-j4" 344.6381089256133 1018.1262037383476) ("MB1-j3" 1123.075952630567 778.5961491164536) ("MB1-j1" 1046.9640356522453 980.2174046534873))) :CONTROL-PT-ID 9 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -356.0333333333333 318.60833333333335 -39.854166666666664)) :NAME '"GCP 9" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 481.97031427197436 898.9176926954247) ("MB1-j5" 578.6656309670042 1022.8260113371084) ("MB1-j1" 1121.2444535874613 890.2910769508785))) :CONTROL-PT-ID 8 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -488.13333333333327 511.85416666666663 -41.15)) :NAME '"GCP 8" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 300.7576956372277 899.6011043398366) ("MB1-j3" 1237.0627479441894 843.4416999467051))) :CONTROL-PT-ID 7 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -547.7666666666667 199.34166666666667 1.4708333333333333)) :NAME '"GCP 7" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual structure top-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 6 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -425.09166666666664 57.23333333333333 7.929166666666666)) :NAME '"GCP 6" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"unusual roof-frob")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 304.38084801602196 866.7186693884022) ("MB1-j3" 1186.4288225674684 837.6555444222986))) :CONTROL-PT-ID 5 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -462.17499999999996 210.96666666666667 -24.945833333333333)) :NAME '"GCP 5" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 211.86133089649673 942.6700969264779) ("MB1-j3" 1278.6392284216575 916.2260307504007))) :CONTROL-PT-ID 4 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -616.1625 63.31666666666666 -40.762499999999996)) :NAME '"GCP 4" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :2D-POINT-LIST (ASSOCIATE-2D-PT-LIST-WITH-2D-WORLDS '(("MB1-j8" 72.08637231145547 729.4323418051787) ("MB1-j7" 101.65110542565729 929.6443946342926) ("MB1-j6" 42.30018239237131 878.710553087967) ("MB1-j5" 216.2409878813079 889.4704615090574) ("MB1-j4" 117.25133706101473 916.5659946662208) ("MB1-j2" 1144.8416452988129 73.75277721773145))) :CONTROL-PT-ID 3 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -211.08333333333332 -173.25833333333333 -29.54583333333333)) :NAME '"GCP 3" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"roof-corner")) (MAKE-INSTANCE 'CONJUGATE-POINT-OBJECT :CONTROL-PT-ID 2 :OBJECT-TO-WORLD-TRANSFORM (MAKE-INSTANCE '4X4-COORDINATE-TRANSFORM :TRANSFORM-MATRIX (MAKE-COORD-FRAME-MATRIX -604.2166666666667 -178.775 -85.53333333333333)) :NAME '"GCP 2" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DESCRIPTION '"ground-corner"))) :NAME '"MB1 GCPs" :WORLD (GET-OR-MAKE-3D-WORLD :NAME "Radius Model Board 1") :PROPERTY-LIST (LIST ':DRAWING-COMPLEXITY 'NIL)) ))