/* define F95 opaque pointer container size and initializer */
/* size depends on fortran compiler */

#ifndef __PS_CONTAINER_SIZE

#if __PATHSCALE
#define __PS_CONTAINER_SIZE 12
#define __PS_CONTAINER_INIT (/0,0,0,0,0,0,0,0,0,0,0,0/)

#elif __IFC
#define __PS_CONTAINER_SIZE 2
#define __PS_CONTAINER_INIT (/0,0/)

#else
#define __PS_CONTAINER_SIZE 4
#define __PS_CONTAINER_INIT (/0,0,0,0/)
#endif

#endif
