modTime = F90MODULO(locTime,recSpacing)
tRec1 = 1 + NINT( (locTime-modTime)/recSpacing )
wght2 = modTime / recSpacing
modTime = F90MODULO( locTime, recSpacing )
tRec0 = 1 + NINT( (locTime-modTime)/recSpacing )
_RL locTime, modTime, tmpTime