Adam's corrections
[unres.git] / source / unres / src-HCD-5D / sc_move.F
index 75b7211..7911b30 100644 (file)
@@ -156,6 +156,7 @@ c     Put the original weights back to calculate the full energy
       mask_side=1
 crc      n_fun=n_fun+1
 ct      write (iout,*) 'sc_local time= ',MPI_WTIME()-wtime
+      call chainbuild_extconf
       return
       end
 
@@ -368,7 +369,7 @@ c      parameter (liv=60,lv=(77+maxvar*(maxvar+17)/2))
       external funcgrad_restr1
       external optsave
 #else
-      external func,gradient,fdum
+      external fdum
       external func_restr1,grad_restr1
       logical not_done,change,reduce 
       dimension iv(liv)