User:Karsten Theis/Rigid body interpolation
From Proteopedia
This page shows a way to superpose two rigid bodies so that they both have the same rotation, and they are translated such that a common anchor (center of mass, given atom) is in the same location.
The entire coordinates are copied first so that you can play around with the parameters and then reset the coordinates. The starting point is a structure with two models containing the same atoms in the same order, but with different coordinates.
function linear(progress, sel1, sel2) {
/* linear interpolation of coordinates in the atom sets sel1 and sel2 */
/* progress is a number between 0 and 1, and indicates the weight for atoms in selection sel2 */
coord1 = {@sel1}.xyz.all
coord2 = {@sel2}.xyz.all
len = coord1.length
ssergorp = 1 - progress
for (var i FROM [1,len]) {coord1[i] = (coord2[i] * progress + coord1[i] * ssergorp)}
{@sel1}.xyz = @coord1
/* interpolated coordinates are stored in selection sel1 */
}
function rigid(progress, sel1, sel2, anch1, anch2) {
/* atoms selected by sel1 and sel2 are transformed onto each other */
/* atoms are rotated into an intermediate orientation determined by progress */
/* the atoms are translated such that a set of atoms (defined by anch1 and anch2) is positioned
on a common position anchorpos, the linear interpolation between the two anchors */
fourbyfour = compare({@sel1}, {@sel2})
total_quat = quaternion(@fourbyfour%1)
theta = total_quat %"theta"
ax = total_quat %"vector"
if (theta > 160 and theta < 170) total_quat = quaternion(ax, 360 - theta) /* special case, needs a parameter*/
ssergorp = 1 - progress
quat1 = total_quat * progress /* partial rotation for atoms in selection sel1 */
quat2 = total_quat * ssergorp * -1 /* partial rotation for atoms in selection sel2 */
anchorpos = {@anch2}.xyz * progress + {@anch1}.xyz * ssergorp /* this is where the anchors will be */
select sel1
rotateselected @quat1 molecular
transl1 = anchorpos - {@anch1}.xyz
translateselected @transl1
select sel2
rotateselected @quat2 molecular
transl2 = anchorpos - {@anch2}.xyz
translateselected @transl2
}
sel = [{912-984},{1125-1162},{not (1125-1162 or 912-984)}]
anch = [{984},{1125},{not (1125-1162 or 912-984)}]
original = {all}.xyz.all
for (var i FROM [1,20]) {
{all}.xyz = @original
progress = 0.05 * i
for (var j FROM [1,sel.length]) {
s = sel[j]
a = anch[j]
for (var c in [{chain='A'},{chain='B'},{chain='C'}]) {
s1 = {1.1 and @s and @c}
s2 = {1.2 and @s and @c}
a1 = {1.1 and @a and @c}
a2 = {1.2 and @a and @c}
rigid(progress, s1, s2, a1, a2)
linear(progress, s1, s2)
}
}
delay 1.0
}
{all}.xyz = @original
# fname = "morph" + i + ".pdb"
# select 1.1
# write @fname
Example
| |||||||||||
