void ecl_file_kw_inplace_fwrite( ecl_file_kw_type * file_kw , fortio_type * fortio) { ecl_file_kw_assert_kw( file_kw ); fortio_fseek( fortio , file_kw->file_offset , SEEK_SET ); ecl_kw_fskip_header( fortio ); fortio_fclean(fortio); ecl_kw_fwrite_data( file_kw->kw , fortio ); }
void ecl_kw_fprintf_grdecl__(const ecl_kw_type * ecl_kw , const char * special_header , FILE * stream) { if (special_header) fprintf(stream,"%s\n" , special_header); else fprintf(stream,"%s\n" , ecl_kw_get_header(ecl_kw)); { fortio_type * fortio = fortio_alloc_FILE_wrapper(NULL , false , true , stream); /* Endian flip should *NOT* be used */ ecl_kw_fwrite_data(ecl_kw , fortio); fortio_free_FILE_wrapper( fortio ); } fprintf(stream,"/\n"); }