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