void MUMPS_CALL MUMPS_OOC_SET_FILE_NAME_C(int* type, int* indice, int* length, int *ierr, char* name, mumps_ftnlen l1) { *ierr=mumps_io_set_file_name(indice,name,length,type); return; }
void MUMPS_CALL MUMPS_OOC_SET_FILE_NAME_C(MUMPS_INT *type, MUMPS_INT *indice, MUMPS_INT *length, MUMPS_INT *ierr, char* name, mumps_ftnlen l1) { int type_loc,indice_loc,length_loc; type_loc=(int)*type; indice_loc=(int)*indice; length_loc=(int)*length; *ierr=(MUMPS_INT)mumps_io_set_file_name(&indice_loc,name,&length_loc,&type_loc); return; }