[AMBER-Developers] qmmm_struct_module.f is f2003

From: Scott Brozell <sbrozell.rci.rutgers.edu>
Date: Fri, 26 Nov 2010 15:00:16 -0500

Hi,

This is just a note that we are including more F2003 features:

The newly created file qmmm_struct_module.f uses F2003 syntax:
 gfortran -c -O3 -ffree-form -o qmmm_struct_module.o _qmmm_struct_module.f
_qmmm_struct_module.f:337.20:
    integer, pointer, intent(inout) :: iarr(:)
                   1
Error: POINTER attribute conflicts with INTENT attribute at (1)

From the Fortran 95 standard:
"Constraint: If the POINTER attribute is specified, the TARGET, INTENT,
EXTERNAL, or INTRINSIC attribute shall not be specified."


However, according to this document most compilers have this feature:
Chivers, Ian D.; Sleightholme, Jane (2009). "Compiler support for the Fortran 2003 standard". ACM SIGPLAN Fortran Forum (ACM) 28 (1): 26–28. doi:10.1145/1520752.1520755. ISSN 10617264. http://www.fortranplus.co.uk/resources/fortran_2003_2008_compiler_support.pdf

That includes gfortran which introduced it in 4.3;
above was gcc version 4.2.3.
I plan to test pgi which isn't in the document.

scott


_______________________________________________
AMBER-Developers mailing list
AMBER-Developers.ambermd.org
http://lists.ambermd.org/mailman/listinfo/amber-developers
Received on Fri Nov 26 2010 - 12:30:03 PST
Custom Search