37
edits
mNo edit summary |
mNo edit summary |
||
(One intermediate revision by the same user not shown) | |||
Line 4: | Line 4: | ||
(add-key-binding "Refine Active Residue AA" "x" (lambda () (refine-active-residue))) | (add-key-binding "Refine Active Residue AA" "x" (lambda () (refine-active-residue))) | ||
(add-key-binding "Triple Refine" "t" (lambda () (manual-refine-residues 1))) | (add-key-binding "Triple Refine" "t" (lambda () (manual-refine-residues 1))) | ||
(add-key-binding "Autofit Rotamer" "j" (lambda () (auto-fit-rotamer-active-residue))) | (add-key-binding "Autofit Rotamer" "j" (lambda () (auto-fit-rotamer-active-residue))) | ||
(add-key-binding "Pepflip" "q" (lambda () (pepflip-active-residue))) | (add-key-binding "Pepflip" "q" (lambda () (pepflip-active-residue))) | ||
Line 53: | Line 52: | ||
(list centred-residue)))) | (list centred-residue)))) | ||
(refine-residues imol all-residues)))))) | (refine-residues imol all-residues)))))) | ||
(add-key-binding "Neighbours Refine" "h" | |||
(lambda () | |||
(if (not (valid-map-molecule? (imol-refinement-map))) | |||
(info-dialog "Must set the refinement map")) | |||
(using-active-atom | |||
(let* ((rc-spec (list aa-chain-id aa-res-no aa-ins-code)) | |||
(ls (residues-near-residue aa-imol rc-spec 1.9))) | |||
(with-auto-accept | |||
(refine-residues aa-imol (cons rc-spec ls))))))) | |||
Line 136: | Line 145: | ||
(alt-conf (list-ref active-atom 5))) | (alt-conf (list-ref active-atom 5))) | ||
(add-terminal-residue imol chain-id res-no "auto" 1)))))) | (add-terminal-residue imol chain-id res-no "auto" 1)))))) | ||
(add-key-binding "Accept Baton Position" "quoteleft" accept-baton-position) | |||
</pre> | </pre> |
edits