Changeset 675 for codes/icosagcm


Ignore:
Timestamp:
01/31/18 18:46:37 (6 years ago)
Author:
dubos
Message:

devel/unstructured : bugfix profiling

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/devel/src/unstructured/data_unstructured.F90

    r670 r675  
    4848       id_solver=10, id_slow_NH=11, id_NH_geopot=12, id_vert_NH=13, id_update=14, nb_routines=14  
    4949  DBL, PRIVATE :: start_time, time_spent(nb_routines) ! time spent in each kernel 
    50   INTEGER, PRIVATE :: current_id, nb_calls(nb_routines), bytes(nb_routines) ! bytes read or written be each kernel 
     50  INTEGER, PRIVATE :: current_id, nb_calls(nb_routines) 
     51  INTEGER(KIND=8), PRIVATE :: bytes(nb_routines) ! bytes read or written by each kernel 
    5152  CHARACTER(len = 10) :: id_name(nb_routines) = & 
    5253       (/'dev1      ', 'dev2      ', & 
Note: See TracChangeset for help on using the changeset viewer.