add source code c and fortran