Research Article
TESLA GPUs versus MPI with OpenMP for the Forward Modeling of Gravity and Gravity Gradient of Large Prisms Ensemble
DO k = 1,T | !$acc parallel loop present (Gd,Gshared_d) | collapse (2) | DO i = 1,Nx | DO j = 1,Ny | Gshared_D(i,j) = Gd(k,i,j) + Gshared_D(i,j); | END DO | END DO | !$acc end parallel loop | END DO |
|