### Subroutine hbig
- Line icedyn_adv_pra.f90:1069 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icedyn_adv_pra.f90
nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icedyn_adv_umx.f90):
```
1069, Loop carried dependence due to exposed use of wfx_res(1:jpi,1:jpj),sfx_res(1:jpi,1:jpj),hfx_res(1:jpi,1:jpj) prevents parallelization
```
```
1068 !$acc parallel loop seq private(zhip,zhi,zhs,zsi,zfra)
1069 DO jl = 1, jpl
1070 !! !$omp do
1071 !$acc loop gang vector collapse(2)
1072 DO jj = 1, jpj
1073 DO ji = 1, jpi
1074 IF ( pv_i(ji,jj,jl) > 0._wp ) THEN
1075 !
1076 ! ! -- check h_ip -- !
1077 ! if h_ip is larger than the surrounding 9 pts => reduce h_ip and increase a_ip
1078 IF( ln_pnd_LEV .AND. pv_ip(ji,jj,jl) > 0._wp ) THEN
1079 zhip = pv_ip(ji,jj,jl) / MAX( epsi20, pa_ip(ji,jj,jl) )
1080 IF( zhip > phip_max(ji,jj,jl) .AND. pa_ip(ji,jj,jl) < 0.15 ) THEN
1081 pa_ip(ji,jj,jl) = pv_ip(ji,jj,jl) / phip_max(ji,jj,jl)
1082 ENDIF
1083 ENDIF
1084 !
1085 ! ! -- check h_i -- !
1086 ! if h_i is larger than the surrounding 9 pts => reduce h_i and increase a_i
1087 zhi = pv_i(ji,jj,jl) / pa_i(ji,jj,jl)
1088 IF( zhi > phi_max(ji,jj,jl) .AND. pa_i(ji,jj,jl) < 0.15 ) THEN
1089 pa_i(ji,jj,jl) = pv_i(ji,jj,jl) / MIN( phi_max(ji,jj,jl), hi_max(jpl) ) !-- bound h_i to hi_max (99 m)
1090 ENDIF
1091 !
1092 ! ! -- check h_s -- !
1093 ! if h_s is larger than the surrounding 9 pts => put the snow excess in the ocean
1094 zhs = pv_s(ji,jj,jl) / pa_i(ji,jj,jl)
1095 IF( pv_s(ji,jj,jl) > 0._wp .AND. zhs > phs_max(ji,jj,jl) .AND. pa_i(ji,jj,jl) < 0.15 ) THEN
1096 zfra = phs_max(ji,jj,jl) / MAX( zhs, epsi20 )
1097 !
1098 wfx_res(ji,jj) = wfx_res(ji,jj) + ( pv_s(ji,jj,jl) - pa_i(ji,jj,jl) * phs_max(ji,jj,jl) ) * rhos * z1_dt
1099 hfx_res(ji,jj) = hfx_res(ji,jj) - SUM( pe_s(ji,jj,1:nlay_s,jl) ) * ( 1._wp - zfra ) * z1_dt ! W.m-2 <0
1100 !
1101 pe_s(ji,jj,1:nlay_s,jl) = pe_s(ji,jj,1:nlay_s,jl) * zfra
1102 pv_s(ji,jj,jl) = pa_i(ji,jj,jl) * phs_max(ji,jj,jl)
1103 ENDIF
1104 !
1105 ! ! -- check s_i -- !
1106 ! if s_i is larger than the surrounding 9 pts => put salt excess in the ocean
1107 zsi = psv_i(ji,jj,jl) / pv_i(ji,jj,jl)
1108 IF( zsi > psi_max(ji,jj,jl) .AND. pa_i(ji,jj,jl) < 0.15 ) THEN
1109 zfra = psi_max(ji,jj,jl) / zsi
1110 sfx_res(ji,jj) = sfx_res(ji,jj) + psv_i(ji,jj,jl) * ( 1._wp - zfra ) * rhoi * z1_dt
1111 psv_i(ji,jj,jl) = psv_i(ji,jj,jl) * zfra
1112 ENDIF
1113 !
1114 ENDIF
1115 END DO
1116 END DO
1117 !! !$omp end do
1118 !$acc end loop
```
- Line icedyn_adv_pra.f90:1124 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icedyn_adv_pra.f90
nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icedyn_adv_umx.f90):
```
1124, Loop carried dependence due to exposed use of hfx_res(1:jpi,1:jpj) prevents parallelization
Complex loop carried dependence of hfx_res prevents parallelization
1125, Loop carried dependence due to exposed use of hfx_res(1:jpi,1:jpj) prevents parallelization
```
```
1123 !$acc parallel loop seq private(zei,zfra) collapse(2)
1124 DO jl = 1, jpl
1125 DO jk = 1, nlay_i
1126 !! !$omp do
1127 !$acc loop gang vector collapse(2)
1128 DO jj = 1, jpj
1129 DO ji = 1, jpi
1130 IF ( pv_i(ji,jj,jl) > 0._wp ) THEN
1131 ! if e_i/v_i is larger than the surrounding 9 pts => put the heat excess in the ocean
1132 zei = pe_i(ji,jj,jk,jl) / pv_i(ji,jj,jl)
1133 IF( zei > pei_max(ji,jj,jk,jl) .AND. pa_i(ji,jj,jl) < 0.15 ) THEN
1134 zfra = pei_max(ji,jj,jk,jl) / zei
1135 hfx_res(ji,jj) = hfx_res(ji,jj) - pe_i(ji,jj,jk,jl) * ( 1._wp - zfra ) * z1_dt ! W.m-2 <0
1136 pe_i(ji,jj,jk,jl) = pe_i(ji,jj,jk,jl) * zfra
1137 ENDIF
1138 ENDIF
1139 END DO
1140 END DO
1141 !! !$omp end do
1142 !$acc end loop
```
- Line icedyn_adv_pra.f90:1149 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icedyn_adv_pra.f90
nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icedyn_adv_umx.f90):
```
1149, Loop carried dependence due to exposed use of hfx_res(1:jpi,1:jpj) prevents parallelization
Complex loop carried dependence of hfx_res prevents parallelization
1150, Loop carried dependence due to exposed use of hfx_res(1:jpi,1:jpj) prevents parallelization
```
```
1148 !$acc parallel loop seq private(zes,zfra) collapse(2)
1149 DO jl = 1, jpl
1150 DO jk = 1, nlay_s
1151 !! !$omp do
1152 !$acc loop gang vector private(zes,zfra) collapse(2)
1153 DO jj = 1, jpj
1154 DO ji = 1, jpi
1155 IF ( pv_s(ji,jj,jl) > TINY(0._wp) ) THEN
1156 ! if e_s/v_s is larger than the surrounding 9 pts => put the heat excess in the ocean
1157 zes = pe_s(ji,jj,jk,jl) / pv_s(ji,jj,jl)
1158 IF( zes > pes_max(ji,jj,jk,jl) .AND. pa_i(ji,jj,jl) < 0.15 ) THEN
1159 zfra = pes_max(ji,jj,jk,jl) / zes
1160 hfx_res(ji,jj) = hfx_res(ji,jj) - pe_s(ji,jj,jk,jl) * ( 1._wp - zfra ) * z1_dt ! W.m-2 <0
1161 pe_s(ji,jj,jk,jl) = pe_s(ji,jj,jk,jl) * zfra
1162 ENDIF
1163 ENDIF
1164 END DO
1165 END DO
1166 !! !$omp end do
1167 !$acc end loop
```
### Subroutine ice_var_zapneg
- Line icevar.f90:652 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icevar.f90):
```
652, Loop carried dependence due to exposed use of hfx_res(1:jpi,1:jpj) prevents parallelization
```
```
651 !$acc parallel loop seq
652 DO jk = 1, nlay_i
653 !$acc loop gang vector collapse(2)
654 DO jj = 1 , jpj
655 DO ji = 1 , jpi
656 IF( pe_i(ji,jj,jk,jl) < 0._wp .OR. pa_i(ji,jj,jl) <= 0._wp ) THEN
657 hfx_res(ji,jj) = hfx_res(ji,jj) - pe_i(ji,jj,jk,jl) * z1_dt ! W.m-2 >0
658 pe_i(ji,jj,jk,jl) = 0._wp
659 ENDIF
660 END DO
661 END DO
662 END DO
663 !$acc end parallel loop
```
- Line icevar.f90:666 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/icevar.f90):
```
666, Loop carried dependence due to exposed use of hfx_res(1:jpi,1:jpj) prevents parallelization
```
```
665 !$acc parallel loop seq
666 DO jk = 1, nlay_s
667 !$acc loop gang vector collapse(2)
668 DO jj = 1 , jpj
669 DO ji = 1 , jpi
670 IF( pe_s(ji,jj,jk,jl) < 0._wp .OR. pa_i(ji,jj,jl) <= 0._wp ) THEN
671 hfx_res(ji,jj) = hfx_res(ji,jj) - pe_s(ji,jj,jk,jl) * z1_dt ! W.m-2 <0
672 pe_s(ji,jj,jk,jl) = 0._wp
673 ENDIF
674 END DO
675 END DO
676 END DO
677 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_2d_gpu_dp
- Line lbcnfd.f90:8835 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
8835, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(nlcj,psgn)
```
```
8834 !$acc parallel loop gang vector
8835 DO jl = 1, ipl; DO jk = 1, ipk
8836 ptab(1,nlcj) = psgn * ptab(3,nlcj-2)
8837 END DO; END DO
8838 !$acc end parallel loop
```
- Line lbcnfd.f90:8851 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
8851, Loop carried dependence of ptab prevents parallelization
Loop carried dependence of ptab prevents vectorization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
8852, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijta,ijt,psgn,nlcj,nimpp)
```
```
8850 !$acc parallel loop gang vector
8851 DO jl = 1, ipl; DO jk = 1, ipk
8852 DO ji = startloop, nlci
8853 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
8854 jia = ji + nimpp - 1
8855 ijta = jpiglo - jia + 2
8856 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
8857 ptab(ji,nlcj-1) = psgn * ptab(ijta-nimpp+1,nlcj-1)
8858 ELSE
8859 ptab(ji,nlcj-1) = psgn * ptab2(ijt,ijpjp1,jk,jl)
8860 ENDIF
8861 END DO
8862 END DO; END DO
8863 !$acc end parallel loop
```
- Line lbcnfd.f90:8907 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
8907, Loop carried dependence of ptab prevents parallelization
Loop carried dependence of ptab prevents vectorization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
8908, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijua,iju,psgn,nlcj,nimpp)
```
```
8906 !$acc parallel loop gang vector
8907 DO jl = 1, ipl; DO jk = 1, ipk
8908 DO ji = startloop, endloop
8909 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
8910 jia = ji + nimpp - 1
8911 ijua = jpiglo - jia + 1
8912 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
8913 ptab(ji,nlcj-1) = psgn * ptab(ijua-nimpp+1,nlcj-1)
8914 ELSE
8915 ptab(ji,nlcj-1) = psgn * ptab2(iju,ijpjp1,jk,jl)
8916 ENDIF
8917 END DO
8918 END DO; END DO
8919 !$acc end parallel loop
```
- Line lbcnfd.f90:9020 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9020, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(psgn,nlcj,nlci)
```
```
9019 !$acc parallel loop gang vector
9020 DO jl = 1, ipl; DO jk = 1, ipk
9021 ptab(nlci,nlcj) = psgn * ptab(nlci-2,nlcj-1)
9022 END DO; END DO
9023 !$acc end parallel loop
```
- Line lbcnfd.f90:9072 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9072, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(psgn,nlcj,nlci)
```
```
9071 !$acc parallel loop gang vector
9072 DO jl = 1, ipl; DO jk = 1, ipk
9073 ptab(nlci,nlcj) = psgn * ptab(nlci-2,nlcj-2)
9074 END DO; END DO
9075 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_2d_gpu_sp
- Line lbcnfd.f90:3485 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3485, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(nlcj,psgn)
```
```
3484 !$acc parallel loop gang vector
3485 DO jl = 1, ipl; DO jk = 1, ipk
3486 ptab(1,nlcj) = psgn * ptab(3,nlcj-2)
3487 END DO; END DO
3488 !$acc end parallel loop
```
- Line lbcnfd.f90:3501 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3501, Loop carried dependence of ptab prevents parallelization
Loop carried dependence of ptab prevents vectorization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
3502, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijta,ijt,psgn,nlcj,nimpp)
```
```
3500 !$acc parallel loop gang vector
3501 DO jl = 1, ipl; DO jk = 1, ipk
3502 DO ji = startloop, nlci
3503 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
3504 jia = ji + nimpp - 1
3505 ijta = jpiglo - jia + 2
3506 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
3507 ptab(ji,nlcj-1) = psgn * ptab(ijta-nimpp+1,nlcj-1)
3508 ELSE
3509 ptab(ji,nlcj-1) = psgn * ptab2(ijt,ijpjp1,jk,jl)
3510 ENDIF
3511 END DO
3512 END DO; END DO
3513 !$acc end parallel loop
```
- Line lbcnfd.f90:3557 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3557, Loop carried dependence of ptab prevents parallelization
Loop carried dependence of ptab prevents vectorization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
3558, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijua,iju,psgn,nlcj,nimpp)
```
```
3556 !$acc parallel loop gang vector
3557 DO jl = 1, ipl; DO jk = 1, ipk
3558 DO ji = startloop, endloop
3559 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
3560 jia = ji + nimpp - 1
3561 ijua = jpiglo - jia + 1
3562 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
3563 ptab(ji,nlcj-1) = psgn * ptab(ijua-nimpp+1,nlcj-1)
3564 ELSE
3565 ptab(ji,nlcj-1) = psgn * ptab2(iju,ijpjp1,jk,jl)
3566 ENDIF
3567 END DO
3568 END DO; END DO
3569 !$acc end parallel loop
```
- Line lbcnfd.f90:3670 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3670, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(psgn,nlcj,nlci)
```
```
3669 !$acc parallel loop gang vector
3670 DO jl = 1, ipl; DO jk = 1, ipk
3671 ptab(nlci,nlcj) = psgn * ptab(nlci-2,nlcj-1)
3672 END DO; END DO
3673 !$acc end parallel loop
```
- Line lbcnfd.f90:3722 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3722, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(psgn,nlcj,nlci)
```
```
3721 !$acc parallel loop gang vector
3722 DO jl = 1, ipl; DO jk = 1, ipk
3723 ptab(nlci,nlcj) = psgn * ptab(nlci-2,nlcj-2)
3724 END DO; END DO
3725 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_2d_ptr_gpu_dp
- Line lbcnfd.f90:9175 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9175, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(nlcj,jf)
```
```
9174 !$acc parallel loop gang vector
9175 DO jl = 1, ipl; DO jk = 1, ipk
9176 ptab(jf)%pt2d(1,nlcj) = psgn(jf) * ptab(jf)%pt2d(3,nlcj-2)
9177 END DO; END DO
9178 !$acc end parallel loop
```
- Line lbcnfd.f90:9191 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9191, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried dependence of ptab%pt2d$p prevents vectorization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(nlci,startloop)
9192, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,ijt,ijta,nlcj,nimpp)
```
```
9190 !$acc parallel loop gang vector
9191 DO jl = 1, ipl; DO jk = 1, ipk
9192 DO ji = startloop, nlci
9193 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
9194 jia = ji + nimpp - 1
9195 ijta = jpiglo - jia + 2
9196 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
9197 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab(jf)%pt2d(ijta-nimpp+1,nlcj-1)
9198 ELSE
9199 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab2(jf)%pt4d(ijt,ijpjp1,jk,jl)
9200 ENDIF
9201 END DO
9202 END DO; END DO
9203 !$acc end parallel loop
```
- Line lbcnfd.f90:9247 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9247, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried dependence of ptab%pt2d$p prevents vectorization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
9248, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,iju,ijua,nlcj,nimpp)
```
```
9246 !$acc parallel loop gang vector
9247 DO jl = 1, ipl; DO jk = 1, ipk
9248 DO ji = startloop, endloop
9249 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
9250 jia = ji + nimpp - 1
9251 ijua = jpiglo - jia + 1
9252 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
9253 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab(jf)%pt2d(ijua-nimpp+1,nlcj-1)
9254 ELSE
9255 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab2(jf)%pt4d(iju,ijpjp1,jk,jl)
9256 ENDIF
9257 END DO
9258 END DO; END DO
9259 !$acc end parallel loop
```
- Line lbcnfd.f90:9360 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9360, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(nlcj,nlci,jf)
```
```
9359 !$acc parallel loop gang vector
9360 DO jl = 1, ipl; DO jk = 1, ipk
9361 ptab(jf)%pt2d(nlci,nlcj) = psgn(jf) * ptab(jf)%pt2d(nlci-2,nlcj-1)
9362 END DO; END DO
9363 !$acc end parallel loop
```
- Line lbcnfd.f90:9412 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9412, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(nlcj,nlci,jf)
```
```
9411 !$acc parallel loop gang vector
9412 DO jl = 1, ipl; DO jk = 1, ipk
9413 ptab(jf)%pt2d(nlci,nlcj) = psgn(jf) * ptab(jf)%pt2d(nlci-2,nlcj-2)
9414 END DO; END DO
9415 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_2d_ptr_gpu_sp
- Line lbcnfd.f90:3825 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3825, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(nlcj,jf)
```
```
3824 !$acc parallel loop gang vector
3825 DO jl = 1, ipl; DO jk = 1, ipk
3826 ptab(jf)%pt2d(1,nlcj) = psgn(jf) * ptab(jf)%pt2d(3,nlcj-2)
3827 END DO; END DO
3828 !$acc end parallel loop
```
- Line lbcnfd.f90:3841 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3841, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried dependence of ptab%pt2d$p prevents vectorization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(nlci,startloop)
3842, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,ijt,ijta,nlcj,nimpp)
```
```
3840 !$acc parallel loop gang vector
3841 DO jl = 1, ipl; DO jk = 1, ipk
3842 DO ji = startloop, nlci
3843 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
3844 jia = ji + nimpp - 1
3845 ijta = jpiglo - jia + 2
3846 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
3847 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab(jf)%pt2d(ijta-nimpp+1,nlcj-1)
3848 ELSE
3849 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab2(jf)%pt4d(ijt,ijpjp1,jk,jl)
3850 ENDIF
3851 END DO
3852 END DO; END DO
3853 !$acc end parallel loop
```
- Line lbcnfd.f90:3897 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
3897, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried dependence of ptab%pt2d$p prevents vectorization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
3898, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Complex loop carried dependence of ptab%pt2d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,iju,ijua,nlcj,nimpp)
```
```
3896 !$acc parallel loop gang vector
3897 DO jl = 1, ipl; DO jk = 1, ipk
3898 DO ji = startloop, endloop
3899 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
3900 jia = ji + nimpp - 1
3901 ijua = jpiglo - jia + 1
3902 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
3903 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab(jf)%pt2d(ijua-nimpp+1,nlcj-1)
3904 ELSE
3905 ptab(jf)%pt2d(ji,nlcj-1) = psgn(jf) * ptab2(jf)%pt4d(iju,ijpjp1,jk,jl)
3906 ENDIF
3907 END DO
3908 END DO; END DO
3909 !$acc end parallel loop
```
- Line lbcnfd.f90:4010 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4010, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(nlcj,nlci,jf)
```
```
4009 !$acc parallel loop gang vector
4010 DO jl = 1, ipl; DO jk = 1, ipk
4011 ptab(jf)%pt2d(nlci,nlcj) = psgn(jf) * ptab(jf)%pt2d(nlci-2,nlcj-1)
4012 END DO; END DO
4013 !$acc end parallel loop
```
- Line lbcnfd.f90:4062 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4062, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(nlcj,nlci,jf)
```
```
4061 !$acc parallel loop gang vector
4062 DO jl = 1, ipl; DO jk = 1, ipk
4063 ptab(jf)%pt2d(nlci,nlcj) = psgn(jf) * ptab(jf)%pt2d(nlci-2,nlcj-2)
4064 END DO; END DO
4065 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_3d_gpu_dp
- Line lbcnfd.f90:9536 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9536, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijta,ijt,psgn,nlcj,nimpp)
```
```
9534 !$acc parallel loop gang vector
9535 DO jl = 1, ipl; DO jk = 1, ipk
9536 DO ji = startloop, nlci
9537 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
9538 jia = ji + nimpp - 1
9539 ijta = jpiglo - jia + 2
9540 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
9541 ptab(ji,nlcj-1,jk) = psgn * ptab(ijta-nimpp+1,nlcj-1,jk)
9542 ELSE
9543 ptab(ji,nlcj-1,jk) = psgn * ptab2(ijt,ijpjp1,jk,jl)
9544 ENDIF
9545 END DO
9546 END DO; END DO
9547 !$acc end parallel loop
```
- Line lbcnfd.f90:9592 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9592, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijua,iju,psgn,nlcj,nimpp)
```
```
9590 !$acc parallel loop gang vector
9591 DO jl = 1, ipl; DO jk = 1, ipk
9592 DO ji = startloop, endloop
9593 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
9594 jia = ji + nimpp - 1
9595 ijua = jpiglo - jia + 1
9596 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
9597 ptab(ji,nlcj-1,jk) = psgn * ptab(ijua-nimpp+1,nlcj-1,jk)
9598 ELSE
9599 ptab(ji,nlcj-1,jk) = psgn * ptab2(iju,ijpjp1,jk,jl)
9600 ENDIF
9601 END DO
9602 END DO; END DO
9603 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_3d_gpu_sp
- Line lbcnfd.f90:4186 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4186, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijta,ijt,psgn,nlcj,nimpp)
```
```
4184 !$acc parallel loop gang vector
4185 DO jl = 1, ipl; DO jk = 1, ipk
4186 DO ji = startloop, nlci
4187 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
4188 jia = ji + nimpp - 1
4189 ijta = jpiglo - jia + 2
4190 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
4191 ptab(ji,nlcj-1,jk) = psgn * ptab(ijta-nimpp+1,nlcj-1,jk)
4192 ELSE
4193 ptab(ji,nlcj-1,jk) = psgn * ptab2(ijt,ijpjp1,jk,jl)
4194 ENDIF
4195 END DO
4196 END DO; END DO
4197 !$acc end parallel loop
```
- Line lbcnfd.f90:4242 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4242, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijua,iju,psgn,nlcj,nimpp)
```
```
4240 !$acc parallel loop gang vector
4241 DO jl = 1, ipl; DO jk = 1, ipk
4242 DO ji = startloop, endloop
4243 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
4244 jia = ji + nimpp - 1
4245 ijua = jpiglo - jia + 1
4246 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
4247 ptab(ji,nlcj-1,jk) = psgn * ptab(ijua-nimpp+1,nlcj-1,jk)
4248 ELSE
4249 ptab(ji,nlcj-1,jk) = psgn * ptab2(iju,ijpjp1,jk,jl)
4250 ENDIF
4251 END DO
4252 END DO; END DO
4253 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_3d_ptr_gpu_dp
- Line lbcnfd.f90:9875 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9875, Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(startloop,nlci)
9876, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,ijt,ijta,nimpp,nlcj)
```
```
9874 !$acc parallel loop gang vector
9875 DO jl = 1, ipl; DO jk = 1, ipk
9876 DO ji = startloop, nlci
9877 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
9878 jia = ji + nimpp - 1
9879 ijta = jpiglo - jia + 2
9880 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
9881 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab(jf)%pt3d(ijta-nimpp+1,nlcj-1,jk)
9882 ELSE
9883 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab2(jf)%pt4d(ijt,ijpjp1,jk,jl)
9884 ENDIF
9885 END DO
9886 END DO; END DO
9887 !$acc end parallel loop
```
- Line lbcnfd.f90:9931 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
9931, Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
9932, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,iju,ijua,nlcj,nimpp)
```
```
9930 !$acc parallel loop gang vector
9931 DO jl = 1, ipl; DO jk = 1, ipk
9932 DO ji = startloop, endloop
9933 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
9934 jia = ji + nimpp - 1
9935 ijua = jpiglo - jia + 1
9936 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
9937 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab(jf)%pt3d(ijua-nimpp+1,nlcj-1,jk)
9938 ELSE
9939 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab2(jf)%pt4d(iju,ijpjp1,jk,jl)
9940 ENDIF
9941 END DO
9942 END DO; END DO
9943 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_3d_ptr_gpu_sp
- Line lbcnfd.f90:4525 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4525, Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(startloop,nlci)
4526, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,ijt,ijta,nimpp,nlcj)
```
```
4524 !$acc parallel loop gang vector
4525 DO jl = 1, ipl; DO jk = 1, ipk
4526 DO ji = startloop, nlci
4527 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
4528 jia = ji + nimpp - 1
4529 ijta = jpiglo - jia + 2
4530 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
4531 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab(jf)%pt3d(ijta-nimpp+1,nlcj-1,jk)
4532 ELSE
4533 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab2(jf)%pt4d(ijt,ijpjp1,jk,jl)
4534 ENDIF
4535 END DO
4536 END DO; END DO
4537 !$acc end parallel loop
```
- Line lbcnfd.f90:4581 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4581, Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
4582, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Complex loop carried dependence of ptab%pt3d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,iju,ijua,nlcj,nimpp)
```
```
4580 !$acc parallel loop gang vector
4581 DO jl = 1, ipl; DO jk = 1, ipk
4582 DO ji = startloop, endloop
4583 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
4584 jia = ji + nimpp - 1
4585 ijua = jpiglo - jia + 1
4586 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
4587 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab(jf)%pt3d(ijua-nimpp+1,nlcj-1,jk)
4588 ELSE
4589 ptab(jf)%pt3d(ji,nlcj-1,jk) = psgn(jf) * ptab2(jf)%pt4d(iju,ijpjp1,jk,jl)
4590 ENDIF
4591 END DO
4592 END DO; END DO
4593 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_4d_gpu_dp
- Line lbcnfd.f90:10220 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
10220, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijta,ijt,psgn,nlcj,nimpp)
```
```
10218 !$acc parallel loop gang vector
10219 DO jl = 1, ipl; DO jk = 1, ipk
10220 DO ji = startloop, nlci
10221 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
10222 jia = ji + nimpp - 1
10223 ijta = jpiglo - jia + 2
10224 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
10225 ptab(ji,nlcj-1,jk,jl) = psgn * ptab(ijta-nimpp+1,nlcj-1,jk,jl)
10226 ELSE
10227 ptab(ji,nlcj-1,jk,jl) = psgn * ptab2(ijt,ijpjp1,jk,jl)
10228 ENDIF
10229 END DO
10230 END DO; END DO
10231 !$acc end parallel loop
```
- Line lbcnfd.f90:10276 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
10276, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijua,iju,psgn,nlcj,nimpp)
```
```
10274 !$acc parallel loop gang vector
10275 DO jl = 1, ipl; DO jk = 1, ipk
10276 DO ji = startloop, endloop
10277 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
10278 jia = ji + nimpp - 1
10279 ijua = jpiglo - jia + 1
10280 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
10281 ptab(ji,nlcj-1,jk,jl) = psgn * ptab(ijua-nimpp+1,nlcj-1,jk,jl)
10282 ELSE
10283 ptab(ji,nlcj-1,jk,jl) = psgn * ptab2(iju,ijpjp1,jk,jl)
10284 ENDIF
10285 END DO
10286 END DO; END DO
10287 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_4d_gpu_sp
- Line lbcnfd.f90:4870 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4870, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijta,ijt,psgn,nlcj,nimpp)
```
```
4868 !$acc parallel loop gang vector
4869 DO jl = 1, ipl; DO jk = 1, ipk
4870 DO ji = startloop, nlci
4871 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
4872 jia = ji + nimpp - 1
4873 ijta = jpiglo - jia + 2
4874 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
4875 ptab(ji,nlcj-1,jk,jl) = psgn * ptab(ijta-nimpp+1,nlcj-1,jk,jl)
4876 ELSE
4877 ptab(ji,nlcj-1,jk,jl) = psgn * ptab2(ijt,ijpjp1,jk,jl)
4878 ENDIF
4879 END DO
4880 END DO; END DO
4881 !$acc end parallel loop
```
- Line lbcnfd.f90:4926 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
4926, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,ijua,iju,psgn,nlcj,nimpp)
```
```
4924 !$acc parallel loop gang vector
4925 DO jl = 1, ipl; DO jk = 1, ipk
4926 DO ji = startloop, endloop
4927 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
4928 jia = ji + nimpp - 1
4929 ijua = jpiglo - jia + 1
4930 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
4931 ptab(ji,nlcj-1,jk,jl) = psgn * ptab(ijua-nimpp+1,nlcj-1,jk,jl)
4932 ELSE
4933 ptab(ji,nlcj-1,jk,jl) = psgn * ptab2(iju,ijpjp1,jk,jl)
4934 ENDIF
4935 END DO
4936 END DO; END DO
4937 !$acc end parallel loop
```
### Subroutine lbc_nfd_nogather_4d_ptr_gpu_sp
- Line lbcnfd.f90:5209 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
5209, Complex loop carried dependence of ptab%pt4d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(startloop,nlci)
5210, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Complex loop carried dependence of ptab%pt4d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,ijt,ijta,nimpp,nlcj)
```
```
5208 !$acc parallel loop gang vector
5209 DO jl = 1, ipl; DO jk = 1, ipk
5210 DO ji = startloop, nlci
5211 ijt = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 4
5212 jia = ji + nimpp - 1
5213 ijta = jpiglo - jia + 2
5214 IF( ijta >= startloop+nimpp-1 .AND. ijta < jia ) THEN
5215 ptab(jf)%pt4d(ji,nlcj-1,jk,jl) = psgn(jf) * ptab(jf)%pt4d(ijta-nimpp+1,nlcj-1,jk,jl)
5216 ELSE
5217 ptab(jf)%pt4d(ji,nlcj-1,jk,jl) = psgn(jf) * ptab2(jf)%pt4d(ijt,ijpjp1,jk,jl)
5218 ENDIF
5219 END DO
5220 END DO; END DO
5221 !$acc end parallel loop
```
- Line lbcnfd.f90:5265 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbcnfd.f90):
```
5265, Complex loop carried dependence of ptab%pt4d$p,ptab2%pt4d$p prevents parallelization
5266, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Complex loop carried dependence of ptab%pt4d$p,ptab2%pt4d$p prevents parallelization
Generating implicit firstprivate(jia,jpnj,jpiglo,ijpjp1,jf,iju,ijua,nlcj,nimpp)
```
```
5264 !$acc parallel loop gang vector
5265 DO jl = 1, ipl; DO jk = 1, ipk
5266 DO ji = startloop, endloop
5267 iju = jpiglo - ji - nimpp - nfiimpp(isendto(1),jpnj) + 3
5268 jia = ji + nimpp - 1
5269 ijua = jpiglo - jia + 1
5270 IF( ijua >= startloop+nimpp-1 .AND. ijua < jia ) THEN
5271 ptab(jf)%pt4d(ji,nlcj-1,jk,jl) = psgn(jf) * ptab(jf)%pt4d(ijua-nimpp+1,nlcj-1,jk,jl)
5272 ELSE
5273 ptab(jf)%pt4d(ji,nlcj-1,jk,jl) = psgn(jf) * ptab2(jf)%pt4d(iju,ijpjp1,jk,jl)
5274 ENDIF
5275 END DO
5276 END DO; END DO
5277 !$acc end parallel loop
```
### Subroutine mpp_lnk_2d_gpu_dp
- Line lbclnk.f90:13096 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13096, Loop carried dependence due to exposed use of ptab(ihl+1,:jpj) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
13095 !$acc parallel loop seq
13096 DO jf = 1, ipf ! number of arrays to be treated
13097 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13098 !$acc loop gang vector collapse(4)
13099 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
13100 ptab(ji,jj) = ptab(ihl+1,jj)
13101 END DO ; END DO ; END DO ; END DO
13102 ENDIF
13103 END DO
13104 !$acc end parallel loop
```
- Line lbclnk.f90:13107 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13107, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
13106 !$acc parallel loop seq
13107 DO jf = 1, ipf ! number of arrays to be treated
13108 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13109 !$acc loop gang vector collapse(4)
13110 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
13111 ptab(ji,jj) = zland
13112 END DO; END DO ; END DO ; END DO
13113 ENDIF
13114 END DO
13115 !$acc end parallel loop
```
- Line lbclnk.f90:13267 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13267, Loop carried dependence due to exposed use of ptab(:jpi,ihl+1) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
13266 !$acc parallel loop seq
13267 DO jf = 1, ipf ! number of arrays to be treated
13268 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13269 !$acc loop gang vector collapse(4)
13270 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
13271 ptab(ji,jj) = ptab(ji,ihl+1)
13272 END DO ; END DO ; END DO ; END DO
13273 ENDIF
13274 END DO
13275 !$acc end parallel loop
```
- Line lbclnk.f90:13278 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13278, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
13277 !$acc parallel loop seq
13278 DO jf = 1, ipf ! number of arrays to be treated
13279 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13280 !$acc loop gang vector collapse(4)
13281 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
13282 ptab(ji,jj) = zland
13283 END DO; END DO ; END DO ; END DO
13284 ENDIF
13285 END DO
13286 !$acc end parallel loop
```
### Subroutine mpp_lnk_2d_gpu_sp
- Line lbclnk.f90:10191 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10191, Loop carried dependence due to exposed use of ptab(ihl+1,:jpj) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
10190 !$acc parallel loop seq
10191 DO jf = 1, ipf ! number of arrays to be treated
10192 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10193 !$acc loop gang vector collapse(4)
10194 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
10195 ptab(ji,jj) = ptab(ihl+1,jj)
10196 END DO ; END DO ; END DO ; END DO
10197 ENDIF
10198 END DO
10199 !$acc end parallel loop
```
- Line lbclnk.f90:10202 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10202, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
10201 !$acc parallel loop seq
10202 DO jf = 1, ipf ! number of arrays to be treated
10203 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10204 !$acc loop gang vector collapse(4)
10205 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
10206 ptab(ji,jj) = zland
10207 END DO; END DO ; END DO ; END DO
10208 ENDIF
10209 END DO
10210 !$acc end parallel loop
```
- Line lbclnk.f90:10362 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10362, Loop carried dependence due to exposed use of ptab(:jpi,ihl+1) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
10361 !$acc parallel loop seq
10362 DO jf = 1, ipf ! number of arrays to be treated
10363 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10364 !$acc loop gang vector collapse(4)
10365 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
10366 ptab(ji,jj) = ptab(ji,ihl+1)
10367 END DO ; END DO ; END DO ; END DO
10368 ENDIF
10369 END DO
10370 !$acc end parallel loop
```
- Line lbclnk.f90:10373 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10373, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
10372 !$acc parallel loop seq
10373 DO jf = 1, ipf ! number of arrays to be treated
10374 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10375 !$acc loop gang vector collapse(4)
10376 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
10377 ptab(ji,jj) = zland
10378 END DO; END DO ; END DO ; END DO
10379 ENDIF
10380 END DO
10381 !$acc end parallel loop
```
### Subroutine mpp_lnk_2d_ptr_gpu_dp
- Line lbclnk.f90:13579 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13579, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
13578 !$acc parallel loop seq
13579 DO jf = 1, ipf ! number of arrays to be treated
13580 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13581 !$acc loop gang vector collapse(4)
13582 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
13583 ptab(jf)%pt2d(ji,jj) = ptab(jf)%pt2d(ihl+1,jj)
13584 END DO ; END DO ; END DO ; END DO
13585 ENDIF
13586 END DO
13587 !$acc end parallel loop
```
- Line lbclnk.f90:13590 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13590, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
13589 !$acc parallel loop seq
13590 DO jf = 1, ipf ! number of arrays to be treated
13591 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13592 !$acc loop gang vector collapse(4)
13593 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
13594 ptab(jf)%pt2d(ji,jj) = zland
13595 END DO; END DO ; END DO ; END DO
13596 ENDIF
13597 END DO
13598 !$acc end parallel loop
```
- Line lbclnk.f90:13750 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13750, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
13749 !$acc parallel loop seq
13750 DO jf = 1, ipf ! number of arrays to be treated
13751 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13752 !$acc loop gang vector collapse(4)
13753 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
13754 ptab(jf)%pt2d(ji,jj) = ptab(jf)%pt2d(ji,ihl+1)
13755 END DO ; END DO ; END DO ; END DO
13756 ENDIF
13757 END DO
13758 !$acc end parallel loop
```
- Line lbclnk.f90:13761 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
13761, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
13760 !$acc parallel loop seq
13761 DO jf = 1, ipf ! number of arrays to be treated
13762 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
13763 !$acc loop gang vector collapse(4)
13764 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
13765 ptab(jf)%pt2d(ji,jj) = zland
13766 END DO; END DO ; END DO ; END DO
13767 ENDIF
13768 END DO
13769 !$acc end parallel loop
```
### Subroutine mpp_lnk_2d_ptr_gpu_sp
- Line lbclnk.f90:10674 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10674, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
10673 !$acc parallel loop seq
10674 DO jf = 1, ipf ! number of arrays to be treated
10675 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10676 !$acc loop gang vector collapse(4)
10677 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
10678 ptab(jf)%pt2d(ji,jj) = ptab(jf)%pt2d(ihl+1,jj)
10679 END DO ; END DO ; END DO ; END DO
10680 ENDIF
10681 END DO
10682 !$acc end parallel loop
```
- Line lbclnk.f90:10685 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10685, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
10684 !$acc parallel loop seq
10685 DO jf = 1, ipf ! number of arrays to be treated
10686 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10687 !$acc loop gang vector collapse(4)
10688 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
10689 ptab(jf)%pt2d(ji,jj) = zland
10690 END DO; END DO ; END DO ; END DO
10691 ENDIF
10692 END DO
10693 !$acc end parallel loop
```
- Line lbclnk.f90:10845 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10845, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
10844 !$acc parallel loop seq
10845 DO jf = 1, ipf ! number of arrays to be treated
10846 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10847 !$acc loop gang vector collapse(4)
10848 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
10849 ptab(jf)%pt2d(ji,jj) = ptab(jf)%pt2d(ji,ihl+1)
10850 END DO ; END DO ; END DO ; END DO
10851 ENDIF
10852 END DO
10853 !$acc end parallel loop
```
- Line lbclnk.f90:10856 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
10856, Loop carried dependence of ptab%pt2d$p prevents parallelization
Loop carried backward dependence of ptab%pt2d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
10855 !$acc parallel loop seq
10856 DO jf = 1, ipf ! number of arrays to be treated
10857 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
10858 !$acc loop gang vector collapse(4)
10859 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
10860 ptab(jf)%pt2d(ji,jj) = zland
10861 END DO; END DO ; END DO ; END DO
10862 ENDIF
10863 END DO
10864 !$acc end parallel loop
```
### Subroutine mpp_lnk_3d_gpu_dp
- Line lbclnk.f90:14064 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14064, Loop carried dependence due to exposed use of ptab(ihl+1,:jpj,:ipk) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
14063 !$acc parallel loop seq
14064 DO jf = 1, ipf ! number of arrays to be treated
14065 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14066 !$acc loop gang vector collapse(4)
14067 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
14068 ptab(ji,jj,jk) = ptab(ihl+1,jj,jk)
14069 END DO ; END DO ; END DO ; END DO
14070 ENDIF
14071 END DO
14072 !$acc end parallel loop
```
- Line lbclnk.f90:14075 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14075, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
14074 !$acc parallel loop seq
14075 DO jf = 1, ipf ! number of arrays to be treated
14076 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14077 !$acc loop gang vector collapse(4)
14078 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
14079 ptab(ji,jj,jk) = zland
14080 END DO; END DO ; END DO ; END DO
14081 ENDIF
14082 END DO
14083 !$acc end parallel loop
```
- Line lbclnk.f90:14235 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14235, Loop carried dependence due to exposed use of ptab(:jpi,ihl+1,:ipk) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
14234 !$acc parallel loop seq
14235 DO jf = 1, ipf ! number of arrays to be treated
14236 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14237 !$acc loop gang vector collapse(4)
14238 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
14239 ptab(ji,jj,jk) = ptab(ji,ihl+1,jk)
14240 END DO ; END DO ; END DO ; END DO
14241 ENDIF
14242 END DO
14243 !$acc end parallel loop
```
- Line lbclnk.f90:14246 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14246, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
14245 !$acc parallel loop seq
14246 DO jf = 1, ipf ! number of arrays to be treated
14247 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14248 !$acc loop gang vector collapse(4)
14249 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
14250 ptab(ji,jj,jk) = zland
14251 END DO; END DO ; END DO ; END DO
14252 ENDIF
14253 END DO
14254 !$acc end parallel loop
```
### Subroutine mpp_lnk_3d_gpu_sp
- Line lbclnk.f90:11159 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11159, Loop carried dependence due to exposed use of ptab(ihl+1,:jpj,:ipk) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
11158 !$acc parallel loop seq
11159 DO jf = 1, ipf ! number of arrays to be treated
11160 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11161 !$acc loop gang vector collapse(4)
11162 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
11163 ptab(ji,jj,jk) = ptab(ihl+1,jj,jk)
11164 END DO ; END DO ; END DO ; END DO
11165 ENDIF
11166 END DO
11167 !$acc end parallel loop
```
- Line lbclnk.f90:11170 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11170, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
11169 !$acc parallel loop seq
11170 DO jf = 1, ipf ! number of arrays to be treated
11171 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11172 !$acc loop gang vector collapse(4)
11173 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
11174 ptab(ji,jj,jk) = zland
11175 END DO; END DO ; END DO ; END DO
11176 ENDIF
11177 END DO
11178 !$acc end parallel loop
```
- Line lbclnk.f90:11330 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11330, Loop carried dependence due to exposed use of ptab(:jpi,ihl+1,:ipk) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
Complex loop carried dependence of ptab prevents parallelization
```
```
11329 !$acc parallel loop seq
11330 DO jf = 1, ipf ! number of arrays to be treated
11331 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11332 !$acc loop gang vector collapse(4)
11333 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
11334 ptab(ji,jj,jk) = ptab(ji,ihl+1,jk)
11335 END DO ; END DO ; END DO ; END DO
11336 ENDIF
11337 END DO
11338 !$acc end parallel loop
```
- Line lbclnk.f90:11341 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11341, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
11340 !$acc parallel loop seq
11341 DO jf = 1, ipf ! number of arrays to be treated
11342 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11343 !$acc loop gang vector collapse(4)
11344 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
11345 ptab(ji,jj,jk) = zland
11346 END DO; END DO ; END DO ; END DO
11347 ENDIF
11348 END DO
11349 !$acc end parallel loop
```
### Subroutine mpp_lnk_3d_ptr_gpu_dp
- Line lbclnk.f90:14547 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14547, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
14546 !$acc parallel loop seq
14547 DO jf = 1, ipf ! number of arrays to be treated
14548 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14549 !$acc loop gang vector collapse(4)
14550 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
14551 ptab(jf)%pt3d(ji,jj,jk) = ptab(jf)%pt3d(ihl+1,jj,jk)
14552 END DO ; END DO ; END DO ; END DO
14553 ENDIF
14554 END DO
14555 !$acc end parallel loop
```
- Line lbclnk.f90:14558 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14558, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
14557 !$acc parallel loop seq
14558 DO jf = 1, ipf ! number of arrays to be treated
14559 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14560 !$acc loop gang vector collapse(4)
14561 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
14562 ptab(jf)%pt3d(ji,jj,jk) = zland
14563 END DO; END DO ; END DO ; END DO
14564 ENDIF
14565 END DO
14566 !$acc end parallel loop
```
- Line lbclnk.f90:14718 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14718, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
14717 !$acc parallel loop seq
14718 DO jf = 1, ipf ! number of arrays to be treated
14719 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14720 !$acc loop gang vector collapse(4)
14721 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
14722 ptab(jf)%pt3d(ji,jj,jk) = ptab(jf)%pt3d(ji,ihl+1,jk)
14723 END DO ; END DO ; END DO ; END DO
14724 ENDIF
14725 END DO
14726 !$acc end parallel loop
```
- Line lbclnk.f90:14729 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
14729, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
14728 !$acc parallel loop seq
14729 DO jf = 1, ipf ! number of arrays to be treated
14730 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
14731 !$acc loop gang vector collapse(4)
14732 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
14733 ptab(jf)%pt3d(ji,jj,jk) = zland
14734 END DO; END DO ; END DO ; END DO
14735 ENDIF
14736 END DO
14737 !$acc end parallel loop
```
### Subroutine mpp_lnk_3d_ptr_gpu_sp
- Line lbclnk.f90:11642 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11642, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
11641 !$acc parallel loop seq
11642 DO jf = 1, ipf ! number of arrays to be treated
11643 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11644 !$acc loop gang vector collapse(4)
11645 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
11646 ptab(jf)%pt3d(ji,jj,jk) = ptab(jf)%pt3d(ihl+1,jj,jk)
11647 END DO ; END DO ; END DO ; END DO
11648 ENDIF
11649 END DO
11650 !$acc end parallel loop
```
- Line lbclnk.f90:11653 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11653, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
11652 !$acc parallel loop seq
11653 DO jf = 1, ipf ! number of arrays to be treated
11654 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11655 !$acc loop gang vector collapse(4)
11656 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
11657 ptab(jf)%pt3d(ji,jj,jk) = zland
11658 END DO; END DO ; END DO ; END DO
11659 ENDIF
11660 END DO
11661 !$acc end parallel loop
```
- Line lbclnk.f90:11813 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11813, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
11812 !$acc parallel loop seq
11813 DO jf = 1, ipf ! number of arrays to be treated
11814 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11815 !$acc loop gang vector collapse(4)
11816 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
11817 ptab(jf)%pt3d(ji,jj,jk) = ptab(jf)%pt3d(ji,ihl+1,jk)
11818 END DO ; END DO ; END DO ; END DO
11819 ENDIF
11820 END DO
11821 !$acc end parallel loop
```
- Line lbclnk.f90:11824 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
11824, Loop carried dependence of ptab%pt3d$p prevents parallelization
Loop carried backward dependence of ptab%pt3d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
11823 !$acc parallel loop seq
11824 DO jf = 1, ipf ! number of arrays to be treated
11825 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
11826 !$acc loop gang vector collapse(4)
11827 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
11828 ptab(jf)%pt3d(ji,jj,jk) = zland
11829 END DO; END DO ; END DO ; END DO
11830 ENDIF
11831 END DO
11832 !$acc end parallel loop
```
### Subroutine mpp_lnk_4d_gpu_dp
- Line lbclnk.f90:15032 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15032, Loop carried dependence due to exposed use of ptab(ihl+1,:jpj,:ipk,:ipl) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
15031 !$acc parallel loop seq
15032 DO jf = 1, ipf ! number of arrays to be treated
15033 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15034 !$acc loop gang vector collapse(4)
15035 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
15036 ptab(ji,jj,jk,jl) = ptab(ihl+1,jj,jk,jl)
15037 END DO ; END DO ; END DO ; END DO
15038 ENDIF
15039 END DO
15040 !$acc end parallel loop
```
- Line lbclnk.f90:15043 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15043, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
15042 !$acc parallel loop seq
15043 DO jf = 1, ipf ! number of arrays to be treated
15044 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15045 !$acc loop gang vector collapse(4)
15046 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
15047 ptab(ji,jj,jk,jl) = zland
15048 END DO; END DO ; END DO ; END DO
15049 ENDIF
15050 END DO
15051 !$acc end parallel loop
```
- Line lbclnk.f90:15203 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15203, Loop carried dependence due to exposed use of ptab(:jpi,ihl+1,:ipk,:ipl) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
15202 !$acc parallel loop seq
15203 DO jf = 1, ipf ! number of arrays to be treated
15204 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15205 !$acc loop gang vector collapse(4)
15206 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
15207 ptab(ji,jj,jk,jl) = ptab(ji,ihl+1,jk,jl)
15208 END DO ; END DO ; END DO ; END DO
15209 ENDIF
15210 END DO
15211 !$acc end parallel loop
```
- Line lbclnk.f90:15214 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15214, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
15213 !$acc parallel loop seq
15214 DO jf = 1, ipf ! number of arrays to be treated
15215 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15216 !$acc loop gang vector collapse(4)
15217 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
15218 ptab(ji,jj,jk,jl) = zland
15219 END DO; END DO ; END DO ; END DO
15220 ENDIF
15221 END DO
15222 !$acc end parallel loop
```
### Subroutine mpp_lnk_4d_gpu_sp
- Line lbclnk.f90:12127 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12127, Loop carried dependence due to exposed use of ptab(ihl+1,:jpj,:ipk,:ipl) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
12126 !$acc parallel loop seq
12127 DO jf = 1, ipf ! number of arrays to be treated
12128 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12129 !$acc loop gang vector collapse(4)
12130 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
12131 ptab(ji,jj,jk,jl) = ptab(ihl+1,jj,jk,jl)
12132 END DO ; END DO ; END DO ; END DO
12133 ENDIF
12134 END DO
12135 !$acc end parallel loop
```
- Line lbclnk.f90:12138 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12138, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
12137 !$acc parallel loop seq
12138 DO jf = 1, ipf ! number of arrays to be treated
12139 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12140 !$acc loop gang vector collapse(4)
12141 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
12142 ptab(ji,jj,jk,jl) = zland
12143 END DO; END DO ; END DO ; END DO
12144 ENDIF
12145 END DO
12146 !$acc end parallel loop
```
- Line lbclnk.f90:12298 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12298, Loop carried dependence due to exposed use of ptab(:jpi,ihl+1,:ipk,:ipl) prevents parallelization
Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
12297 !$acc parallel loop seq
12298 DO jf = 1, ipf ! number of arrays to be treated
12299 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12300 !$acc loop gang vector collapse(4)
12301 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
12302 ptab(ji,jj,jk,jl) = ptab(ji,ihl+1,jk,jl)
12303 END DO ; END DO ; END DO ; END DO
12304 ENDIF
12305 END DO
12306 !$acc end parallel loop
```
- Line lbclnk.f90:12309 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12309, Loop carried dependence of ptab prevents parallelization
Loop carried backward dependence of ptab prevents vectorization
```
```
12308 !$acc parallel loop seq
12309 DO jf = 1, ipf ! number of arrays to be treated
12310 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12311 !$acc loop gang vector collapse(4)
12312 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
12313 ptab(ji,jj,jk,jl) = zland
12314 END DO; END DO ; END DO ; END DO
12315 ENDIF
12316 END DO
12317 !$acc end parallel loop
```
### Subroutine mpp_lnk_4d_ptr_gpu_dp
- Line lbclnk.f90:15515 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15515, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
15514 !$acc parallel loop seq
15515 DO jf = 1, ipf ! number of arrays to be treated
15516 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15517 !$acc loop gang vector collapse(4)
15518 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
15519 ptab(jf)%pt4d(ji,jj,jk,jl) = ptab(jf)%pt4d(ihl+1,jj,jk,jl)
15520 END DO ; END DO ; END DO ; END DO
15521 ENDIF
15522 END DO
15523 !$acc end parallel loop
```
- Line lbclnk.f90:15526 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15526, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
15525 !$acc parallel loop seq
15526 DO jf = 1, ipf ! number of arrays to be treated
15527 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15528 !$acc loop gang vector collapse(4)
15529 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
15530 ptab(jf)%pt4d(ji,jj,jk,jl) = zland
15531 END DO; END DO ; END DO ; END DO
15532 ENDIF
15533 END DO
15534 !$acc end parallel loop
```
- Line lbclnk.f90:15686 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15686, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
15685 !$acc parallel loop seq
15686 DO jf = 1, ipf ! number of arrays to be treated
15687 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15688 !$acc loop gang vector collapse(4)
15689 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
15690 ptab(jf)%pt4d(ji,jj,jk,jl) = ptab(jf)%pt4d(ji,ihl+1,jk,jl)
15691 END DO ; END DO ; END DO ; END DO
15692 ENDIF
15693 END DO
15694 !$acc end parallel loop
```
- Line lbclnk.f90:15697 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15697, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
15696 !$acc parallel loop seq
15697 DO jf = 1, ipf ! number of arrays to be treated
15698 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
15699 !$acc loop gang vector collapse(4)
15700 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
15701 ptab(jf)%pt4d(ji,jj,jk,jl) = zland
15702 END DO; END DO ; END DO ; END DO
15703 ENDIF
15704 END DO
15705 !$acc end parallel loop
```
### Subroutine mpp_lnk_4d_ptr_gpu_sp
- Line lbclnk.f90:12610 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12610, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
12609 !$acc parallel loop seq
12610 DO jf = 1, ipf ! number of arrays to be treated
12611 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12612 !$acc loop gang vector collapse(4)
12613 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
12614 ptab(jf)%pt4d(ji,jj,jk,jl) = ptab(jf)%pt4d(ihl+1,jj,jk,jl)
12615 END DO ; END DO ; END DO ; END DO
12616 ENDIF
12617 END DO
12618 !$acc end parallel loop
```
- Line lbclnk.f90:12621 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12621, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
12620 !$acc parallel loop seq
12621 DO jf = 1, ipf ! number of arrays to be treated
12622 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12623 !$acc loop gang vector collapse(4)
12624 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, jpj ; DO ji = 1, ihl
12625 ptab(jf)%pt4d(ji,jj,jk,jl) = zland
12626 END DO; END DO ; END DO ; END DO
12627 ENDIF
12628 END DO
12629 !$acc end parallel loop
```
- Line lbclnk.f90:12781 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12781, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
12780 !$acc parallel loop seq
12781 DO jf = 1, ipf ! number of arrays to be treated
12782 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12783 !$acc loop gang vector collapse(4)
12784 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
12785 ptab(jf)%pt4d(ji,jj,jk,jl) = ptab(jf)%pt4d(ji,ihl+1,jk,jl)
12786 END DO ; END DO ; END DO ; END DO
12787 ENDIF
12788 END DO
12789 !$acc end parallel loop
```
- Line lbclnk.f90:12792 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
12792, Loop carried dependence of ptab%pt4d$p prevents parallelization
Loop carried backward dependence of ptab%pt4d$p prevents vectorization
Generating implicit firstprivate(ipl)
```
```
12791 !$acc parallel loop seq
12792 DO jf = 1, ipf ! number of arrays to be treated
12793 IF( .NOT. cd_nat_temp(jf) == 'F' ) THEN ! do nothing for F point
12794 !$acc loop gang vector collapse(4)
12795 DO jl = 1, ipl ; DO jk = 1, ipk ; DO jj = 1, ihl ; DO ji = 1, jpi
12796 ptab(jf)%pt4d(ji,jj,jk,jl) = zland
12797 END DO; END DO ; END DO ; END DO
12798 ENDIF
12799 END DO
12800 !$acc end parallel loop
```
### Subroutine mpp_nfd_2d_gpu_dp
- Line lbclnk.f90:17826 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
17826, Complex loop carried dependence of znorthloc prevents parallelization
```
```
17825 !$acc parallel loop seq
17826 DO jf = 1, ipf ! Loop over the number of arrays to be processed
17827 !$acc loop seq
17828 DO jj = 1, ipj_s(jf)
17829 js = idx_s(jf) + jj
17830 !$acc loop gang vector collapse(3)
17831 DO jl = 1, ipl
17832 DO jk = 1, ipk
17833 DO ji = 1, jpi
17834 znorthloc(ji,js,jk,jl,1) = ptab(ji,jj_s(jf,jj))
17835 END DO
17836 END DO
17837 END DO
17838 END DO
17839 END DO
17840 !$acc end parallel loop
```
### Subroutine mpp_nfd_2d_gpu_sp
- Line lbclnk.f90:15914 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
15914, Complex loop carried dependence of znorthloc prevents parallelization
```
```
15913 !$acc parallel loop seq
15914 DO jf = 1, ipf ! Loop over the number of arrays to be processed
15915 !$acc loop seq
15916 DO jj = 1, ipj_s(jf)
15917 js = idx_s(jf) + jj
15918 !$acc loop gang vector collapse(3)
15919 DO jl = 1, ipl
15920 DO jk = 1, ipk
15921 DO ji = 1, jpi
15922 znorthloc(ji,js,jk,jl,1) = ptab(ji,jj_s(jf,jj))
15923 END DO
15924 END DO
15925 END DO
15926 END DO
15927 END DO
15928 !$acc end parallel loop
```
### Subroutine mpp_nfd_2d_ptr_gpu_dp
- Line lbclnk.f90:18142 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
18142, Complex loop carried dependence of znorthloc prevents parallelization
```
```
18141 !$acc parallel loop seq
18142 DO jf = 1, ipf ! Loop over the number of arrays to be processed
18143 !$acc loop seq
18144 DO jj = 1, ipj_s(jf)
18145 js = idx_s(jf) + jj
18146 !$acc loop gang vector collapse(3)
18147 DO jl = 1, ipl
18148 DO jk = 1, ipk
18149 DO ji = 1, jpi
18150 znorthloc(ji,js,jk,jl,1) = ptab(jf)%pt2d(ji,jj_s(jf,jj))
18151 END DO
18152 END DO
18153 END DO
18154 END DO
18155 END DO
18156 !$acc end parallel loop
```
### Subroutine mpp_nfd_2d_ptr_gpu_sp
- Line lbclnk.f90:16230 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
16230, Complex loop carried dependence of znorthloc prevents parallelization
```
```
16229 !$acc parallel loop seq
16230 DO jf = 1, ipf ! Loop over the number of arrays to be processed
16231 !$acc loop seq
16232 DO jj = 1, ipj_s(jf)
16233 js = idx_s(jf) + jj
16234 !$acc loop gang vector collapse(3)
16235 DO jl = 1, ipl
16236 DO jk = 1, ipk
16237 DO ji = 1, jpi
16238 znorthloc(ji,js,jk,jl,1) = ptab(jf)%pt2d(ji,jj_s(jf,jj))
16239 END DO
16240 END DO
16241 END DO
16242 END DO
16243 END DO
16244 !$acc end parallel loop
```
### Subroutine mpp_nfd_3d_gpu_dp
- Line lbclnk.f90:18462 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
18462, Complex loop carried dependence of znorthloc prevents parallelization
```
```
18461 !$acc parallel loop seq
18462 DO jf = 1, ipf ! Loop over the number of arrays to be processed
18463 !$acc loop seq
18464 DO jj = 1, ipj_s(jf)
18465 js = idx_s(jf) + jj
18466 !$acc loop gang vector collapse(3)
18467 DO jl = 1, ipl
18468 DO jk = 1, ipk
18469 DO ji = 1, jpi
18470 znorthloc(ji,js,jk,jl,1) = ptab(ji,jj_s(jf,jj),jk)
18471 END DO
18472 END DO
18473 END DO
18474 END DO
18475 END DO
18476 !$acc end parallel loop
```
### Subroutine mpp_nfd_3d_gpu_sp
- Line lbclnk.f90:16550 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
16550, Complex loop carried dependence of znorthloc prevents parallelization
```
```
16549 !$acc parallel loop seq
16550 DO jf = 1, ipf ! Loop over the number of arrays to be processed
16551 !$acc loop seq
16552 DO jj = 1, ipj_s(jf)
16553 js = idx_s(jf) + jj
16554 !$acc loop gang vector collapse(3)
16555 DO jl = 1, ipl
16556 DO jk = 1, ipk
16557 DO ji = 1, jpi
16558 znorthloc(ji,js,jk,jl,1) = ptab(ji,jj_s(jf,jj),jk)
16559 END DO
16560 END DO
16561 END DO
16562 END DO
16563 END DO
16564 !$acc end parallel loop
```
### Subroutine mpp_nfd_3d_ptr_gpu_dp
- Line lbclnk.f90:18778 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
18778, Complex loop carried dependence of znorthloc prevents parallelization
```
```
18777 !$acc parallel loop seq
18778 DO jf = 1, ipf ! Loop over the number of arrays to be processed
18779 !$acc loop seq
18780 DO jj = 1, ipj_s(jf)
18781 js = idx_s(jf) + jj
18782 !$acc loop gang vector collapse(3)
18783 DO jl = 1, ipl
18784 DO jk = 1, ipk
18785 DO ji = 1, jpi
18786 znorthloc(ji,js,jk,jl,1) = ptab(jf)%pt3d(ji,jj_s(jf,jj),jk)
18787 END DO
18788 END DO
18789 END DO
18790 END DO
18791 END DO
18792 !$acc end parallel loop
```
### Subroutine mpp_nfd_3d_ptr_gpu_sp
- Line lbclnk.f90:16866 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
16866, Complex loop carried dependence of znorthloc prevents parallelization
```
```
16865 !$acc parallel loop seq
16866 DO jf = 1, ipf ! Loop over the number of arrays to be processed
16867 !$acc loop seq
16868 DO jj = 1, ipj_s(jf)
16869 js = idx_s(jf) + jj
16870 !$acc loop gang vector collapse(3)
16871 DO jl = 1, ipl
16872 DO jk = 1, ipk
16873 DO ji = 1, jpi
16874 znorthloc(ji,js,jk,jl,1) = ptab(jf)%pt3d(ji,jj_s(jf,jj),jk)
16875 END DO
16876 END DO
16877 END DO
16878 END DO
16879 END DO
16880 !$acc end parallel loop
```
### Subroutine mpp_nfd_4d_gpu_dp
- Line lbclnk.f90:19098 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
19098, Complex loop carried dependence of znorthloc prevents parallelization
```
```
19097 !$acc parallel loop seq
19098 DO jf = 1, ipf ! Loop over the number of arrays to be processed
19099 !$acc loop seq
19100 DO jj = 1, ipj_s(jf)
19101 js = idx_s(jf) + jj
19102 !$acc loop gang vector collapse(3)
19103 DO jl = 1, ipl
19104 DO jk = 1, ipk
19105 DO ji = 1, jpi
19106 znorthloc(ji,js,jk,jl,1) = ptab(ji,jj_s(jf,jj),jk,jl)
19107 END DO
19108 END DO
19109 END DO
19110 END DO
19111 END DO
19112 !$acc end parallel loop
```
### Subroutine mpp_nfd_4d_gpu_sp
- Line lbclnk.f90:17186 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
17186, Complex loop carried dependence of znorthloc prevents parallelization
```
```
17185 !$acc parallel loop seq
17186 DO jf = 1, ipf ! Loop over the number of arrays to be processed
17187 !$acc loop seq
17188 DO jj = 1, ipj_s(jf)
17189 js = idx_s(jf) + jj
17190 !$acc loop gang vector collapse(3)
17191 DO jl = 1, ipl
17192 DO jk = 1, ipk
17193 DO ji = 1, jpi
17194 znorthloc(ji,js,jk,jl,1) = ptab(ji,jj_s(jf,jj),jk,jl)
17195 END DO
17196 END DO
17197 END DO
17198 END DO
17199 END DO
17200 !$acc end parallel loop
```
### Subroutine mpp_nfd_4d_ptr_gpu_dp
- Line lbclnk.f90:19414 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
19414, Complex loop carried dependence of znorthloc prevents parallelization
```
```
19413 !$acc parallel loop seq
19414 DO jf = 1, ipf ! Loop over the number of arrays to be processed
19415 !$acc loop seq
19416 DO jj = 1, ipj_s(jf)
19417 js = idx_s(jf) + jj
19418 !$acc loop gang vector collapse(3)
19419 DO jl = 1, ipl
19420 DO jk = 1, ipk
19421 DO ji = 1, jpi
19422 znorthloc(ji,js,jk,jl,1) = ptab(jf)%pt4d(ji,jj_s(jf,jj),jk,jl)
19423 END DO
19424 END DO
19425 END DO
19426 END DO
19427 END DO
19428 !$acc end parallel loop
```
### Subroutine mpp_nfd_4d_ptr_gpu_sp
- Line lbclnk.f90:17502 (nemo.src/cfgs/ORCA2/BLD/ppsrc/nemo/lbclnk.f90):
```
17502, Complex loop carried dependence of znorthloc prevents parallelization
```
```
17501 !$acc parallel loop seq
17502 DO jf = 1, ipf ! Loop over the number of arrays to be processed
17503 !$acc loop seq
17504 DO jj = 1, ipj_s(jf)
17505 js = idx_s(jf) + jj
17506 !$acc loop gang vector collapse(3)
17507 DO jl = 1, ipl
17508 DO jk = 1, ipk
17509 DO ji = 1, jpi
17510 znorthloc(ji,js,jk,jl,1) = ptab(jf)%pt4d(ji,jj_s(jf,jj),jk,jl)
17511 END DO
17512 END DO
17513 END DO
17514 END DO
17515 END DO
17516 !$acc end parallel loop
```
Sign in with Wallet
Connect another wallet