SetPartFrameSlot ('labels, '_extensions);

SetPartFrameSlot ('deletionScript, FUNC ()
 BEGIN
  LOCAL SysSoup := GetStores ()[0]:GetSoup (ROM_SystemSoupName);
  LOCAL Cursor := SysSoup:Query ({indexPath   : 'tag,
                                  words       : kPackageName,
                                  entireWords : TRUE
                                 });
  LOCAL Prefs := Cursor:Entry ();
  IF (Prefs)
     THEN EntryRemoveFromSoupXmit (Prefs, NIL)
 END);


constant kPI := 3.1415926535898;