Ignore:
Timestamp:
06/03/13 11:21:19 (8 years ago)
Author:
ymipsl
Message:

Enhancement : Add fortran interface to know if an attribute is set or not
ex : CALL xios_is_defined_field_attr("field_A",enabled=ok)

YM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XIOS/trunk/src/interface/c_attr/icaxisgroup_attr.cpp

    r416 r432  
    3535  } 
    3636   
     37  bool cxios_is_defined_axisgroup_group_ref(axisgroup_Ptr axisgroup_hdl ) 
     38  { 
     39     CTimer::get("XIOS").resume(); 
     40    return !axisgroup_hdl->group_ref.isEmpty(); 
     41     CTimer::get("XIOS").suspend(); 
     42  } 
     43   
     44   
    3745   
    3846  void cxios_set_axisgroup_long_name(axisgroup_Ptr axisgroup_hdl, const char * long_name, int long_name_size) 
     
    5462  } 
    5563   
     64  bool cxios_is_defined_axisgroup_long_name(axisgroup_Ptr axisgroup_hdl ) 
     65  { 
     66     CTimer::get("XIOS").resume(); 
     67    return !axisgroup_hdl->long_name.isEmpty(); 
     68     CTimer::get("XIOS").suspend(); 
     69  } 
     70   
     71   
    5672   
    5773  void cxios_set_axisgroup_name(axisgroup_Ptr axisgroup_hdl, const char * name, int name_size) 
     
    7389  } 
    7490   
     91  bool cxios_is_defined_axisgroup_name(axisgroup_Ptr axisgroup_hdl ) 
     92  { 
     93     CTimer::get("XIOS").resume(); 
     94    return !axisgroup_hdl->name.isEmpty(); 
     95     CTimer::get("XIOS").suspend(); 
     96  } 
     97   
     98   
    7599   
    76100  void cxios_set_axisgroup_positive(axisgroup_Ptr axisgroup_hdl, const char * positive, int positive_size) 
     
    92116  } 
    93117   
     118  bool cxios_is_defined_axisgroup_positive(axisgroup_Ptr axisgroup_hdl ) 
     119  { 
     120     CTimer::get("XIOS").resume(); 
     121    return !axisgroup_hdl->positive.isEmpty(); 
     122     CTimer::get("XIOS").suspend(); 
     123  } 
     124   
     125   
    94126   
    95127  void cxios_set_axisgroup_size(axisgroup_Ptr axisgroup_hdl, int size) 
     
    106138  } 
    107139   
     140  bool cxios_is_defined_axisgroup_size(axisgroup_Ptr axisgroup_hdl ) 
     141  { 
     142     CTimer::get("XIOS").resume(); 
     143    return !axisgroup_hdl->size.isEmpty(); 
     144     CTimer::get("XIOS").suspend(); 
     145  } 
     146   
     147   
    108148   
    109149  void cxios_set_axisgroup_standard_name(axisgroup_Ptr axisgroup_hdl, const char * standard_name, int standard_name_size) 
     
    125165  } 
    126166   
     167  bool cxios_is_defined_axisgroup_standard_name(axisgroup_Ptr axisgroup_hdl ) 
     168  { 
     169     CTimer::get("XIOS").resume(); 
     170    return !axisgroup_hdl->standard_name.isEmpty(); 
     171     CTimer::get("XIOS").suspend(); 
     172  } 
     173   
     174   
    127175   
    128176  void cxios_set_axisgroup_unit(axisgroup_Ptr axisgroup_hdl, const char * unit, int unit_size) 
     
    143191     CTimer::get("XIOS").suspend(); 
    144192  } 
     193   
     194  bool cxios_is_defined_axisgroup_unit(axisgroup_Ptr axisgroup_hdl ) 
     195  { 
     196     CTimer::get("XIOS").resume(); 
     197    return !axisgroup_hdl->unit.isEmpty(); 
     198     CTimer::get("XIOS").suspend(); 
     199  } 
     200   
    145201   
    146202   
     
    162218  } 
    163219   
     220  bool cxios_is_defined_axisgroup_value(axisgroup_Ptr axisgroup_hdl ) 
     221  { 
     222     CTimer::get("XIOS").resume(); 
     223    return !axisgroup_hdl->value.isEmpty(); 
     224     CTimer::get("XIOS").suspend(); 
     225  } 
     226   
     227   
    164228   
    165229  void cxios_set_axisgroup_zoom_begin(axisgroup_Ptr axisgroup_hdl, int zoom_begin) 
     
    176240  } 
    177241   
     242  bool cxios_is_defined_axisgroup_zoom_begin(axisgroup_Ptr axisgroup_hdl ) 
     243  { 
     244     CTimer::get("XIOS").resume(); 
     245    return !axisgroup_hdl->zoom_begin.isEmpty(); 
     246     CTimer::get("XIOS").suspend(); 
     247  } 
     248   
     249   
    178250   
    179251  void cxios_set_axisgroup_zoom_end(axisgroup_Ptr axisgroup_hdl, int zoom_end) 
     
    190262  } 
    191263   
     264  bool cxios_is_defined_axisgroup_zoom_end(axisgroup_Ptr axisgroup_hdl ) 
     265  { 
     266     CTimer::get("XIOS").resume(); 
     267    return !axisgroup_hdl->zoom_end.isEmpty(); 
     268     CTimer::get("XIOS").suspend(); 
     269  } 
     270   
     271   
    192272   
    193273  void cxios_set_axisgroup_zoom_size(axisgroup_Ptr axisgroup_hdl, int zoom_size) 
     
    204284  } 
    205285   
     286  bool cxios_is_defined_axisgroup_zoom_size(axisgroup_Ptr axisgroup_hdl ) 
     287  { 
     288     CTimer::get("XIOS").resume(); 
     289    return !axisgroup_hdl->zoom_size.isEmpty(); 
     290     CTimer::get("XIOS").suspend(); 
     291  } 
     292   
     293   
    206294   
    207295   
Note: See TracChangeset for help on using the changeset viewer.