funzioni per cercare etichette in fortran