This code was taken from:

src.contrib/UCB/gdbase/modules/s.reclass
