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