Dear Mahmoud, The "-w" flag should be added to compiler options (FFLAGS) in order to avoid warning messages. What concerns underscores, you can try add the
-DADD_BLAS_ONE_UNDERSCORE flag to CPPFLAGS. Besides, your FFTW library should be linked before the MKL-one. Hope it works. Regards, Eyvaz Isaev Theoretical Physics Department Moscow Steel and Alloys Institute --- Mahmoud Payami <mpayami at seai.neda.net.ir> wrote: > Dear Paolo and Hosik, > Thank you very much for your helps. I have > downloaded the fftw3 > and installed. The location of the "libfftw3.a" file > is "/usr/local/lib" > In "make.sys", I have changed the "-lfftw" to > "/usr/local/lib/libfftw3.a". > (Some other "fft" also exists at > "/opt/intel/mkl/tests/fftf/source" with > name "libtestfft32.a".) > I did "make pw" with these new settings and obtained > the following results > I have only brought the warnings): > ======================================= > Comment 1 : In program unit POTINIT label 20 is not > referenced > title = title_ > ^ > Warning 141 at (629:restart.f90) : Character string > truncated to length 75 > on as > signment > crystal = crystal_ > ^ > Warning 141 at (630:restart.f90) : Character string > truncated to length 20 > on as > signment > atm(1:ntyp) = atom_label(1:ntyp) > ^ > Warning 141 at (742:restart.f90) : Character strings > truncated to length 3 > on as > signment > > filpun = trim(prefix)//'.pun' > ^ > Warning 141 at (103:punch.f90) : Character string > truncated to length 14 on > assi > gnment > > Comment 2 : In program unit READVAN format 1300 is > not used > Comment 2 : In program unit READVAN format 1200 is > not used > Comment 2 : In program unit READVAN format 1100 is > not used > Comment 2 : In program unit READVAN format 1000 is > not used > Comment 2 : In program unit READVAN format 900 is > not used > Comment 2 : In program unit READVAN format 800 is > not used > Comment 2 : In program unit READVAN format 700 is > not used > Comment 2 : In program unit READVAN format 600 is > not used > Comment 2 : In program unit READVAN format 500 is > not used > Comment 2 : In program unit READVAN format 400 is > not used > Comment 2 : In program unit READVAN format 300 is > not used > Comment 2 : In program unit READVAN format 200 is > not used > > external subroutine SETLOCAL > vltot (ir) = dreal (aux (ir) ) > ^ > Warning 39 at (40:setlocal.f90) : This intrinsic > function is an extension to > sta > ndard Fortran 95 > > external subroutine SET_RHOC > rhoneg = rhoneg + min (0.d0, dreal (aux (ir) ) > ) > ^ > Warning 39 at (90:set_rhoc.f90) : This intrinsic > function is an extension to > sta > ndard Fortran 95 > rhoima = rhoima + abs (dimag (aux (ir) ) ) > ^ > Warning 39 at (91:set_rhoc.f90) : This intrinsic > function is an extension to > sta > ndard Fortran 95 > rhorea = max (dreal (aux (ir) ), eps) > ^ > Warning 39 at (92:set_rhoc.f90) : This intrinsic > function is an extension to > sta > ndard Fortran 95 > rho_core(ir) = dreal (aux(ir)) > ^ > Warning 39 at (93:set_rhoc.f90) : This intrinsic > function is an extension to > sta > ndard Fortran 95 > > external subroutine STRES_EWA > rhostar = rhostar + zv (ityp (na) ) * DCMPLX > (cos (arg), sin (arg)) > ^ > Warning 39 at (120:stres_ewa.f90) : This intrinsic > function is an extension > to s > tandard Fortran 95 > > external subroutine STRES_KNL > dreal (conjg (evc (i, ibnd) ) > * evc (i, ibnd) ) > ^ > Warning 39 at (56:stres_knl.f90) : This intrinsic > function is an extension > to st > andard Fortran 95 > > external subroutine STRES_LOC > evloc = evloc + dreal (conjg (psic (nl (ng) > ) ) * strf (ng, nt) ) & > ^ > Warning 39 at (45:stres_loc.f90) : This intrinsic > function is an extension > to st > andard Fortran 95 > sigmaloc(l, m) = sigmaloc(l, m) + > dreal( conjg( psic(nl(ng) ) ) & > ^ > Warning 39 at (61:stres_loc.f90) : This intrinsic > function is an extension > to st > andard Fortran 95 > > external subroutine STRES_US > Comment 1 : In program unit STRES_US label 100 is > not referenced > dreal(conjg (becp > (ikb,ibnd) ) * becp (jkb, > ibnd) ) > ^ > Warning 39 at (80:stres_us.f90) : This intrinsic > function is an extension to > sta > ndard Fortran 95 > > external subroutine STRUC_FACT > strf (ng, nt) = strf (ng, nt) + dcmplx > (cos (arg), -sin (arg)) > ^ > Warning 39 at (69:struct_fact.f90) : This intrinsic > function is an extension > to > standard Fortran 95 > eigts1 (n1, na) = dcmplx (cos (arg), - sin > (arg) ) > ^ > Warning 39 at (82:struct_fact.f90) : This intrinsic > function is an extension > to > standard Fortran 95 > eigts2 (n2, na) = dcmplx (cos (arg), - sin > (arg) ) > ^ > Warning 39 at (86:struct_fact.f90) : This intrinsic > function is an extension > to > standard Fortran 95 > eigts3 (n3, na) = dcmplx (cos (arg), - sin > (arg) ) > ^ > Warning 39 at (90:struct_fact.f90) : This intrinsic > function is an extension > to > standard Fortran 95 > > external subroutine SUM_BAND > w1 * (dreal (psic (ir) ) **2 + dimag > (psic (ir) ) **2) > ^ > Warning 39 at (109:sum_band.f90) : This intrinsic > function is an extension > to st > andard Fortran 95 > ^ > Warning 39 at (109:sum_band.f90) : This intrinsic > function is an extension > to st > andard Fortran 95 > w1 * dreal(conjg(becp > (ikb, > ibnd))*becp(ikb,ibnd)) > ^ > Warning 39 at (132:sum_band.f90) : This intrinsic > function is an extension > to st > andard Fortran 95 > > dreal(conjg(becp(ikb,ibnd))*becp(jkb,ibnd) ) > === message truncated === __________________________________________________ Do you Yahoo!? Yahoo! Platinum - Watch CBS' NCAA March Madness, live on your desktop! http://platinum.yahoo.com
