performance - Fortran - copying matrices efficiently -

performance - Fortran - copying matrices efficiently -

there couple places in code re-create sparse matrices 100,000,000 elements. issue coming coping matrices in loop called around 1000 times , coping matrix takes 2 seconds (it takes hr finish copying taking amount of time). re-create matrices using equal sign (i.e. a=b). utilize next initialize matrix

data a/ myzp * 0.0/

which takes time execute, 'myzp' elements in matrix , 'a' matrix.

my question there more efficient way re-create matrix in fortran using equal sign?

update: here code in question taking 2 seconds,

call cpu_time(t1) = b phone call cpu_time(t2)

where , b both matrices.

performance matrix copy fortran