(Fconcord_define_object): New function.