New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
vectopt_loop_substitute.h90 in trunk/NEMOGCM/NEMO/OPA_SRC – NEMO

source: trunk/NEMOGCM/NEMO/OPA_SRC/vectopt_loop_substitute.h90 @ 7881

Last change on this file since 7881 was 4990, checked in by timgraham, 9 years ago

Merged branches/2014/dev_MERGE_2014 back onto the trunk as follows:

In the working copy of branch ran:
svn merge svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/trunk@HEAD
1 conflict in LIM_SRC_3/limdiahsb.F90
Resolved by keeping the version from dev_MERGE_2014 branch
and commited at r4989

In working copy run:
svn switch svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/trunk
to switch working copy

Run:
svn merge --reintegrate svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/branches/2014/dev_MERGE_2014
to merge the branch into the trunk - no conflicts at this stage.

  • Property svn:keywords set to Id
File size: 874 bytes
RevLine 
[3]1   !!----------------------------------------------------------------------
2   !!                   ***  vectopt_loop_substitute  ***
3   !!----------------------------------------------------------------------
[4990]4   !! ** purpose :   substitute the inner loop start/end indices with CPP macro
5   !!                allow unrolling of do-loop (useful with vector processors)
[3]6   !!----------------------------------------------------------------------
[247]7   !!----------------------------------------------------------------------
[4990]8   !! NEMO/OPA 3.7 , NEMO Consortium (2014)
[1152]9   !! $Id$
[2528]10   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
[247]11   !!----------------------------------------------------------------------
[3]12#if defined key_vectopt_loop
[4990]13#  define   fs_2       1
14#  define   fs_jpim1   jpi
[3]15#else
[4990]16#  define   fs_2       2
17#  define   fs_jpim1   jpim1
[3]18#endif
Note: See TracBrowser for help on using the repository browser.