X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fdata%2Fenergy_data.F90;h=7babb3abb7078653c6dbd9406d05901989a3d4e3;hb=f7883bb11fc7df1ed921187999982670d26e6fa5;hp=fc3ba372e162ec4c0e59a494200300f07eece8b6;hpb=08bf0b2a32d59427c97842b03bb47633e82c6935;p=unres4.git diff --git a/source/unres/data/energy_data.F90 b/source/unres/data/energy_data.F90 index fc3ba37..7babb3a 100644 --- a/source/unres/data/energy_data.F90 +++ b/source/unres/data/energy_data.F90 @@ -3,7 +3,7 @@ use names !----------------------------------------------------------------------------- ! Max. number of energy intervals - integer,parameter :: max_ene=49 !10 + integer,parameter :: max_ene=50 !10 !----------------------------------------------------------------------------- ! Maximum number of terms in SC bond-stretching potential integer,parameter :: maxbondterm=3