fortran to c codes