A programmer has written the following subprogram to process text inputs.
function processText(phrase)
total = 0
for i = 0 to length(phrase) - 1
character = subString(phrase, i, 1)
if character >= "A" and character <= "Z" then
total = total + 1
endif
next i
return total
endfunction
State the purpose of this subprogram.