+29Jul02=======================================================================
+1.Changed max R value in wcy to 500 from 300.
+28Jul02=======================================================================
+1. stick the invalid key deletes in an eval loop in export_user