Ignore:
Timestamp:
02/11/15 16:47:47 (9 years ago)
Author:
mhnguyen
Message:

Updating some Fortran interface files

+) Update some Fortran interface files generated by generate_fortran_interface.exe

Test
+) No test

File:
1 edited

Legend:

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

    r546 r555  
    4444   
    4545   
     46  void cxios_set_axis_data_begin(axis_Ptr axis_hdl, int data_begin) 
     47  { 
     48     CTimer::get("XIOS").resume(); 
     49    axis_hdl->data_begin.setValue(data_begin); 
     50     CTimer::get("XIOS").suspend(); 
     51  } 
     52   
     53  void cxios_get_axis_data_begin(axis_Ptr axis_hdl, int* data_begin) 
     54  { 
     55    *data_begin = axis_hdl->data_begin.getInheritedValue(); 
     56  } 
     57   
     58  bool cxios_is_defined_axis_data_begin(axis_Ptr axis_hdl ) 
     59  { 
     60     CTimer::get("XIOS").resume(); 
     61    return axis_hdl->data_begin.hasInheritedValue(); 
     62     CTimer::get("XIOS").suspend(); 
     63  } 
     64   
     65   
     66   
     67  void cxios_set_axis_data_index(axis_Ptr axis_hdl, int* data_index, int extent1) 
     68  { 
     69    CTimer::get("XIOS").resume(); 
     70    CArray<int,1> tmp(data_index,shape(extent1),neverDeleteData) ; 
     71    axis_hdl->data_index.reference(tmp.copy()); 
     72     CTimer::get("XIOS").suspend(); 
     73  } 
     74   
     75  void cxios_get_axis_data_index(axis_Ptr axis_hdl, int* data_index, int extent1) 
     76  { 
     77    CTimer::get("XIOS").resume(); 
     78    CArray<int,1> tmp(data_index,shape(extent1),neverDeleteData) ; 
     79    tmp=axis_hdl->data_index.getInheritedValue() ; 
     80     CTimer::get("XIOS").suspend(); 
     81  } 
     82   
     83  bool cxios_is_defined_axis_data_index(axis_Ptr axis_hdl ) 
     84  { 
     85     CTimer::get("XIOS").resume(); 
     86    return axis_hdl->data_index.hasInheritedValue(); 
     87     CTimer::get("XIOS").suspend(); 
     88  } 
     89   
     90   
     91   
     92  void cxios_set_axis_data_n(axis_Ptr axis_hdl, int data_n) 
     93  { 
     94     CTimer::get("XIOS").resume(); 
     95    axis_hdl->data_n.setValue(data_n); 
     96     CTimer::get("XIOS").suspend(); 
     97  } 
     98   
     99  void cxios_get_axis_data_n(axis_Ptr axis_hdl, int* data_n) 
     100  { 
     101    *data_n = axis_hdl->data_n.getInheritedValue(); 
     102  } 
     103   
     104  bool cxios_is_defined_axis_data_n(axis_Ptr axis_hdl ) 
     105  { 
     106     CTimer::get("XIOS").resume(); 
     107    return axis_hdl->data_n.hasInheritedValue(); 
     108     CTimer::get("XIOS").suspend(); 
     109  } 
     110   
     111   
     112   
     113  void cxios_set_axis_ibegin(axis_Ptr axis_hdl, int ibegin) 
     114  { 
     115     CTimer::get("XIOS").resume(); 
     116    axis_hdl->ibegin.setValue(ibegin); 
     117     CTimer::get("XIOS").suspend(); 
     118  } 
     119   
     120  void cxios_get_axis_ibegin(axis_Ptr axis_hdl, int* ibegin) 
     121  { 
     122    *ibegin = axis_hdl->ibegin.getInheritedValue(); 
     123  } 
     124   
     125  bool cxios_is_defined_axis_ibegin(axis_Ptr axis_hdl ) 
     126  { 
     127     CTimer::get("XIOS").resume(); 
     128    return axis_hdl->ibegin.hasInheritedValue(); 
     129     CTimer::get("XIOS").suspend(); 
     130  } 
     131   
     132   
     133   
    46134  void cxios_set_axis_long_name(axis_Ptr axis_hdl, const char * long_name, int long_name_size) 
    47135  { 
     
    70158   
    71159   
     160  void cxios_set_axis_mask(axis_Ptr axis_hdl, bool* mask, int extent1) 
     161  { 
     162    CTimer::get("XIOS").resume(); 
     163    CArray<bool,1> tmp(mask,shape(extent1),neverDeleteData) ; 
     164    axis_hdl->mask.reference(tmp.copy()); 
     165     CTimer::get("XIOS").suspend(); 
     166  } 
     167   
     168  void cxios_get_axis_mask(axis_Ptr axis_hdl, bool* mask, int extent1) 
     169  { 
     170    CTimer::get("XIOS").resume(); 
     171    CArray<bool,1> tmp(mask,shape(extent1),neverDeleteData) ; 
     172    tmp=axis_hdl->mask.getInheritedValue() ; 
     173     CTimer::get("XIOS").suspend(); 
     174  } 
     175   
     176  bool cxios_is_defined_axis_mask(axis_Ptr axis_hdl ) 
     177  { 
     178     CTimer::get("XIOS").resume(); 
     179    return axis_hdl->mask.hasInheritedValue(); 
     180     CTimer::get("XIOS").suspend(); 
     181  } 
     182   
     183   
     184   
    72185  void cxios_set_axis_name(axis_Ptr axis_hdl, const char * name, int name_size) 
    73186  { 
     
    96209   
    97210   
     211  void cxios_set_axis_ni(axis_Ptr axis_hdl, int ni) 
     212  { 
     213     CTimer::get("XIOS").resume(); 
     214    axis_hdl->ni.setValue(ni); 
     215     CTimer::get("XIOS").suspend(); 
     216  } 
     217   
     218  void cxios_get_axis_ni(axis_Ptr axis_hdl, int* ni) 
     219  { 
     220    *ni = axis_hdl->ni.getInheritedValue(); 
     221  } 
     222   
     223  bool cxios_is_defined_axis_ni(axis_Ptr axis_hdl ) 
     224  { 
     225     CTimer::get("XIOS").resume(); 
     226    return axis_hdl->ni.hasInheritedValue(); 
     227     CTimer::get("XIOS").suspend(); 
     228  } 
     229   
     230   
     231   
    98232  void cxios_set_axis_positive(axis_Ptr axis_hdl, const char * positive, int positive_size) 
    99233  { 
Note: See TracChangeset for help on using the changeset viewer.