You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
10 lines
294 B
10 lines
294 B
complex(dp)::
|
|
& FD0save(Ndmax,-2:0),
|
|
& FD1save(Ndmax,y1max,-2:0),
|
|
& FD2save(Ndmax,y2max,-2:0),
|
|
& FD3save(Ndmax,y3max,-2:0),
|
|
& FD4save(Ndmax,y4max,-2:0)
|
|
common/ovDsave/FD0save,FD1save,FD2save,FD3save,FD4save
|
|
!$omp threadprivate(/ovDsave/)
|
|
|
|
|