Isn't this unit IrminIdent common enough to add as a library function?