der.for
来自「共轭梯度法源代码」· FOR 代码 · 共 6 行
FOR
6 行
SUBROUTINE DER(X,GX)
DIMENSION X(2),GX(2)
GX(1)=-400.*X(1)*(X(2)-X(1)*X(1))-2*(1-X(1))
GX(2)=200.*(X(2)-X(1)*X(1))
RETURN
END
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?