datagen sub array *.SHZ sss dw usedata units deg; tw 1100 1170 traveltime model ak135 phase PKPbc PKPdf PKiKP PKPab line fill yellow/0 prs ttime on label kstnm qs bbfk wave 0.045 size 180 100 exp 4 ;* Finer az. sampling message "k %BBFK_WVNBR%, az %BBFK_BAZIM%"