Recent content by sky01237

Hi, folks, Here is the code: SUBROUTINE CALCFG(N,X,F,G,ITER) DOUBLE PRECISION X(N),G(N),F,A,d(5000),u(5000) open (unit=2, file ="output.txt") Do i = 1 , ITER - 1 Read( 2 , * ) End Do Read( 2 , * ) d(ITER) ...