From: Cezary Czaplewski <czarek@chem.univ.gda.pl>
Date: Tue, 26 Sep 2017 17:46:06 +0000 (+0200)
Subject: gfortran error
X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=commitdiff_plain;h=d66ce5a811ab8e4704d5dabec2b6c41526288d83;p=unres.git

gfortran error

DATA statement has more variables than values
---

diff --git a/source/cluster/wham/src-M/initialize_p.F b/source/cluster/wham/src-M/initialize_p.F
index 7ba7226..d234763 100644
--- a/source/cluster/wham/src-M/initialize_p.F
+++ b/source/cluster/wham/src-M/initialize_p.F
@@ -268,7 +268,7 @@ c-------------------------------------------------------------------------
      &   "WLIPTRAN","WAFM","WTHETC"/
       data nprint_ene /22/
       data print_order /1,2,3,18,11,12,13,14,4,5,6,7,8,9,10,19,
-     &  16,15,17,20,21,24,22,23/
+     &  16,15,17,20,21,24,22,23,0/
       end 
 c---------------------------------------------------------------------------
       subroutine init_int_table
diff --git a/source/cluster/wham/src/initialize_p.F b/source/cluster/wham/src/initialize_p.F
index 27eb0ba..6764316 100644
--- a/source/cluster/wham/src/initialize_p.F
+++ b/source/cluster/wham/src/initialize_p.F
@@ -237,7 +237,7 @@ c-------------------------------------------------------------------------
      &   "WHOMOLOGY","WDFAD","WDFAT","WDFAN","WDFAB"," "," "/
       data nprint_ene /23/
       data print_order /1,2,3,17,11,12,13,14,4,5,6,7,8,9,10,16,15,18,19,
-     &   20,21,22,23,24,25/
+     &   20,21,22,23,24,25,0,0/
       end 
 c---------------------------------------------------------------------------
       subroutine init_int_table