Browse Source

Drop tabs from fortran source

Samuel Thibault 4 years ago
parent
commit
af96d30588
1 changed files with 2 additions and 2 deletions
  1. 2 2
      mpi/examples/native_fortran/nf_mm_task_build.f90

+ 2 - 2
mpi/examples/native_fortran/nf_mm_task_build.f90

@@ -169,7 +169,7 @@ program nf_mm
         do b_col=1,NB
         do b_col=1,NB
            do b_row=1,NB
            do b_row=1,NB
               task = fstarpu_mpi_task_build((/ c_loc(comm_world), cl_mm, &
               task = fstarpu_mpi_task_build((/ c_loc(comm_world), cl_mm, &
-                   				FSTARPU_R,  dh_A(b_row), &
+                                                FSTARPU_R,  dh_A(b_row), &
                                                 FSTARPU_R,  dh_B(b_col), &
                                                 FSTARPU_R,  dh_B(b_col), &
                                                 FSTARPU_RW, dh_C(b_row,b_col), &
                                                 FSTARPU_RW, dh_C(b_row,b_col), &
                                                 C_NULL_PTR /))
                                                 C_NULL_PTR /))
@@ -177,7 +177,7 @@ program nf_mm
                  ret = fstarpu_task_submit(task)
                  ret = fstarpu_task_submit(task)
               endif
               endif
               call fstarpu_mpi_task_post_build((/ c_loc(comm_world), cl_mm, &
               call fstarpu_mpi_task_post_build((/ c_loc(comm_world), cl_mm, &
-                   				FSTARPU_R,  dh_A(b_row), &
+                                                FSTARPU_R,  dh_A(b_row), &
                                                 FSTARPU_R,  dh_B(b_col), &
                                                 FSTARPU_R,  dh_B(b_col), &
                                                 FSTARPU_RW, dh_C(b_row,b_col), &
                                                 FSTARPU_RW, dh_C(b_row,b_col), &
                                                 C_NULL_PTR /))
                                                 C_NULL_PTR /))