Files
CoolProp/wrappers/Fortran/simple_example/myfunc.cpp
2014-06-20 11:56:35 +02:00

11 lines
147 B
C++

extern "C" void myfunc(int a, double b, double c[]);
int main()
{
double c[20];
for (int i=0; i<20; i++)
c[i] = double(i);
myfunc(1, 42.0, c);
}