amber-developers: Re: More sun issues

From: Scott Brozell <sbrozell.scripps.edu>
Date: Mon, 27 Mar 2006 01:26:06 -0700

Hi,

2. cont.
patched by gutting, see the amber post.

3.
more initialization in type statements:

f90 -c -O2 -free -o nose_hoover.o _nose_hoover.f
     integer :: system_coord_id = 0
                                ^
"_nose_hoover.f", Line = 66, Column = 33: ERROR: Unexpected syntax: ", or
EOS" w
as expected but found "=".

     logical :: initialized = .false.
                            ^
"_nose_hoover.f", Line = 70, Column = 29: ERROR: Unexpected syntax: ", or
EOS" w
as expected but found "=".


f90 -c -O2 -free -o amoeba_multipoles.o _amoeba_multipoles.f

   logical :: valid = .false.
                    ^
"_amoeba_multipoles.f", Line = 116, Column = 21: ERROR: Unexpected syntax:
", or
 EOS" was expected but found "=".

   double precision,dimension(3) :: def_point1 = 0.d0,def_point2 = 0.d0
                                               ^
"_amoeba_multipoles.f", Line = 117, Column = 48: ERROR: Unexpected syntax:
", or
 EOS" was expected but found "=".


f90 -c -O2 -free -o amoeba_valence.o _amoeba_valence.f

   integer :: dim1 = 0,dim2 = 0
                   ^
"_amoeba_valence.f", Line = 2860, Column = 20: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

   double precision,pointer :: angle1(:) => null()
                                         ^
"_amoeba_valence.f", Line = 2861, Column = 42: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

   double precision,pointer :: angle2(:) => null()
                                         ^
"_amoeba_valence.f", Line = 2862, Column = 42: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

   double precision, pointer :: func(:,:) => null()
                                          ^
"_amoeba_valence.f", Line = 2863, Column = 43: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

   double precision, pointer :: dfunc_dangle1(:,:) => null()
                                                   ^
"_amoeba_valence.f", Line = 2864, Column = 52: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

   double precision, pointer :: dfunc_dangle2(:,:) => null()
                                                   ^
"_amoeba_valence.f", Line = 2865, Column = 52: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

   double precision, pointer :: d2func_dangle1_dangle2(:,:) => null()
                                                            ^
"_amoeba_valence.f", Line = 2866, Column = 61: ERROR: Unexpected syntax:
", or E
OS" was expected but found "=".

removing the assignments fixed the errors.



4.
f90 -c -O2 -free -o qm_zero_charges.o _qm_zero_charges.f

      write(6,'(x)')
                ^
"_qm_zero_charges.f", Line = 247, Column = 17: ERROR: Integer constant
expected
where "x" is present.



5.
f90 -c -O2 -free -o qm2_dftb_dispersionread.o _qm2_dftb_dispersionread.f

      write(6,'(A,3X,A)'), '|','DISP.INP'
                         ^
"_qm2_dftb_dispersionread.f", Line = 102, Column = 26: ERROR: Unexpected
syntax:
 "operand" was expected but found ",".



yawn, still compiling....
Gee whiz, can we add even more stuff to sander for amber10 !
Good night,
Scott


On Sun, 26 Mar 2006, Scott Brozell wrote:

> Hi,
>
> 1.
> f90 -c -O1 -free -o evb_vars.o _evb_vars.f
>
> logical :: ready = .false. !! already allocated (ready
== .true
> .)
> ^
> "_evb_vars.f", Line = 444, Column = 24: ERROR: Unexpected syntax: ", or
EOS" was
> expected but found "=".
>
>
> code snippet:
>
> type evb_mat_type
>
> _REAL_ , pointer :: evb_mat (:,:) !! EVB matrix
> _REAL_ , pointer :: grad_xch ( :) !! -gradient of exchange
term
> _REAL_ , pointer :: b1_kl ( :) !! gradient of square of
exchange term
> _REAL_ , pointer :: evb_vec0 ( :) !! EVB ground-state vector
>
> logical :: ready = .false. !! already allocated (ready
== .true.)
>
> endtype
>
>
> I don't have a good frotran syntax reference handy; the initialization
> is the cause of the problem, and removing '= .false.' fixes it.
>
>
>
> 2.
> f90 -c -O1 -free -o lmod.o _lmod.f
> Assertion failed: at_handle_table[at_idx].tag == VAR_TAG, file
../srcfw/FWcvrt.c, line 4018
> f90: Fatal error in f90comp: Abort
>
> Bummer, I notice there is a related reflector thread:
> AMBER: Amber 8 under Solaris 9 compi
>
> My compiler is
> f90: WorkShop Compilers 5.0 00/05/17 FORTRAN 90 2.0 Patch 107356-05
>
> I'm gonna go play outside now.
> And will investigate this tonight.
>
> Scott
>
> On Sun, 26 Mar 2006, Scott Brozell wrote:
>
> > SunOS chemistry.ohio-state.edu 5.7 Generic_106541-41 sun4u sparc
SUNW,Ultra-4
> >
> > I'll get back to you after the build/test.
> >
> > Scott
> >
> > On Fri, 24 Mar 2006, David A. Case wrote:
> >
> > > On Fri, Mar 24, 2006, John Mongan wrote:
>
Received on Wed Apr 05 2006 - 23:49:35 PDT
Custom Search