Index: LMDZ6/trunk/libf/dyn3dmem/guide_loc_mod.F90
===================================================================
--- LMDZ6/trunk/libf/dyn3dmem/guide_loc_mod.F90	(revision 4040)
+++ LMDZ6/trunk/libf/dyn3dmem/guide_loc_mod.F90	(revision 4041)
@@ -1010,5 +1010,5 @@
             DO l=1,nlevnc
               write(*,*)trim(modname)//' PL(',l,')=',&
-                        apnc(l)+bpnc(l)*psnat2(i,jjbu)
+                        apnc(l)+bpnc(l)*psnat2(1,jjbu)
             ENDDO
         CASE (2)