i would like to write a txt in this format:
{{{ 1 2 3 4 5 .... }}}
for example a(i)=1 2 3 4 .... N
but N is variable and differ each time
this is part of my program but it seems to be wrong :
write(430,44) (b(i),i=1,N) !N<50
44 format(' {{{ ',50F6.3,'}}}')
after runing program...
I had a problem on my program
this is my program:
program iso
implicit none
real , dimension(1000) :: St01,St02
integer :: k
X1=0.05 (variable & Changeable)
X2=0.1 (variable & Changeable)
open(1,file='D:\X1\ST01_drift.txt')
open(2,file='D:\X2\ST02_drift.txt')
Do k = 1,1000
read(1,*) st01(k)...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.