Example for testing OMPIO write function