[run_@r14986]: New function is_array has only to be used inside the remove...

[run_@r14986]: New function is_array has only to be used inside the remove indexing, so that function get_type stays untouched. Fix for cast specification with kind key_word since look_up table was updated.