---
# System prepended metadata

title: Untitled

---

### Subroutine LBC_NFD_NOGATHER_3D_PTR_GPU_DP
- Line lbcnfd_nogather_gpu_dp.f90:1171 (nemo.src/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1171 
  A loop starting at line 1171 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1171 
  A region starting at line 1171 and ending at line 1171 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1171 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1171 (acc_copy).

```

```
  1170  !$acc kernels
  1171  ptab(jf)%pt3d(1,nlcj,:) = psgn(jf) * ptab(jf)%pt3d(2,nlcj-2,:)
  1172  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1176 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1176 
  A loop starting at line 1176 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1176 
  A region starting at line 1176 and ending at line 1176 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1176 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1176 (acc_copy).

```

```
  1175  !$acc kernels
  1176  ptab(jf)%pt3d(nlci,nlcj,:) = psgn(jf) * ptab(jf)%pt3d(nlci-1,nlcj-2,:)
  1177  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1237 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1237 
  A loop starting at line 1237 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1237 
  A region starting at line 1237 and ending at line 1237 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1237 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1237 (acc_copy).

```

```
  1236  !$acc kernels
  1237  ptab(jf)%pt3d(1,nlcj,:) = psgn(jf) * ptab(jf)%pt3d(3,nlcj-3,:)
  1238  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1266 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1266 
  A loop starting at line 1266 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1266 
  A region starting at line 1266 and ending at line 1266 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1266 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1266 (acc_copy).

```

```
  1265  IF (nimpp .eq. 1) THEN
  1266     ptab(jf)%pt3d(1,nlcj,:) = psgn(jf) * ptab(jf)%pt3d(2,nlcj-3,:)
  1267     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:1268 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1268 
  A loop starting at line 1268 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1268 
  A region starting at line 1268 and ending at line 1268 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1268 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1268 (acc_copy).

```

```
  1267     IF ( .NOT. l_fast_exchanges ) &
  1268        ptab(jf)%pt3d(1,nlcj-1,:) = psgn(jf) * ptab(jf)%pt3d(2,nlcj-2,:)
  1269  ENDIF
```
- Line lbcnfd_nogather_gpu_dp.f90:1271 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1271 
  A loop starting at line 1271 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1271 
  A region starting at line 1271 and ending at line 1271 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1271 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1271 (acc_copy).

```

```
  1270  IF((nimpp + nlci - 1) .eq. jpiglo) THEN
  1271     ptab(jf)%pt3d(nlci,nlcj,:) = psgn(jf) * ptab(jf)%pt3d(nlci-1,nlcj-3,:)
  1272     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:1273 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1273 
  A loop starting at line 1273 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1273 
  A region starting at line 1273 and ending at line 1273 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_3D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1273 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1273 (acc_copy).

```

```
  1272     IF ( .NOT. l_fast_exchanges ) &
  1273        ptab(jf)%pt3d(nlci,nlcj-1,:) = psgn(jf) * ptab(jf)%pt3d(nlci-1,nlcj-2,:)
  1274  ENDIF
```

### Subroutine LBC_NFD_NOGATHER_2D_GPU_DP
- Line lbcnfd_nogather_gpu_dp.f90:135 (nemo.src/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 135 
  A region starting at line 135 and ending at line 135 was placed on the accelerator.

```

```
   134  !$acc kernels
   135  ptab(1,nlcj) = psgn * ptab(2,nlcj-2)
   136  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:140 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 140 
  A region starting at line 140 and ending at line 140 was placed on the accelerator.

```

```
   139  !$acc kernels
   140  ptab(nlci,nlcj) = psgn * ptab(nlci-1,nlcj-2)
   141  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:201 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 201 
  A region starting at line 201 and ending at line 201 was placed on the accelerator.

```

```
   200  !$acc kernels
   201  ptab(1,nlcj) = psgn * ptab(3,nlcj-3)
   202  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:230 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 230 
  A region starting at line 230 and ending at line 230 was placed on the accelerator.

```

```
   229  IF (nimpp .eq. 1) THEN
   230     ptab(1,nlcj) = psgn * ptab(2,nlcj-3)
   231     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:232 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 232 
  A region starting at line 232 and ending at line 232 was placed on the accelerator.

```

```
   231     IF ( .NOT. l_fast_exchanges ) &
   232        ptab(1,nlcj-1) = psgn * ptab(2,nlcj-2)
   233  ENDIF
```
- Line lbcnfd_nogather_gpu_dp.f90:235 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 235 
  A region starting at line 235 and ending at line 235 was placed on the accelerator.

```

```
   234  IF((nimpp + nlci - 1) .eq. jpiglo) THEN
   235     ptab(nlci,nlcj) = psgn * ptab(nlci-1,nlcj-3)
   236     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:237 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 237 
  A region starting at line 237 and ending at line 237 was placed on the accelerator.

```

```
   236     IF ( .NOT. l_fast_exchanges ) &
   237        ptab(nlci,nlcj-1) = psgn * ptab(nlci-1,nlcj-2)
   238  ENDIF
```

### Subroutine LBC_NFD_NOGATHER_4D_GPU_DP
- Line lbcnfd_nogather_gpu_dp.f90:1519 (nemo.src/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1519 
  A loop starting at line 1519 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1519 
  A loop starting at line 1519 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1519 
  A loop starting at line 1519 was partitioned across the 256 threads within a threadblock.
```

```
  1518  !$acc kernels
  1519  ptab(1,nlcj,:,:) = psgn * ptab(2,nlcj-2,:,:)
  1520  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1524 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1524 
  A loop starting at line 1524 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1524 
  A loop starting at line 1524 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1524 
  A loop starting at line 1524 was partitioned across the 256 threads within a threadblock.
```

```
  1523  !$acc kernels
  1524  ptab(nlci,nlcj,:,:) = psgn * ptab(nlci-1,nlcj-2,:,:)
  1525  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1585 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1585 
  A loop starting at line 1585 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1585 
  A loop starting at line 1585 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1585 
  A loop starting at line 1585 was partitioned across the 256 threads within a threadblock.
```

```
  1584  !$acc kernels
  1585  ptab(1,nlcj,:,:) = psgn * ptab(3,nlcj-3,:,:)
  1586  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1614 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1614 
  A loop starting at line 1614 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1614 
  A loop starting at line 1614 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1614 
  A loop starting at line 1614 was partitioned across the 256 threads within a threadblock.
```

```
  1613  IF (nimpp .eq. 1) THEN
  1614     ptab(1,nlcj,:,:) = psgn * ptab(2,nlcj-3,:,:)
  1615     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:1616 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1616 
  A loop starting at line 1616 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1616 
  A loop starting at line 1616 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1616 
  A loop starting at line 1616 was partitioned across the 256 threads within a threadblock.
```

```
  1615     IF ( .NOT. l_fast_exchanges ) &
  1616        ptab(1,nlcj-1,:,:) = psgn * ptab(2,nlcj-2,:,:)
  1617  ENDIF
```
- Line lbcnfd_nogather_gpu_dp.f90:1619 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1619 
  A loop starting at line 1619 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1619 
  A loop starting at line 1619 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1619 
  A loop starting at line 1619 was partitioned across the 256 threads within a threadblock.
```

```
  1618  IF((nimpp + nlci - 1) .eq. jpiglo) THEN
  1619     ptab(nlci,nlcj,:,:) = psgn * ptab(nlci-1,nlcj-3,:,:)
  1620     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:1621 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6401 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1621 
  A loop starting at line 1621 was placed on the accelerator.

ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1621 
  A loop starting at line 1621 was partitioned across the thread blocks.
ftn-6430 ftn: ACCEL LBC_NFD_NOGATHER_4D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1621 
  A loop starting at line 1621 was partitioned across the 256 threads within a threadblock.
```

```
  1620     IF ( .NOT. l_fast_exchanges ) &
  1621        ptab(nlci,nlcj-1,:,:) = psgn * ptab(nlci-1,nlcj-2,:,:)
  1622  ENDIF
```

### Subroutine LBC_NFD_NOGATHER_4D_PTR_GPU_DP
- Line lbcnfd_nogather_gpu_dp.f90:1863 (nemo.src/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1863 
  A loop starting at line 1863 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1863 
  A region starting at line 1863 and ending at line 1863 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1863 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1863 (acc_copy).

```

```
  1862  !$acc kernels
  1863  ptab(jf)%pt4d(1,nlcj,:,:) = psgn(jf) * ptab(jf)%pt4d(2,nlcj-2,:,:)
  1864  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1868 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1868 
  A loop starting at line 1868 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1868 
  A region starting at line 1868 and ending at line 1868 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1868 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1868 (acc_copy).

```

```
  1867  !$acc kernels
  1868  ptab(jf)%pt4d(nlci,nlcj,:,:) = psgn(jf) * ptab(jf)%pt4d(nlci-1,nlcj-2,:,:)
  1869  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1929 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1929 
  A loop starting at line 1929 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1929 
  A region starting at line 1929 and ending at line 1929 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1929 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1929 (acc_copy).

```

```
  1928  !$acc kernels
  1929  ptab(jf)%pt4d(1,nlcj,:,:) = psgn(jf) * ptab(jf)%pt4d(3,nlcj-3,:,:)
  1930  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:1958 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1958 
  A loop starting at line 1958 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1958 
  A region starting at line 1958 and ending at line 1958 was placed on the accelerator.

```

```
  1957  IF (nimpp .eq. 1) THEN
  1958     ptab(jf)%pt4d(1,nlcj,:,:) = psgn(jf) * ptab(jf)%pt4d(2,nlcj-3,:,:)
  1959     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:1960 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1960 
  A loop starting at line 1960 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1960 
  A region starting at line 1960 and ending at line 1960 was placed on the accelerator.

```

```
  1959     IF ( .NOT. l_fast_exchanges ) &
  1960        ptab(jf)%pt4d(1,nlcj-1,:,:) = psgn(jf) * ptab(jf)%pt4d(2,nlcj-2,:,:)
  1961  ENDIF
```
- Line lbcnfd_nogather_gpu_dp.f90:1963 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1963 
  A loop starting at line 1963 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1963 
  A region starting at line 1963 and ending at line 1963 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1963 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1963 (acc_copy).

```

```
  1962  IF((nimpp + nlci - 1) .eq. jpiglo) THEN
  1963     ptab(jf)%pt4d(nlci,nlcj,:,:) = psgn(jf) * ptab(jf)%pt4d(nlci-1,nlcj-3,:,:)
  1964     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:1965 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6411 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1965 
  A loop starting at line 1965 will be serially executed.

ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1965 
  A region starting at line 1965 and ending at line 1965 was placed on the accelerator.

ftn-6415 ftn: ACCEL LBC_NFD_NOGATHER_4D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 1965 
  Allocate memory and copy whole array "ptab" to accelerator, copy back at line 1965 (acc_copy).

```

```
  1964     IF ( .NOT. l_fast_exchanges ) &
  1965        ptab(jf)%pt4d(nlci,nlcj-1,:,:) = psgn(jf) * ptab(jf)%pt4d(nlci-1,nlcj-2,:,:)
  1966  ENDIF
```

### Subroutine LBC_NFD_NOGATHER_2D_GPU_DP
- Line lbcnfd_nogather_gpu_dp.f90:135 (nemo.src/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 135 
  A region starting at line 135 and ending at line 135 was placed on the accelerator.

```

```
   134  !$acc kernels
   135  ptab(1,nlcj) = psgn * ptab(2,nlcj-2)
   136  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:140 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 140 
  A region starting at line 140 and ending at line 140 was placed on the accelerator.

```

```
   139  !$acc kernels
   140  ptab(nlci,nlcj) = psgn * ptab(nlci-1,nlcj-2)
   141  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:201 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 201 
  A region starting at line 201 and ending at line 201 was placed on the accelerator.

```

```
   200  !$acc kernels
   201  ptab(1,nlcj) = psgn * ptab(3,nlcj-3)
   202  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:230 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 230 
  A region starting at line 230 and ending at line 230 was placed on the accelerator.

```

```
   229  IF (nimpp .eq. 1) THEN
   230     ptab(1,nlcj) = psgn * ptab(2,nlcj-3)
   231     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:232 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 232 
  A region starting at line 232 and ending at line 232 was placed on the accelerator.

```

```
   231     IF ( .NOT. l_fast_exchanges ) &
   232        ptab(1,nlcj-1) = psgn * ptab(2,nlcj-2)
   233  ENDIF
```
- Line lbcnfd_nogather_gpu_dp.f90:235 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 235 
  A region starting at line 235 and ending at line 235 was placed on the accelerator.

```

```
   234  IF((nimpp + nlci - 1) .eq. jpiglo) THEN
   235     ptab(nlci,nlcj) = psgn * ptab(nlci-1,nlcj-3)
   236     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:237 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 237 
  A region starting at line 237 and ending at line 237 was placed on the accelerator.

```

```
   236     IF ( .NOT. l_fast_exchanges ) &
   237        ptab(nlci,nlcj-1) = psgn * ptab(nlci-1,nlcj-2)
   238  ENDIF
```

### Subroutine LBC_NFD_NOGATHER_2D_PTR_GPU_DP
- Line lbcnfd_nogather_gpu_dp.f90:479 (nemo.src/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 479 
  A region starting at line 479 and ending at line 479 was placed on the accelerator.

```

```
   478  !$acc kernels
   479  ptab(jf)%pt2d(1,nlcj) = psgn(jf) * ptab(jf)%pt2d(2,nlcj-2)
   480  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:484 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 484 
  A region starting at line 484 and ending at line 484 was placed on the accelerator.

```

```
   483  !$acc kernels
   484  ptab(jf)%pt2d(nlci,nlcj) = psgn(jf) * ptab(jf)%pt2d(nlci-1,nlcj-2)
   485  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:545 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 545 
  A region starting at line 545 and ending at line 545 was placed on the accelerator.

```

```
   544  !$acc kernels
   545  ptab(jf)%pt2d(1,nlcj) = psgn(jf) * ptab(jf)%pt2d(3,nlcj-3)
   546  !$acc end kernels
```
- Line lbcnfd_nogather_gpu_dp.f90:574 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 574 
  A region starting at line 574 and ending at line 574 was placed on the accelerator.

```

```
   573  IF (nimpp .eq. 1) THEN
   574     ptab(jf)%pt2d(1,nlcj) = psgn(jf) * ptab(jf)%pt2d(2,nlcj-3)
   575     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:576 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 576 
  A region starting at line 576 and ending at line 576 was placed on the accelerator.

```

```
   575     IF ( .NOT. l_fast_exchanges ) &
   576        ptab(jf)%pt2d(1,nlcj-1) = psgn(jf) * ptab(jf)%pt2d(2,nlcj-2)
   577  ENDIF
```
- Line lbcnfd_nogather_gpu_dp.f90:579 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 579 
  A region starting at line 579 and ending at line 579 was placed on the accelerator.

```

```
   578  IF((nimpp + nlci - 1) .eq. jpiglo) THEN
   579     ptab(jf)%pt2d(nlci,nlcj) = psgn(jf) * ptab(jf)%pt2d(nlci-1,nlcj-3)
   580     IF ( .NOT. l_fast_exchanges ) &
```
- Line lbcnfd_nogather_gpu_dp.f90:581 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd_nogather_gpu_dp.f90):
```
ftn-6405 ftn: ACCEL LBC_NFD_NOGATHER_2D_PTR_GPU_DP, File = lbcnfd_nogather_gpu_dp.f90, Line = 581 
  A region starting at line 581 and ending at line 581 was placed on the accelerator.

```

```
   580     IF ( .NOT. l_fast_exchanges ) &
   581        ptab(jf)%pt2d(nlci,nlcj-1) = psgn(jf) * ptab(jf)%pt2d(nlci-1,nlcj-2)
   582  ENDIF
```
