xref
: /
original-bsd
/
usr.bin
/
f77
/
libI77
/
test
/
pe.f
(revision d324e8e3)
Home
History
Annotate
Line#
Scopes#
Navigate#
Raw
Download
current directory
1
program
pe
2
x
=
123.456
3
write
(*,
'(3pe8.1,5x,0pe9.5e0)'
)
x
,
123456789
e14
4
end
5