63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
# File 'lib/chem/db/smbl.rb', line 63
def make_SPN(m, out)
out.puts "digraph SPN {"
tab = 3
m.species.keys.each do |k|
out.puts "%s \"%s\" [shape=circle];" % [" " * tab, k]
end
out.puts
m.reactions.each do |r|
out.puts "%s \"%s\" [shape=box]" % [" " * tab, r.name]
r.reactants.each do |r_sp|
out.puts "%s \"%s\" -> \"%s\" [label=\"%s\"];" % [" " * tab, r_sp[0].name, r.name, r_sp[1]]
end
out.puts
r.products.each do |r_sp|
out.puts "%s \"%s\" -> \"%s\"" % [" " * tab, r.name, r_sp[0].name]
end
end
out.puts "}"
out.close
end
|