basic interoperability (calling a f90 function from c++)