Merge release-4-6 into master
[alexxy/gromacs.git] / src / gromacs / mdlib / pull_rotation.c
index bd92238b99f6508c349ed94921d0ff938a04b70a..1f10a1796d7397ab09c680d2ae621ab420e7ebea 100644 (file)
@@ -1764,7 +1764,7 @@ static void flex2_precalc_inner_sum(t_rotgrp *rotg)
             OOpsiistar = norm2(tmpvec)+rotg->eps; /* OOpsii* = 1/psii* = |v x (xi-xcn)|^2 + eps */
             OOpsii     = norm(tmpvec);            /* OOpsii = 1 / psii = |v x (xi - xcn)| */
 
-            /*         v x (xi - xcn)          */
+            /*                           *         v x (xi - xcn)          */
             unitv(tmpvec, s_in);        /*  sin = ----------------         */
                                         /*        |v x (xi - xcn)|         */
 
@@ -1837,7 +1837,7 @@ static void flex_precalc_inner_sum(t_rotgrp *rotg)
             mvmul(erg->rotmat, tmpvec, rin);              /* rin = Omega.(yi0 - ycn)  */
             cprod(rotg->vec, rin, tmpvec);                /* tmpvec = v x Omega*(yi0-ycn) */
 
-            /*        v x Omega*(yi0-ycn)    */
+            /*                                *        v x Omega*(yi0-ycn)    */
             unitv(tmpvec, qin);              /* qin = ---------------------   */
                                              /*       |v x Omega*(yi0-ycn)|   */
 
@@ -1995,7 +1995,7 @@ static real do_flex2_lowlevel(
 
             OOpsij = norm(tmpvec);    /* OOpsij = 1 / psij = |v x (xj - xcn)| */
 
-            /*         v x (xj - xcn)          */
+            /*                              *         v x (xj - xcn)          */
             unitv(tmpvec, sjn);            /*  sjn = ----------------         */
                                            /*        |v x (xj - xcn)|         */
 
@@ -2113,7 +2113,7 @@ static real do_flex_lowlevel(
     rvec            s_n;
     rvec            force_n;                /* Single force from slab n on one atom          */
     rvec            force_n1, force_n2;     /* First and second part of force_n              */
-    rvec            tmpvec, tmpvec2, tmp_f; /* Helper variables                         */
+    rvec            tmpvec, tmpvec2, tmp_f; /* Helper variables                              */
     real            V;                      /* The rotation potential energy                 */
     real            OOsigma2;               /* 1/(sigma^2)                                   */
     real            beta;                   /* beta_n(xj)                                    */
@@ -2197,7 +2197,7 @@ static real do_flex_lowlevel(
             /* Calculate qjn */
             cprod(rotg->vec, tmpvec2, tmpvec); /* tmpvec= v x Omega.(yj0-ycn) */
 
-            /*         v x Omega.(yj0-ycn)    */
+            /*                         *         v x Omega.(yj0-ycn)    */
             unitv(tmpvec, qjn);       /*  qjn = ---------------------   */
                                       /*        |v x Omega.(yj0-ycn)|   */
 
@@ -2218,7 +2218,7 @@ static real do_flex_lowlevel(
                     mvmul(erg->PotAngleFit->rotmat[ifit], yj0_ycn, tmpvec2); /* tmpvec2= Omega.(yj0-ycn) */
                     /* As above calculate qjn */
                     cprod(rotg->vec, tmpvec2, tmpvec);                       /* tmpvec= v x Omega.(yj0-ycn) */
-                    /*             v x Omega.(yj0-ycn)    */
+                    /*                                                        *             v x Omega.(yj0-ycn)    */
                     unitv(tmpvec, fit_qjn);                                  /*  fit_qjn = ---------------------   */
                                                                              /*            |v x Omega.(yj0-ycn)|   */
                     fit_bjn = iprod(fit_qjn, xj_xcn);                        /* fit_bjn = fit_qjn * (xj - xcn) */
@@ -2245,7 +2245,7 @@ static real do_flex_lowlevel(
 
             /* We already have precalculated the Sn term for slab n */
             copy_rvec(erg->slab_innersumvec[islab], s_n);
-            /*          beta_n(xj)              */
+            /*                                                             *          beta_n(xj)              */
             svmul(betan_xj_sigma2*iprod(s_n, xj_xcn), rotg->vec, tmpvec); /* tmpvec = ---------- s_n (xj-xcn) */
                                                                           /*            sigma^2               */
 
@@ -2778,7 +2778,7 @@ static void do_radial_motion(
         /* Calculate Omega.(yj0-u) */
         cprod(rotg->vec, erg->xr_loc[j], tmpvec);  /* tmpvec = v x Omega.(yj0-u) */
 
-        /*         v x Omega.(yj0-u)     */
+        /*                       *         v x Omega.(yj0-u)     */
         unitv(tmpvec, pj);      /*  pj = ---------------------   */
                                 /*       | v x Omega.(yj0-u) |   */
 
@@ -2809,7 +2809,7 @@ static void do_radial_motion(
 
                 /* Calculate Omega.(yj0-u) */
                 cprod(rotg->vec, fit_tmpvec, tmpvec); /* tmpvec = v x Omega.(yj0-u) */
-                /*         v x Omega.(yj0-u)     */
+                /*                                     *         v x Omega.(yj0-u)     */
                 unitv(tmpvec, pj);                    /*  pj = ---------------------   */
                                                       /*       | v x Omega.(yj0-u) |   */
 
@@ -2890,7 +2890,7 @@ static void do_radial_motion_pf(
 
         cprod(rotg->vec, tmpvec, tmpvec2);          /* tmpvec2 = v x Omega.(yi0-yc0) */
 
-        /*         v x Omega.(yi0-yc0)     */
+        /*                                             *         v x Omega.(yi0-yc0)     */
         unitv(tmpvec2, qi);                           /*  qi = -----------------------   */
                                                       /*       | v x Omega.(yi0-yc0) |   */
 
@@ -2928,7 +2928,7 @@ static void do_radial_motion_pf(
 
         cprod(rotg->vec, tmpvec2, tmpvec);    /* tmpvec = v x Omega.(yj0-yc0) */
 
-        /*         v x Omega.(yj0-yc0)     */
+        /*                     *         v x Omega.(yj0-yc0)     */
         unitv(tmpvec, qj);    /*  qj = -----------------------   */
                               /*       | v x Omega.(yj0-yc0) |   */
 
@@ -2958,7 +2958,7 @@ static void do_radial_motion_pf(
 
                 /* Calculate Omega.(yj0-u) */
                 cprod(rotg->vec, tmpvec2, tmpvec); /* tmpvec = v x Omega.(yj0-yc0) */
-                /*         v x Omega.(yj0-yc0)     */
+                /*                                  *         v x Omega.(yj0-yc0)     */
                 unitv(tmpvec, qj);                 /*  qj = -----------------------   */
                                                    /*       | v x Omega.(yj0-yc0) |   */
 
@@ -3023,7 +3023,7 @@ static void radial_motion2_precalc_inner_sum(t_rotgrp  *rotg, rvec innersumvec)
         cprod(rotg->vec, xi_xc, v_xi_xc);            /* v_xi_xc = v x (xi-u)  */
 
         fac = norm2(v_xi_xc);
-        /*                      1           */
+        /*                                 *                      1           */
         psiistar = 1.0/(fac + rotg->eps); /* psiistar = --------------------- */
                                           /*            |v x (xi-xc)|^2 + eps */
 
@@ -3143,7 +3143,7 @@ static void do_radial_motion2(
         cprod(rotg->vec, xj_u, v_xj_u);              /* v_xj_u = v x (xj-u)   */
 
         fac = norm2(v_xj_u);
-        /*                      1           */
+        /*                                 *                      1           */
         psijstar = 1.0/(fac + rotg->eps); /*  psistar = --------------------  */
                                           /*            |v x (xj-u)|^2 + eps  */