PGF90-S-0155-Compiler failed to translate accelerator region

I am compiling Fortran code and got:

12001, Loop is parallelizable
12003, Loop is parallelizable
PGF90-S-0155-Compiler failed to translate accelerator region (see -Minfo messages): Inte
rnal accelerator SESE exit consistency check failure (module_ra_rrtmg_lw.F: 12690)
rrtmg_lwrad:
12658, Generating copyin(pcols,pver,gravmks,my_p8w(kts:kte+1,its:ite),my_t8w(kts:kte+1
,its:ite),my_o33d(kts:kte,its:ite),my_dz8w(kts:kte,its:ite),my_pi3d(kts:kte,its:ite),my_
qv3d(kts:kte,its:ite),my_qc3d(kts:kte,its:ite),my_qr3d(kts:kte,its:ite),my_qi3d(kts:kte,
its:ite),my_qs3d(kts:kte,its:ite),my_qg3d(kts:kte,its:ite),my_cldfra3d(kts:kte,its:ite),
my_qndrop3d(kts:kte,its:ite),emiss(its:ite,j),tsk(its:ite,j))
Generating copyout(glw(its:ite,j),olr(its:ite,j),lwcf(its:ite,j),lwupt(its:ite,
j),lwuptc(its:ite,j),lwdnt(its:ite,j),lwdntc(its:ite,j),lwupb(its:ite,j),lwupbc(its:ite,
j),lwdnb(its:ite,j),lwdnbc(its:ite,j),my_lwupflx(kts:kte+2,its:ite),my_lwupflxc(kts:kte+
2,its:ite),my_lwdnflx(kts:kte+2,its:ite),my_lwdnflxc(kts:kte+2,its:ite),my_rthratenlw(kt
s:kte,its:ite))
12746, Loop is parallelizable
Accelerator kernel generated
Generating Tesla code


The code segment is:

12670 !$acc copyin(my_CLDFRA3D(kts:kte, its:ite)), &
12671 !$acc copyin(my_QNDROP3D(kts:kte, its:ite)), &
12672 !$acc copyin(emiss(its:ite, j)), &
12673 !$acc copyin(tsk(its:ite, j)), &
12674 !$acc copyout(glw(its:ite, j)), &
12675 !$acc copyout(olr(its:ite, j)), &
12676 !$acc copyout(lwcf(its:ite, j)), &
12677 !$acc copyout(lwupt(its:ite, j)), &
12678 !$acc copyout(lwuptc(its:ite, j)), &
12679 !$acc copyout(lwdnt(its:ite, j)), &
12680 !$acc copyout(lwdntc(its:ite, j)), &
12681 !$acc copyout(lwupb(its:ite, j)), &
12682 !$acc copyout(lwupbc(its:ite, j)), &
12683 !$acc copyout(lwdnb(its:ite, j)), &
12684 !$acc copyout(lwdnbc(its:ite, j)), &
12685 !$acc copyout(my_LWUPFLX(kts:kte+2, its:ite)), &
12686 !$acc copyout(my_LWUPFLXC(kts:kte+2, its:ite)), &
12687 !$acc copyout(my_LWDNFLX(kts:kte+2, its:ite)), &
12688 !$acc copyout(my_LWDNFLXC(kts:kte+2, its:ite)), &
12689 !$acc copyout(my_rthratenlw(kts:kte, its:ite))
12690 !$acc kernels loop independent &
12691 !$acc private(Pw1D(kts:kte), &
12692 !$acc Tw1D(kts:kte), &
12693 !$acc O31D(kts:kte), &
12694 !$acc T1D(kts:kte), &
12695 !$acc P1D(kts:kte), &
12696 !$acc DZ1D(kts:kte), &
12697 !$acc CLDFRA1D(kts:kte), &
12698 !$acc QV1D(kts:kte), &
12699 !$acc QC1D(kts:kte), &
12700 !$acc QR1D(kts:kte), &
12701 !$acc QI1D(kts:kte), &
12702 !$acc QS1D(kts:kte), &
12703 !$acc QG1D(kts:kte), &
12704 !$acc QNDROP1D(kts:kte), &
12705 !$acc tten1d(kts:kte), &
12706 !$acc o3mmr(kts:nlayers), &
12707 !$acc varint(kts:nlayers+1), &


Any suggestions?

Thanks

Wei

Hi Wei,

Unfortunately I can’t tell what’s wrong but it’s most likely a compiler error.

Can you send a reproducing example to PGI Customer Service (trs@pgroup.com) so we can investigate?

Thanks,
Mat

Mat,

I’ll put up an example and send to Portland Group.

Thanks,

Wei

Thanks Wei.

I was able to recreate the error here and it does look like a compiler error. I added a problem report (TPR#22239) and sent it engineering for further investigation.

Best regards,
Mat