Write initial marking in petrinet_write.