@@ -16,46 +16,68 @@ function printVariable( io::IO, vert::DFGVariable;
16
16
if short
17
17
# opmemt = (getVariableType(vert) |> typeof ).name
18
18
vari = getVariableType (vert) |> typeof
19
- printstyled (ioc, typeof (vert). name, " {" ,vari. name," ...}" ," \n " , bold= true )
19
+ printstyled (ioc, typeof (vert). name. name, " {" ,bold= true )
20
+ printstyled (ioc, vari. name. name, bold= true , color= :blue )
21
+ printstyled (ioc," ...}" , bold= true )
22
+ println (ioc, " " )
20
23
# printstyled(ioc, summary(vert),"\n", bold=true)
21
24
22
- vnd = getSolverData (vert)
23
- println (ioc, " timestamp: " , vert. timestamp)
24
- println (ioc, " label: " , vert. label)
25
- println (ioc, " solvable: " , getSolvable (vert))
26
- println (ioc, " initilized: " , isInitialized (vert))
27
- println (ioc, " tags: " , getTags (vert))
28
25
try
29
- print (ioc, " manifold: " )
26
+ print (ioc, " manifold: " )
30
27
show (ioc, getManifold (vert))
31
28
println (ioc, " " )
32
29
catch e
33
30
end
31
+ vnd = getSolverData (vert, :default )
32
+ println (ioc, " timestamp: " , vert. timestamp)
33
+ println (ioc, " nstime: " , vert. nstime)
34
+ print (ioc, " label: " )
35
+ printstyled (ioc, vert. label, bold= true )
36
+ println (ioc)
37
+ println (ioc, " solvable: " , getSolvable (vert))
38
+ println (ioc, " tags: " , getTags (vert))
34
39
solk = listSolveKeys (vert) |> collect
35
40
lsolk = length (solk)
36
41
smsk = (rand (1 : lsolk,100 ) |> unique)[1 : minimum ([4 ,lsolk])]
37
- println (ioc, " Nr solveKeys=$(lsolk) : " , solk[smsk], 4 < lsolk ? " ..." : " " )
38
- printstyled (ioc, " :default <-- VariableNodeData" , " \n " , bold= true )
39
- println (ioc, " size marginal samples: " , size (vnd. val))
40
- println (ioc, " kde bandwidths: " , round .((vnd. bw)[:,1 ], digits= 4 ))
42
+ # list the marginalization status
43
+ ismarg = solk .| > x-> isMarginalized (vert, x)
44
+ isinit = solk .| > x-> isInitialized (vert, x)
45
+ printstyled (ioc, " # VND solveKeys= ($(lsolk) )" , bold= true )
46
+ println (ioc, " " )
47
+ printstyled (ioc, " # initialized: " , bold= true )
48
+ println (ioc, " (true=" , sum (isinit), " ,false=" , length (isinit) - sum (isinit), " )" )
49
+ printstyled (ioc, " # marginalized: " , bold= true )
50
+ println (ioc, " (true=" , sum (ismarg), " ,false=" , length (ismarg) - sum (ismarg), " )" )
51
+
52
+ println (ioc, " :default <-- VariableNodeData" )
53
+ println (ioc, " initilized: " , isInitialized (vert, :default ))
54
+ println (ioc, " marginalized: " , isMarginalized (vert, :default ))
55
+ println (ioc, " size bel. samples: " , size (vnd. val))
56
+ println (ioc, " kde bandwidths: " , round .((vnd. bw)[:,1 ], digits= 4 ))
57
+ printstyled (ioc, " VNDs: " ,bold= true )
58
+ println (ioc, solk[smsk], 4 < lsolk ? " ..." : " " )
59
+ printstyled (ioc, " # PPE solveKeys= ($(length (getPPEDict (vert))) )" , bold= true )
60
+ println (ioc, " " )
41
61
if haskey (getPPEDict (vert), :default )
42
- printstyled (ioc, " :default " , bold = true )
43
- println (ioc, " <-- PPE .suggested: " , round .(ppe . suggested,digits= 4 ) )
62
+ print (ioc, " :default " )
63
+ println (ioc, " <-- .suggested: " , round .(getPPE (vert, :default ) . suggested,digits= 4 ) )
44
64
end
45
- maxkeys = 3
65
+ maxkeys = 4
46
66
for (key, ppe) in getPPEDict (vert)
67
+ key == :default && continue # skip as default is done separately
47
68
maxkeys -= 1
48
69
maxkeys == 0 && break
49
- printstyled (ioc, " :$key " , bold = true )
50
- println (ioc, " <-- PPE .suggested: " , round .(ppe. suggested,digits= 4 ) )
70
+ print (ioc, " :$key " )
71
+ println (ioc, " <-- .suggested: " , round .(ppe. suggested,digits= 4 ) )
51
72
end
52
- printstyled (ioc, " TYPE : " , bold = true , color= :blue )
73
+ printstyled (ioc, " VariableType : " , color= :blue , bold = true )
53
74
println (ioc, vari)
54
75
# println(ioc, "kde max: $(round.(getKDEMax(getKDE(vnd)),digits=4))")
55
76
# println(ioc, "kde max: $(round.(getKDEMax(getKDE(vnd)),digits=4))")
56
77
else
57
78
58
- printstyled (ioc, summary (vert)," \n " , bold= true , color= :blue )
79
+ printstyled (ioc, summary (vert), bold= true , color= :blue )
80
+ println (ioc, " " )
59
81
60
82
:solver in skipfields && push! (skipfields, :solverDataDict )
61
83
:ppe in skipfields && push! (skipfields, :ppeDict )
@@ -65,7 +87,8 @@ function printVariable( io::IO, vert::DFGVariable;
65
87
nf = nfields (vert)
66
88
67
89
for f in fields
68
- printstyled (ioc, f," :\n " , color= :blue )
90
+ printstyled (ioc, f," :" , color= :blue )
91
+ println (ioc, " " )
69
92
show (ioc, getproperty (vert, f))
70
93
println (ioc)
71
94
end
@@ -85,20 +108,22 @@ function printFactor( io::IO, vert::DFGFactor;
85
108
opmemt = (getSolverData (vert). fnc |> typeof). name
86
109
fct = getFactorType (vert)
87
110
fctt = fct |> typeof
88
- printstyled (ioc, typeof (vert). name, " {" ,opmemt," {" ,fctt. name," ...}}" ," \n " , bold= true )
89
- println (ioc, " timestamp: " , vert. timestamp)
90
- println (ioc, " nstime: " ,vert. nstime)
91
- println (ioc, " label: " , vert. label)
92
- println (ioc, " solvable: " , vert. solvable)
111
+ printstyled (ioc, typeof (vert). name. name, " {" ,opmemt," {" ,fctt. name. name," ...}}" ," \n " , bold= true )
112
+ println (ioc, " timestamp: " , vert. timestamp)
113
+ println (ioc, " nstime: " , vert. nstime)
114
+ print (ioc, " label: " )
115
+ printstyled (ioc, vert. label, bold= true )
116
+ println (ioc)
117
+ println (ioc, " solvable: " , vert. solvable)
93
118
println (ioc, " VariableOrder: " , vert. _variableOrderSymbols)
94
- println (ioc, " multihypo: " , getSolverData (vert). multihypo) # FIXME #477
95
- println (ioc, " nullhypo: " , getSolverData (vert). nullhypo)
96
- println (ioc, " tags: " , vert. tags)
97
- printstyled (ioc, " TYPE : " , bold= true , color= :blue )
119
+ println (ioc, " multihypo: " , getSolverData (vert). multihypo) # FIXME #477
120
+ println (ioc, " nullhypo: " , getSolverData (vert). nullhypo)
121
+ println (ioc, " tags: " , vert. tags)
122
+ printstyled (ioc, " FactorType : " , bold= true , color= :blue )
98
123
println (ioc, fctt)
99
124
# show(ioc, fctt)
100
125
for f in setdiff (fieldnames (fctt), skipfields)
101
- printstyled (ioc, f," :\n " , color= :blue )
126
+ printstyled (ioc, f," :\n " , color= :magenta )
102
127
show (ioc, getproperty (fct, f))
103
128
println (ioc)
104
129
end
0 commit comments