Initial revision
program pe x = 123.456 write(*,'(3pe8.1,5x,0pe9.5e0)') x, 123456789e14 end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.