fix bug in the examples of fortran_call