switch {
  $regsubex($1,/(.)(".*?"|[^a-z]*)/gi,$iif( [ $2 ] isincs \n\1,return $iif($prop,$noqt(\2),\1)))
  if (!$2) return $calc($regml(0)/2)
}