Author: tlinnet Date: Mon May 5 20:18:57 2014 New Revision: 22985 URL: http://svn.gna.org/viewcvs/relax?rev=22985&view=rev Log: Replaced kge with k_AB, which is relax convention. sr #3154: (https://gna.org/support/?3154) Implementation of Baldwin (2014) B14 model - 2-site exact solution model for all time scales. This follows the tutorial for adding relaxation dispersion models at: http://wiki.nmr-relax.com/Tutorial_for_adding_relaxation_dispersion_models_to_relax#Debugging Modified: trunk/lib/dispersion/b14.py Modified: trunk/lib/dispersion/b14.py URL: http://svn.gna.org/viewcvs/relax/trunk/lib/dispersion/b14.py?rev=22985&r1=22984&r2=22985&view=diff ============================================================================== --- trunk/lib/dispersion/b14.py (original) +++ trunk/lib/dispersion/b14.py Mon May 5 20:18:57 2014 @@ -140,20 +140,19 @@ ######################################################################### ##### Baldwins code. ######################################################################### - kge = kex * pB deltaR2 = r20a - r20b - alpha_m = r20a - r20b + kge - k_BA + alpha_m = r20a - r20b + k_AB - k_BA ######################################################################### #get the real and imaginary components of the exchange induced shift g1 = 2 * dw * alpha_m #same as carver richards zeta - g2 = alpha_m**2 + 4 * k_BA * kge - dw**2 #same as carver richards psi + g2 = alpha_m**2 + 4 * k_BA * k_AB - dw**2 #same as carver richards psi g3 = 1/sqrt(2) * sqrt(g2 + sqrt(g1**2 + g2**2)) #trig faster than square roots g4 = 1/sqrt(2) * sqrt(-g2 + sqrt(g1**2 + g2**2)) #trig faster than square roots ######################################################################### #Time independent factors. #N = oG + oE. - N = complex(kge + g3 - kge, g4) + N = complex(k_AB + g3 - k_AB, g4) NNc = g3**2 + g4**2 @@ -202,7 +201,7 @@ y = power( (ex0b - v3) / (ex0b + v3), ncyc) # Off diagonal common factor. sinh fuctions. - v2pPdN = complex(-deltaR2 + kex, dw) * ex0c + (-oGt2 - kge * t1pt2) * 2 * ex1c + v2pPdN = complex(-deltaR2 + kex, dw) * ex0c + (-oGt2 - k_AB * t1pt2) * 2 * ex1c Tog = (1 + y) / 2 + (1 - y) / (2 * v3) * v2pPdN / N