(deffun lookup (shell-command "fgrep "  "$ORIWORD "  "*c "  "*h "  "*p "  "|less
                O_RETURN O_RETURN))
