dear all, I wrote e fortran code that use listes and pointers. It is:
DO jp = LISTPART(ii,jj)%current%value IF(.NOT. dlist_move_next(LISTPART(ii,jj))) EXIT CALL KERNEL(rp(:,ip),rp(:,jp),lij,W,dW,xij,tk) r = SQRT( (rp(1,ip)-rp(1,jp))**2.d0 + (rp(2,ip)-rp(2,jp))**2.d0) ENDDOit does not work, I get asegmentation fault. The strange things is that if I use a WRITE in the do cycle like
WRITE(*,*) Rit works could someone explam me why? is it a unix problem? thanks a lot to everyone



