removed unused procedure