1This code was written by Rainer Schรถpf.