[cig-commits] r18520 - seismo/3D/SPECFEM3D_GLOBE/trunk/src/specfem3D
dkomati1 at geodynamics.org
dkomati1 at geodynamics.org
Wed Jun 1 07:37:01 PDT 2011
Author: dkomati1
Date: 2011-06-01 07:37:01 -0700 (Wed, 01 Jun 2011)
New Revision: 18520
Modified:
seismo/3D/SPECFEM3D_GLOBE/trunk/src/specfem3D/multiply_arrays_source.f90
Log:
added a comment
Modified: seismo/3D/SPECFEM3D_GLOBE/trunk/src/specfem3D/multiply_arrays_source.f90
===================================================================
--- seismo/3D/SPECFEM3D_GLOBE/trunk/src/specfem3D/multiply_arrays_source.f90 2011-06-01 13:37:21 UTC (rev 18519)
+++ seismo/3D/SPECFEM3D_GLOBE/trunk/src/specfem3D/multiply_arrays_source.f90 2011-06-01 14:37:01 UTC (rev 18520)
@@ -25,8 +25,12 @@
!
!=====================================================================
-! we put these multiplications in a separate routine because otherwise
+! we put these multiplications in a separate routine AND IN A SEPARATE FILE because otherwise
! some compilers try to unroll the six loops above and take forever to compile
+
+! we leave this in a separate file otherwise many compilers perform subroutine inlining when
+! two subroutines are in the same file and one calls the other
+
subroutine multiply_arrays_source(sourcearrayd,G11,G12,G13,G21,G22,G23, &
G31,G32,G33,hxis,hpxis,hetas,hpetas,hgammas,hpgammas,k,l,m)
More information about the CIG-COMMITS
mailing list