Function A000238