dmoses

$pid = 'islandora:root';
$object = islandora_object_load($pid);
dsm($object['RELS-EXT']->content, 'RELS-EXT Prior to Add');
$object->relationships->add(FEDORA_MODEL_URI, 'hasModel', 'si:conceptCModel');
dsm($object['RELS-EXT']->content, 'RELS-EXT After Add');
$object->relationships->remove(FEDORA_MODEL_URI, 'hasModel', 'si:conceptCModel');
dsm($object['RELS-EXT']->content, 'RELS-EXT After Remove');