Code for the paper "Iterative solvers for partial differential equations with Hamiltonian structure: Operator preconditioning and optimal control" by Volker Mehrmann, Manuel Schaller and Martin Stoll