Usa il force 2.qualcosa ... per il programma posso provare a riscrivere il tuo in fortran ma non ti prometto nulla perchè sono anch'io alle prime armi con fortran...