⁵This code was written by Francis J. Wright.