all real variables are now real(8), of double precision