plot - DISLIN double-precision libraries -
i trying compile program written in fortran plots graphs using dislin libraries, data in double precision. cannot lose precision, passing simple precision not option. when attempt link double precision libraries (_d), still following error expect had linked simple precision libraries:
call graf(-1.d0, 1.d0, -1.d0, 2.d0/10.d0, -1.d0, 1.d0, -1.d0, 2.d0/10.) (1) error: type mismatch in argument 'ax' @ (1); passed real(8) real(4). i other such errors in plotting statements. compiling command (gfortran):
gfortran modulename.f95 progname.f95 c:\dislin\disgf_d.a -luser32 -lgdi32 -lopengl32 note disgf_d refers double precision libraries. have ideas here?
relevant code:
call metafl("xwin") call disini() call graf(-1.d0, 1.d0, -1.d0, 2.d0/10.d0, -1.d0, 1.d0, -1.d0, 2.d0/10.d0) = 0, m z(i) = -1.d0 + (2.d0*i) / m y_z(i) = int_g(z(i)) end call curve (z, y_z, m + 1) = 0, m y_z(i) = g(z(i)) end call curve (z, y_z, m + 1) call endgrf() call disfin()
try compiling program line changed to
call graf(-1.e0, 1.e0, -1.e0, 2.e0/10.e0, -1.e0, 1.e0, -1.e0, 2.e0/10.) 1.0e0 , 1.0d0 single , double precision constants, respectively.
Comments
Post a Comment