Re: formatting matrix in fortran90
- From: m_b_metcalf <michaelmetcalf@xxxxxxxxxxxxxx>
- Date: Wed, 2 Dec 2009 12:24:55 -0800 (PST)
On Dec 2, 8:22 pm, Schokoholic <mrt.marine...@xxxxxxxxx> wrote:
Hi everyone,
i need your help!!!
i am tring to formatting a matrix of dimensione 10xN+1
wha i am trying to do is following:
<value> <index>:<value>...... etc. for each row
the values in the first column do not need a "index".
how can i do that???
there is what i have done.. but it doesn't seem to work out properly:
DO 2 j_train=1,10
DO 1 i_train=2,n+1
1 write(1,180) mat_data(j_train,1),i_train-1,mat_data
(j_train,i_train)
2 write(1,*)
180 FORMAT(1X,F20.1,I3,':',1X,F20.15,$)
is there anyone able to help me???
it's important...
Does this help?
program test_csv
implicit none
integer :: mat_data(10, 5) = 1.0, n, i_train, j_train
n =4
DO j_train=1,10
write(1,180) mat_data(j_train,1),(i_train-1,mat_data
(j_train,i_train) ,i_train=2,n+1 )
write(1,*)
end do
180 FORMAT(1X,F20.15,5(I3,':',1X,F20.15))
end program
Regards,
Mike Metcalf
.
- References:
- formatting matrix in fortran90
- From: Schokoholic
- formatting matrix in fortran90
- Prev by Date: Re: formatting matrix in fortran90
- Next by Date: Re: formatting matrix in fortran90
- Previous by thread: Re: formatting matrix in fortran90
- Next by thread: BINARY FILE FORMAT
- Index(es):
Relevant Pages
|
