remplacement de real*8 par double precision