X-Git-Url: https://hackdaworld.org/gitweb/?p=physik%2Fnlsop.git;a=blobdiff_plain;f=nlsop.c;h=d61d2aca2868b7a95b4941198adcabb7c996ffb3;hp=69e8bcb404d2a551e4da697a1c27fcb9595285a9;hb=f271c1142da782420ef76f1f85750949094e4269;hpb=a83a3e72a506dfe1835cfbe3081bec08eb6cf1bd

diff --git a/nlsop.c b/nlsop.c
index 69e8bcb..d61d2ac 100644
--- a/nlsop.c
+++ b/nlsop.c
@@ -217,11 +217,11 @@ int distrib_c(d3_lattice *d3_l,double d_r,double a,double b,char z_diff)
       {
        off=i+j*d3_l->max_x+((k+c+d3_l->max_z)%d3_l->max_z)*d3_l->max_x*d3_l->max_y;
        carry=0;
-       if(*(d3_l->status+off)&AMORPH) carry=(int)(d_r*(*(d3_l->extra+off)));
+       if(*(d3_l->status+off)&AMORPH) carry=(int)(d_r*(*(d3_l->extra+offset)));
        if(carry!=0)
        {
-        *(d3_l->extra+offset)+=carry;
-	*(d3_l->extra+off)-=carry;
+        *(d3_l->extra+offset)-=carry;
+	*(d3_l->extra+off)+=carry;
        }
       }
      } /* if z_diff */