#include void*f_c_pointer_c_(void**f_pointer) { return(*f_pointer); } void*f_c_procedure_c_(void*f_pointer) { return(f_pointer); } void c_f_pointer_c_(void**c_pointer,void**f_pointer) { *f_pointer= *c_pointer; } int stride_c_long_(long int*var1,long int*var2) { return(var2-var1); } int stride_c_long_long_(long long int*var1,long long int*var2) { return(var2-var1); } int stride_c_float_(float*var1,float*var2) { return(var2-var1); } int stride_c_double_(double*var1,double*var2) { return(var2-var1); } int stride_c_bool_(_Bool*var1,_Bool*var2) { return(var2-var1); } int stride_c_signed_char_(signed char*var1,signed char*var2) { return(var2-var1); } int stride_c_short_(short int*var1,short int*var2) { return(var2-var1); } int stride_c_char_(char*var1,char*var2) { return(var2-var1); }