1 (c12) gentran(data("a(10)", 3.1416159, 9.0, 8.1728907, 0.009988, 0.99887766,
2 8.7906, 6.5432, 1.2345, 0.12345, 98.098, 7654.0987, 11.1111111))
4 data a(10)/3.1416159,9.0,8.1728907,0.009988,0.99887766,8.7906,
5 . 6.5432,1.2345,0.12345,98.098,7654.0987,11.1111111/