hjunqq
Results
1
comments of
hjunqq
I modify the code like that: ```fortran size_n = size(x,dim=1) l = DI1P+1 sp = 0 code = repeat(' ',l*size_n) do n = 1,size_n code(sp+1:sp+l) = str(n=x(n)) sp = sp...