A parte che il programma in c mi funziona e qui invece (con opportune modifiche.. forse non tanto opportune) mi da 1 problema: sia che lo calcolo in doppia precisione che in singola mi da lo stesso risultato....codice:Program Precisione Real epsilon epsilon = 1 do while ((1 + (epsilon / 2)) .GT. 1) epsilon = epsilon / 2 end do write (*,*) epsilon End
comunque... non riesco a dividere il programma in funzione.. per richiamare prima il calcolo in singola precisione e poi in doppia (immagino che non abbia tanto senso ma devo capire come si fanno le funzioni)...
a me pare di aver capito che in fortran le funzioni devo per forza ritornare un argomento e forse avere degli argomenti... può essere?