Function Write-Part-Graph

Part of:

package tinaa
( write-part-graph < writer > < part > )