    # 1999/7/28
    # check unique names and other names

    !clock "read family history"
    !read family.ku
    #Dr. Richard H. McCullough isa person
    #!psize person

    echo=off
    !clock "check MISSING unique names"
    every unique isa person do
        if $unique has uniquename else
            !print "# MISSING uniquename: $unique";
        fi;
    done
    !clock "check CONFLICT with other names"
    every unique isa person do
        if ? has othername +=$unique then
            !print "# CONFLICT with othername: $unique";
        fi;
    done
    !clock "done"
    echo=on

    !exit