1 #include <iostream>
 2 
 3 extern "C" {
 4 
 5 double
 6 dlamch_(char *c);
 7 
 8 // extern "C"
 9 
10 int
11 main()
12 {
13     char c = 'p';
14     std::cout << dlamch_(&c) << std::endl;
15 }