Function A000040