mirror of
https://github.com/OPM/ResInsight.git
synced 2025-01-08 07:03:25 -06:00
04091ad77d
Use commit 0e1e780fd6f18ce93119061e36a4fca9711bc020 Excluded multibuild folder, as this caused git issues
49 lines
1.4 KiB
C
49 lines
1.4 KiB
C
/*
|
|
Copyright (C) 2012 Equinor ASA, Norway.
|
|
|
|
The file 'grdecl_test.c' is part of ERT - Ensemble based Reservoir Tool.
|
|
|
|
ERT is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
ERT is distributed in the hope that it will be useful, but WITHOUT ANY
|
|
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
See the GNU General Public License at <http://www.gnu.org/licenses/gpl.html>
|
|
for more details.
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
#include <ert/util/util.h>
|
|
#include <ert/util/timer.h>
|
|
|
|
#include <ert/ecl/ecl_kw.h>
|
|
|
|
|
|
int main(int argc , char ** argv) {
|
|
FILE * stream = util_fopen( argv[1] , "r");
|
|
timer_type * timer = timer_alloc(false);
|
|
{
|
|
while (true) {
|
|
ecl_kw_type * grdecl_kw;
|
|
timer_start( timer );
|
|
grdecl_kw = ecl_kw_fscanf_alloc_current_grdecl( stream , ECL_FLOAT );
|
|
timer_stop( timer );
|
|
|
|
if (grdecl_kw != NULL) {
|
|
printf("Loaded %s - %d elements : %g \n", ecl_kw_get_header( grdecl_kw ) , ecl_kw_get_size( grdecl_kw ) , timer_get_total_time( timer ));
|
|
ecl_kw_free( grdecl_kw );
|
|
} else
|
|
break;
|
|
|
|
}
|
|
}
|
|
|
|
fclose( stream );
|
|
}
|