set top_net [getTopNet $net]
set SAVED_WITH_VERSION {1.4.1 Created Mon Jun 28 20:28:08  2004.  Installed using a single-file installation}
setDefaultCompareMode $net switch_to_question
set x 384
set y 233
set desc {Goal cluster}
set name {1GOAL}
set color #ccccff
set iconUU {}
set iconFont "-*-arial-bold-i-normal-*-12-*-*-*-*-*"
set winFont "-*-arial-bold-r-normal-*-16-*-*-*-*-*"
set width 102
set height 69
set clusterName {1GOAL}
set clusterCompareWord {important}
makeCluster $net $x $y $name $desc
clusterChangeColor $net $name $color
setClusterIconUU $net $name $iconUU
setClusterIconFont $net $name $iconFont
setClusterTitleFont $net $name $winFont
setClusterWinSize $net $name $width $height
setClusterCompareWord $net $name $clusterCompareWord
deIconizeCluster $net $name
set name {Goal Node}
set desc {Buy best house}
set x 10
set y 10
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set x 85
set y 375
set desc {criteria for house}
set name {2CRITERIA}
set color #ffe8f3
set iconUU {}
set iconFont "-*-arial-bold-i-normal-*-12-*-*-*-*-*"
set winFont "-*-arial-bold-r-normal-*-16-*-*-*-*-*"
set width 739
set height 59
set clusterName {2CRITERIA}
set clusterCompareWord {important}
makeCluster $net $x $y $name $desc
clusterChangeColor $net $name $color
setClusterIconUU $net $name $iconUU
setClusterIconFont $net $name $iconFont
setClusterTitleFont $net $name $winFont
setClusterWinSize $net $name $width $height
setClusterCompareWord $net $name $clusterCompareWord
deIconizeCluster $net $name
set name {1Size of House}
set desc {description}
set x 0
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {2Yard Space}
set desc {Amount of yard space}
set x 119
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {3Transportation}
set desc {Ease of transportation}
set x 225
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {4Modern Facilities}
set desc {Modern conveniences in the house}
set x 355
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {5Neighborhood}
set desc {Type of neighborhood}
set x 499
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {6General Condition}
set desc {Condition of house}
set x 617
set y -1
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {7Age of House}
set desc {Age of house}
set x 776
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {8Financing}
set desc {Type of financing available}
set x 894
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set x 338
set y 534
set desc {Alternative houses}
set name {3ALTERNATIVES}
set color #e1ffff
set iconUU {}
set iconFont "-*-arial-bold-i-normal-*-12-*-*-*-*-*"
set winFont "-*-arial-bold-r-normal-*-16-*-*-*-*-*"
set width 260
set height 41
set clusterName {3ALTERNATIVES}
set clusterCompareWord {important}
makeCluster $net $x $y $name $desc
clusterChangeColor $net $name $color
setClusterIconUU $net $name $iconUU
setClusterIconFont $net $name $iconFont
setClusterTitleFont $net $name $winFont
setClusterWinSize $net $name $width $height
setClusterCompareWord $net $name $clusterCompareWord
deIconizeCluster $net $name
set name {House A}
set desc {Big old house in near Pgh suburb.  Great transportation. General Condition shabby.  Semi-modernized.}
set x 0
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {House B}
set desc {Far Pgh suburbs.  New house.  Long commute to job in town.  Financing good.  Moderate space, good yard.}
set x 77
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set name {House C}
set desc {Condomium on Mount Washington in Pgh.  Size small, no yard.  Great transportation.  Modern.  Neighborhood not good for kids.  Excellent condition.  High priced - financing iffy.}
set x 154
set y 0
set color {#e6e6e6}
set iconUU {}
set font {-*-helvetica-bold-i-normal-*-14-*-*-*-*-*}
makeNode $net $clusterName $name $desc $x $y
setNodeIconUU $net $name $iconUU
setNodeColor $net $name $color
setNodeFont $net $name $font
set init {1GOAL}
set final {2CRITERIA}
connectClusters $net $init $final
set init {2CRITERIA}
set final {3ALTERNATIVES}
connectClusters $net $init $final
nodeCompareFinished $net {1Size of House} {3ALTERNATIVES} 1
setNodeCompareWord  $net {1Size of House} {3ALTERNATIVES} {important}
nodeCompareFinished $net {2Yard Space} {3ALTERNATIVES} 1
setNodeCompareWord  $net {2Yard Space} {3ALTERNATIVES} {important}
nodeCompareFinished $net {3Transportation} {3ALTERNATIVES} 1
setNodeCompareWord  $net {3Transportation} {3ALTERNATIVES} {important}
nodeCompareFinished $net {4Modern Facilities} {3ALTERNATIVES} 1
setNodeCompareWord  $net {4Modern Facilities} {3ALTERNATIVES} {important}
nodeCompareFinished $net {5Neighborhood} {3ALTERNATIVES} 1
setNodeCompareWord  $net {5Neighborhood} {3ALTERNATIVES} {important}
nodeCompareFinished $net {6General Condition} {3ALTERNATIVES} 1
setNodeCompareWord  $net {6General Condition} {3ALTERNATIVES} {important}
nodeCompareFinished $net {7Age of House} {3ALTERNATIVES} 1
setNodeCompareWord  $net {7Age of House} {3ALTERNATIVES} {important}
nodeCompareFinished $net {8Financing} {3ALTERNATIVES} 1
setNodeCompareWord  $net {8Financing} {3ALTERNATIVES} {important}
nodeCompareFinished $net {Goal Node} {2CRITERIA} 1
setNodeCompareWord  $net {Goal Node} {2CRITERIA} {important}
setNetCompareWord $net {important}
setNetClusterColor $net {#78b8fe}
setNetNodeColor $net {#768698}
setNetClusterWinFont $net {-*-arial-bold-r-normal-*-12-*-*-*-*-*}
setNetClusterIconFont $net {-*-arial-bold-i-normal-*-12-*-*-*-*-*}
setNetNodeFont $net {-*-times-medium-r-normal-*-12-*-*-*-*-*}
setFormulaType $net 0
#Working on net 0
catch {limitPowerOptions $net 2 0}
c-network readAllCompares -network $net -source {
3
1GOAL
1
Goal Node
2CRITERIA
8
1Size of House
2Yard Space
3Transportation
4Modern Facilities
5Neighborhood
6General Condition
7Age of House
8Financing
3ALTERNATIVES
3
House A
House B
House C
3 1,0 0,1 2,2 
 0.000000  1.000000  0.000000 
 0.000000  0.000000  0.000000 
 1.000000  0.000000  0.000000 
0
1 1,0 

1
1 2,0 

2
0 

0,0,1
8 0,0 1,1 2,2 3,3 4,4 5,5 6,6 7,7 
 3.203704  0.919724  9.885714  5.580645  4.765840  1.036549  0.519208 
 0.287081  3.085714  1.741935  1.487603  0.323547  0.162065 
 10.748571  6.067742  5.181818  1.127022  0.564526 
 0.564516  0.482094  0.104853  0.052521 
 0.853994  0.185740  0.093037 
 0.217496  0.108944 
 0.500900 

1,0,2
3 0,0 1,1 2,2 
 4.161237  7.000000 
 2.773354 

1,1,2
3 0,0 1,1 2,2 
 0.333333  2.988027 
 7.000000 

1,2,2
3 0,0 1,1 2,2 
 4.277064  0.327204 
 0.200000 

1,3,2
3 0,0 1,1 2,2 
 0.250000  0.142857 
 0.250000 

1,4,2
3 0,0 1,1 2,2 
 6.000000  8.000000 
 4.000000 

1,5,2
3 0,0 1,1 2,2 
 0.142857  0.111111 
 0.500000 

1,6,2
3 0,0 1,1 2,2 
 0.166667  0.125000 
 0.500000 

1,7,2
3 0,0 1,1 2,2 
 0.250000  3.000000 
 6.000000 

}

set FORMAT 1
recreateNetInsideFrameOnly $net