From 2424f0aa8541d8c29ec0f6a2cc3eb3174e683ce9 Mon Sep 17 00:00:00 2001 From: Dawid Jagiela Date: Mon, 5 Nov 2012 11:07:57 +0100 Subject: [PATCH 1/1] alignment fixes in src_MD COMMONs --- source/unres/src_MD/COMMON.MD | 2 +- source/unres/src_MD/COMMON.SCCOR | 7 ++++--- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/source/unres/src_MD/COMMON.MD b/source/unres/src_MD/COMMON.MD index 6ce6a3f..40131bd 100644 --- a/source/unres/src_MD/COMMON.MD +++ b/source/unres/src_MD/COMMON.MD @@ -74,4 +74,4 @@ & nresn,nyosh,nnos,xiresp integer hmc,hmc_acc double precision dc_hmc,hmc_etot,totThmc - common /hmc_md/ dc_hmc(3,0:maxres2),hmc_etot,hmc,totThmc,hmc_acc + common /hmc_md/ dc_hmc(3,0:maxres2),hmc_etot,totThmc,hmc,hmc_acc diff --git a/source/unres/src_MD/COMMON.SCCOR b/source/unres/src_MD/COMMON.SCCOR index ccfe0c4..5cd3fde 100644 --- a/source/unres/src_MD/COMMON.SCCOR +++ b/source/unres/src_MD/COMMON.SCCOR @@ -6,11 +6,12 @@ cc Parameters of the SCCOR term integer nterm_sccor,isccortyp,nsccortyp,nlor_sccor common/sccor/v1sccor(maxterm_sccor,3,20,20), & v2sccor(maxterm_sccor,3,20,20), - & v0sccor(ntyp,ntyp), - & nterm_sccor(ntyp,ntyp),isccortyp(ntyp),nsccortyp, - & nlor_sccor(ntyp,ntyp),vlor1sccor(maxterm_sccor,20,20), + & vlor1sccor(maxterm_sccor,20,20), & vlor2sccor(maxterm_sccor,20,20), & vlor3sccor(maxterm_sccor,20,20),gloc_sc(3,0:maxres2,10), + & v0sccor(ntyp,ntyp), + & nterm_sccor(ntyp,ntyp),isccortyp(ntyp),nsccortyp, + & nlor_sccor(ntyp,ntyp), & dcostau(3,3,3,maxres2),dsintau(3,3,3,maxres2), & dtauangle(3,3,3,maxres2),dcosomicron(3,3,3,maxres2), & domicron(3,3,3,maxres2) -- 1.7.9.5