#ifndef __XIOS_CArray_mac__ #define __XIOS_CArray_mac__ /// ////////////////////// Macros ////////////////////// /// // Type Fortran #define ARRAY(valuetype, numdims) std::shared_ptr > #define ARRAY_ASSIGN(value, valuetype, numdims, extent)\ value.reset(new CArray(boost::extents extent)) #define ARRAY_CREATE(value, valuetype, numdims, extent)\ ARRAY(valuetype, numdims) value = \ ARRAY(valuetype, numdims)(new CArray(boost::extents extent)) // Type C #define ARRAY_C_ASSIGN(value, valuetype, numdims, extent)\ value = ARRAY(valuetype, numdims) \ (new CArray(boost::extents extent, c_storage_order())) #define ARRAY_C_CREATE(value, valuetype, numdims, extent)\ ARRAY_C_ASSIGN(ARRAY(valuetype, numdims) value, valuetype, numdims, extent) ///--------------------------------------------------------------- #endif // __XIOS_CArray_mac__