Select Code to Download

#!perl -slw
use strict;
...
1
1-exp(-7-e17): 0.00000000000000000

#!perl -slw
use strict;
...
1
1-exp(-7-e17): 1.00000000000000000