Как использовать, где построить подматрицу

Question

Мне нужно сделать массив A из ненулевых элементов существующего массива B. В Matlab я бы "нашел" индексы ненулевых значений B: A=B(find(B~=0))

Кто-нибудь может предложить способ сделать это в F90? Во всех моих попытках я всегда получаю ту же длину, что и B