Bonjour,

j'essaie de trouver une solution avec la fonction intrinseque "where"

Ce que j'aimerais obtenir, c'est le nombre des elements d'un vecteur (array) qui satisfait une certaine conditon logique et puis les indices des elements qui satisfont une expression logique :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
do jpm=1, ny_c
    count_j_f=count( abs(y_c(jpm) - y_f) <= y_res_c / 1.99)  ! y_c et y_f sont deux arrays de 140 elements
    where( abs(y_c(jpm) - y_f) <= y_res_c / 1.99)
        B=1.0
    elsewhere
        B=0.0
    END WHERE
end do 
result_count=maxloc(ARRAY=B)
est ce quelqu'un peut m'expliquer pourquoi ca ne fonctionne pas et me suggerer une solution?

merci