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.
Changeset 13296 for NEMO – NEMO

Changeset 13296 for NEMO


Ignore:
Timestamp:
2020-07-10T20:36:34+02:00 (4 years ago)
Author:
acc
Message:

Update comments in new do_loop_substitute.h90 on the trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/do_loop_substitute.h90

    r13295 r13296  
    88! between version 4.0 and 4.2. The primary aim of these macros is to assist in future applications of tiling 
    99! to improve performance. This is expected to be achieved by alternative versions of these macros in selected 
    10 ! locations. The initial introduction of these macros simply replaces all identifiable nested 2D- and 3D-loops 
    11 ! with single line statements (and adjusts indenting accordingly). Do loops are identifiable if they comform 
     10! locations. The initial introduction of these macros simply replaced all identifiable nested 2D- and 3D-loops 
     11! with single line statements (and adjusts indenting accordingly). Do loops were identifiable if they comformed 
    1212! to either: 
    1313!                                       DO jk = .... 
     
    2121! and white-space variants thereof. 
    2222! 
    23 ! Additionally, only loops with recognised jj and ji loops limits are treated; these are: 
     23! Additionally, only loops with recognised jj and ji loops limits were treated; these were: 
    2424! Lower limits of 1, 2 or fs_2 
    2525! Upper limits of jpi, jpim1 or fs_jpim1 (for ji) or jpj, jpjm1 or fs_jpjm1 (for jj) 
    2626! 
    27 ! The macro naming convention takes the form: DO_2D_BT_LR where:  
     27! The macro naming convention takes the form: DO_2D( B, T, L, R) where:  
    2828!   B is the Bottom offset from the PE's inner domain; 
    2929!   T is the Top    offset from the PE's inner domain; 
     
    4242! with: 
    4343! 
    44 !   DO_2D_01_10 
     44!   DO_2D( 0, 1, 1, 0 ) 
    4545!      . 
    4646!      . 
Note: See TracChangeset for help on using the changeset viewer.