[mesa-users] Fatal Error: Wrong module version for star_lib.mod

Tue Apr 17 00:40:30 EDT 2012

> compiler you're using changed.

You might be right. The IT department has upgraded the systems over the weekend. I am not sure what changes were made. I can find out tomorrow.  It is possible that they updated/changed the fortran compiler.  My current and latest version now is GNU Fortran (GCC) 4.5.2  I am not sure how I can see which version I used before.

> What happens if you issue a ./clean command and recompile?

This now gives several error messages such as  (full output below)

../private/mtx_support.f:548.16:   real(16), pointer, dimension(:,:,:), intent(in) :: lblk, dblk, ublk ! 
Error: Kind 16 not supported for type REAL at (1)

I did not get much wiser from googling this error message.   I tried using an older version of my compiler on my system, GNU Fortran (GCC) 4.4.4,  gives similar warnings.   Would it be worthwhile upgrading my fortran compiler to 4.6 or 4.7?  

Selma

====== Full output ===========

% ./clean ; ./install

cleaning adipls package.
cleaning alert package.
cleaning astero package.
cleaning atm package.
cleaning chem package.
cleaning colors package.
cleaning const package.
cleaning diffusion package.
cleaning eos package.
cleaning interp_1d package.
cleaning interp_2d package.
cleaning ionization package.
cleaning kap package.
cleaning mlt package.
cleaning mtx package.
cleaning net package.
cleaning neu package.
cleaning num package.
cleaning rates package.
cleaning reaclib package.
cleaning sample package.
cleaning screen package.
cleaning star package.
cleaning utils package.
cleaning weaklib package.
cleaning lib directory.
cleaning include directory.
cleaning some caches
cleaning net_data cache.
cleaning rates_data cache.
removing some data to force reinstall
finished cleaning

checking if ndiff is installed ...
yes!

/Users/demink/Codes/MESA/mesa/const
building const package.

gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -O2 -c -ffixed-form -ffixed-line-length-132 ../public/const_def.f
gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -O2 -c -ffixed-form -ffixed-line-length-132 ../public/const_lib.f
ar crs libconst.a const_def.o const_lib.o
make: `libconst.a' is up to date.
gfortran -fno-range-check  -fopenmp -I../../make -I../../public -I../../../include -I/opt/mesasdk/include -fbounds-check -g -c -ffixed-form -ffixed-line-length-132 ../src/test_const.f
gfortran -fopenmp -o ../tester test_const.o -L../../make -lconst
export
done

mesa const has been made, tested, and exported.

************************************************

/Users/demink/Codes/MESA/mesa/alert
building alert package.

gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -O2 -c -ffixed-form -ffixed-line-length-132 ../public/alert_lib.f
ar crs libalert.a alert_lib.o
make: `libalert.a' is up to date.
gfortran -fno-range-check  -fopenmp -I../../make -I../../public -I../../../include -I/opt/mesasdk/include -fbounds-check -g -c -ffixed-form -ffixed-line-length-132 ../src/test_alert.f
gfortran -fopenmp -o ../tester test_alert.o -L../../make -lalert -L../../../lib 
export
done

mesa alert has been made, tested, and exported.

************************************************

/Users/demink/Codes/MESA/mesa/utils
building utils package.

gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -fbounds-check -O2 -g -c -ffree-form   ../public/utils_def.f
gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -fbounds-check -O2 -g -c -ffree-form   ../private/utils_isnan_okay.f
gfortran -fno-range-check  -Wunused-value -Werror -W -fopenmp -I../public -I../private -I../../include -c -ffree-form ../private/utils_nan.f
gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -fbounds-check -O2 -g -c -ffree-form   ../private/utils_dict.f
gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -fbounds-check -O2 -g -c -ffree-form   ../public/utils_lib.f
ar crs libutils.a utils_isnan_okay.o utils_nan.o utils_dict.o utils_lib.o
make: `libutils.a' is up to date.
gfortran -fno-range-check  -fopenmp -I../../make -I../../public -I../../../include -I/opt/mesasdk/include -fbounds-check -g -c -ffixed-form -ffixed-line-length-132 ../src/test_utils.f
gfortran -fopenmp -o ../tester test_utils.o -L../../make -lutils -L../../../lib -lalert
export
done

mesa utils has been made, tested, and exported.

************************************************

/Users/demink/Codes/MESA/mesa/mtx
building mtx package.

gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -O2 -c -ffixed-form -ffixed-line-length-132 ../public/mtx_def.f
gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -O2 -c -ffixed-form -ffixed-line-length-132 -w ../mkl_pardiso_src/mod_mkl_pardiso_stub.f
gfortran -fno-range-check  -fopenmp  -I../public -I../private -I../../include -Wunused-value -Werror -W -fimplicit-none   -O2 -c -ffree-form ../private/mtx_support.f
../private/mtx_support.f:548.16:

         real(16), pointer, dimension(:,:,:), intent(in) :: lblk, dblk, ublk ! 
                1
Error: Kind 16 not supported for type REAL at (1)
../private/mtx_support.f:549.16:

         real(16), pointer, dimension(:,:), intent(in) :: b ! (nvar,nz)
                1
Error: Kind 16 not supported for type REAL at (1)
../private/mtx_support.f:550.16:

         real(16), pointer, dimension(:,:), intent(out) :: prod ! (nvar,nz)    
                1
Error: Kind 16 not supported for type REAL at (1)
../private/mtx_support.f:559.46:

            call qgemv('N',nvar,nvar,1d0,dblk(:,:,k),nvar,b(:,k),incx,0d0,prod(
                                              1
Error: Syntax error in argument list at (1)
../private/mtx_support.f:561.49:

               call qgemv('N',nvar,nvar,1d0,lblk(:,:,k),nvar,b(:,k-1),incx,1d0,
                                                 1
Error: Syntax error in argument list at (1)
../private/mtx_support.f:564.49:

               call qgemv('N',nvar,nvar,1d0,ublk(:,:,k),nvar,b(:,k+1),incx,1d0,
                                                 1
Error: Syntax error in argument list at (1)
../private/mtx_support.f:547.45:

      subroutine do_block_lapack_mv_quad(lblk, dblk, ublk, b, prod)
                                             1
Error: Symbol 'lblk' at (1) has no IMPLICIT type
../private/mtx_support.f:547.51:

      subroutine do_block_lapack_mv_quad(lblk, dblk, ublk, b, prod)
                                                   1
Error: Symbol 'dblk' at (1) has no IMPLICIT type
../private/mtx_support.f:547.57:

      subroutine do_block_lapack_mv_quad(lblk, dblk, ublk, b, prod)
                                                         1
Error: Symbol 'ublk' at (1) has no IMPLICIT type
../private/mtx_support.f:547.60:

      subroutine do_block_lapack_mv_quad(lblk, dblk, ublk, b, prod)
                                                            1
Error: Symbol 'b' at (1) has no IMPLICIT type
../private/mtx_support.f:547.66:

      subroutine do_block_lapack_mv_quad(lblk, dblk, ublk, b, prod)
                                                                  1
Error: Symbol 'prod' at (1) has no IMPLICIT type
make: *** [mtx_support.o] Error 1

/Users/demink/Codes/MESA/mesa/mtx/make
FAILED

/Users/demink/Codes/MESA/mesa/mtx
./build_and_test FAILED