read x =
x w{
x p
read "K" f
] !
}
] " " \ m w x "T" f \ - "*" \ m w