Благодарю. Видимо что-то до этого упускал, потому что в первую очередь проверял параметр r-S, а потом уже r.St, все работает