master.for

来自「优化算法,是FORTRUN语言写。都经过了运行。」· FOR 代码 · 共 15 行

      PROGRAM TONDSC
	DIMENSION X(2),Y(2),S(2)

	X(1)=-1.2
	X(2)=1.5
	S(1)=24.4
	S(2)=12.
	FX=5.2
	IOBF=0
	ITER=0
	CALL DSCPOW(X,FX,Y,FY,S,S,2,2,0.001,1,ITER,IEX)
	WRITE(6,1)Y,FY,IEX
1	FORMAT(5X,3E21.10,2X,I5//)
	STOP
	END