Skip to content

Commit

Permalink
fix github actions
Browse files Browse the repository at this point in the history
  • Loading branch information
@RMeli
RMeli committed May 14, 2024
1 parent 275508e commit e6495c7
Show file tree
Hide file tree
Showing 2 changed files with 45 additions and 45 deletions.
2 changes: 1 addition & 1 deletion .github/workflows/check_license_header.yaml
View file
Original file line number Diff line number Diff line change
Expand Up @@ -34,7 +34,7 @@ jobs:
find src test -type f \
! '(' \
-name '*.f90' \
-o -name '*.fpp' \
-o -name '*.fypp' \
-o -name 'CMakeLists.txt' \
-o -name '.*' \
')' \
Expand Down
88 changes: 44 additions & 44 deletions src/dlaf_fortran.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -230,11 +230,11 @@ end subroutine dlaf_pssyevd_c
info = -1

call dlaf_pssyevd_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pssyevd

Expand Down Expand Up @@ -263,11 +263,11 @@ end subroutine dlaf_pdsyevd_c
info = -1

call dlaf_pdsyevd_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pdsyevd

Expand Down Expand Up @@ -296,11 +296,11 @@ end subroutine dlaf_pcheevd_c
info = -1

call dlaf_pcheevd_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pcheevd

Expand Down Expand Up @@ -329,11 +329,11 @@ end subroutine dlaf_pzheevd_c
info = -1

call dlaf_pzheevd_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pzheevd

Expand Down Expand Up @@ -362,12 +362,12 @@ end subroutine dlaf_pssygvx_c
info = -1

call dlaf_pssygvx_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pssygvx

Expand Down Expand Up @@ -396,12 +396,12 @@ end subroutine dlaf_pdsygvx_c
info = -1

call dlaf_pdsygvx_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pdsygvx

Expand Down Expand Up @@ -430,12 +430,12 @@ end subroutine dlaf_pchegvx_c
info = -1

call dlaf_pchegvx_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pchegvx

Expand Down Expand Up @@ -464,12 +464,12 @@ end subroutine dlaf_pzhegvx_c
info = -1

call dlaf_pzhegvx_c(iachar(uplo, c_signed_char), n, &
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)
c_loc(a(1, 1)), ia, ja, desca, &
c_loc(b(1, 1)), ib, jb, descb, &
c_loc(w(1)), &
c_loc(z(1, 1)), iz, jz, descz, &
c_loc(info) &
)

end subroutine dlaf_pzhegvx

Expand Down

0 comments on commit e6495c7

Please sign in to comment.