X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fmath.f90;h=798f90f2492cd7366173d4181e31fa76d711bbe6;hb=a5189f6bb38b0708d043a694919b39f8f4a820a6;hp=03d12cf8d0fe246bd68ddd4307ef2738a7d561b6;hpb=35f220f409bd5d21be33a402d79da2c23d3e0c3a;p=unres4.git

diff --git a/source/unres/math.f90 b/source/unres/math.f90
index 03d12cf..798f90f 100644
--- a/source/unres/math.f90
+++ b/source/unres/math.f90
@@ -817,7 +817,7 @@
 
       do ij=1,2                                                                 
       do i=2,nres-1                                                             
-        if (itype(i).ne.10) then                                                
+        if (itype(i,1).ne.10) then                                                
           igall=igall+1                                                         
           if (mask_side(i).eq.1) then                                           
             ig=ig+1