f90 + c + cuda OK!