define !subscore3 (!pos !tokens(1)/!pos !enclose('(',')')/!pos !tokens(1))
!LET !limits = !2
!DO !ssc = 1 !TO 19
  !LET !limit = !HEAD(!limits)
  !LET !limits = !TAIL(!limits)
  if (!1 ge !limit) !3 = !ssc.
!DOEND
!enddefine.




!subscore3 ctraw (0 10 14 18 22 26 30 34 38 42 46 49 52 55 58 62 65 100 100) ct
LIST.