RosettaCodeData/Task/Call-a-function-in-a-shared-library/Fortran/call-a-function-in-a-shared-library-1.f
2023-07-01 13:44:08 -04:00

4 lines
55 B
Forth

double add_n(double* a, double* b)
{
return *a + *b;
}