| 5 | 1/1 | 返回列表 |
| 查看: 875 | 回復(fù): 3 | |||
| 當(dāng)前只顯示滿足指定條件的回帖,點擊這里查看本話題的所有回帖 | |||
voleyes銀蟲 (正式寫手)
|
[求助]
有沒有能夠改變蛋白質(zhì)分子總體構(gòu)型的軟件 已有1人參與
|
||
|
比如我有一個直鏈形的蛋白質(zhì),想把它在視覺效果上弄彎,這個有軟件能夠操作嗎? 如果一點一點的改構(gòu)型會比較麻煩,因為蛋白質(zhì)構(gòu)型很大,不好操作 |
木蟲 (正式寫手)
|
!!rotate atoms from iatom0 to iatom1 do i=iatom0,iatom1 x=xx(i) y=yy(i) z=zz(i) call rotate_matrix2(x,y,z,ax,ay,az,xi,yi,zi,angg) !C xx(i)=x yy(i)=y zz(i)=z enddo subroutine rotate_matrix2(x,y,z,ax,ay,az,xi,yi,zi,an) !rotate (x,y,z) with origin (ax,ay,az) around axis (xi,yi,zi) with angle an implicit none real x,y,z,ax,ay,az,xi,yi,zi,an real r,r12,r23,r13,rcor real xr,yr,zr real x0,y0,z0 !!only use in test integer i,j,k r=sqrt(xi*xi+yi*yi+zi*zi) if(r<0.1)goto 101 x0=x y0=y x0=z xi=xi/r yi=yi/r zi=zi/r r12=xi*xi+yi*yi r23=yi*yi+zi*zi r13=xi*xi+zi*zi rcor=xi*x+yi*y+zi*z xr=ax*r23+xi*(-ay*yi-az*zi+rcor)+((x-ax)*r23+xi*(ay*yi+az*zi-yi*y-zi*z))*cos(an)+(ay*zi-az*yi-zi*y+yi*z)*sin(an) yr=ay*r13+yi*(-ax*xi-az*zi+rcor)+((y-ay)*r13+yi*(ax*xi+az*zi-xi*x-zi*z))*cos(an)+(-ax*zi+az*xi+zi*x-xi*z)*sin(an) zr=az*r12+zi*(-ax*xi-ay*yi+rcor)+((z-az)*r12+zi*(ax*xi+ay*yi-xi*x-yi*y))*cos(an)+(ax*yi-ay*xi-yi*x+xi*y)*sin(an) x=xr y=yr z=zr !if(abs(x)+abs(y)+abs(z)<0.001)then ! print*,"warning",xi,yi,zi,r,x,y,z,an,x0,y0,z0 !endif 101 continue end subroutine rotate_matrix2 |

木蟲 (正式寫手)

銀蟲 (正式寫手)
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 070305高分子化學(xué)與物理 304分求調(diào)劑 +7 | c297914 2026-03-28 | 7/350 |
|
|---|---|---|---|---|
|
[考研] 081200-11408-276學(xué)碩求調(diào)劑 +6 | 崔wj 2026-03-26 | 6/300 |
|
|
[考研] 0703 化學(xué) 求調(diào)劑,一志愿山東大學(xué) 342 分 +4 | Shern—- 2026-03-28 | 4/200 |
|
|
[考研] 一志愿太原理工安全工程300分,求調(diào)劑 +5 | 0857求調(diào)劑. 2026-03-24 | 6/300 |
|
|
[考研] 求調(diào)劑一志愿海大,0703化學(xué)學(xué)碩304分,有大創(chuàng)項目,四級已過 +7 | 幸運哩哩 2026-03-22 | 11/550 |
|
|
[考研] 求調(diào)劑 +3 | QiMing7 2026-03-25 | 4/200 |
|
|
[考研] 347求調(diào)劑 +3 | 山頂見α 2026-03-25 | 3/150 |
|
|
[考研] 一志愿南京航空航天大學(xué)材料學(xué)碩求調(diào)劑 +3 | @taotao 2026-03-28 | 3/150 |
|
|
[考研] 275求調(diào)劑 +10 | jjjjjjjjjjl 2026-03-27 | 10/500 |
|
|
[考研] 265求調(diào)劑 +8 | 小木蟲085600 2026-03-27 | 8/400 |
|
|
[考研] 07化學(xué)280分求調(diào)劑 +10 | 722865 2026-03-23 | 10/500 |
|
|
[考研] 298調(diào)劑 +3 | jiyingjie123 2026-03-27 | 3/150 |
|
|
[考研] 329求調(diào)劑 +7 | 鈕恩雪 2026-03-25 | 7/350 |
|
|
[考研] 329求調(diào)劑 +5 | 1() 2026-03-22 | 5/250 |
|
|
[考研] 化學(xué)工程085602 305分求調(diào)劑 +17 | RichLi_ 2026-03-25 | 17/850 |
|
|
[考研] 340求調(diào)劑 +3 | Amber00 2026-03-26 | 3/150 |
|
|
[考研] 271求調(diào)劑 +6 | 生如夏花… 2026-03-22 | 6/300 |
|
|
[考研] 總分293求調(diào)劑 +6 | 加一一九 2026-03-25 | 8/400 |
|
|
[考研] 340求調(diào)劑 +5 | 話梅糖111 2026-03-24 | 5/250 |
|
|
[論文投稿] 急發(fā)核心期刊論文 +3 | 賢達(dá)問津 2026-03-23 | 5/250 |
|