cross.beds1 function

Cross-beds azimuths (I)