Skip to content

Compilation error: Rank mismatch #96

@chi86

Description

@chi86

Description

When running "make" i get the following errors:

mpifort -I../../mod -I/usr/local/include -fPIC -std=f2008 -fdefault-real-8 -O2 -I/opt/petsc/petsc_git/include -I/opt/petsc/petsc_git/arch-linux-c-debug/include -I/opt/petsc/petsc_git -c 3D_elliptic.F90 -o ../../obj/3D_elliptic.o
3D_code.F90:1020:44:

 1020 |         call MatSetValuesBlocked(hypMat, 1, i - 1, 1, j - 1, blk, ADD_VALUES, ierr)
      |                                            1
Error: Rank mismatch in argument ‘c’ at (1) (rank-1 and scalar)
3D_code.F90:1020:54:

 1020 |         call MatSetValuesBlocked(hypMat, 1, i - 1, 1, j - 1, blk, ADD_VALUES, ierr)
      |                                                      1
Error: Rank mismatch in argument ‘e’ at (1) (rank-1 and scalar)
make[3]: *** [../../rulesSources.mk:19: 3D_code.o] Error 1
make[3]: *** Waiting for unfinished jobs....
3D_elliptic.F90:520:47:

  520 |                 call MatSetValues(ellipMat, 1, j + iStart - 1, 1, i - 1, phi, INSERT_VALUES, ierr)
      |                                               1
Error: Rank mismatch in argument ‘c’ at (1) (rank-1 and scalar)
3D_elliptic.F90:520:66:

  520 |                 call MatSetValues(ellipMat, 1, j + iStart - 1, 1, i - 1, phi, INSERT_VALUES, ierr)
      |                                                                  1
Error: Rank mismatch in argument ‘e’ at (1) (rank-1 and scalar)
3D_elliptic.F90:520:73:

  520 |                 call MatSetValues(ellipMat, 1, j + iStart - 1, 1, i - 1, phi, INSERT_VALUES, ierr)
      |                                                                         1
Error: Rank mismatch in argument ‘f’ at (1) (rank-1 and scalar)
3D_elliptic.F90:532:49:

  532 |                 call MatSetValues(ellipPCMat, 1, j + iStart - 1, 1, i - 1, phi, INSERT_VALUES, ierr)
      |                                                 1
Error: Rank mismatch in argument ‘c’ at (1) (rank-1 and scalar)
3D_elliptic.F90:532:68:

  532 |                 call MatSetValues(ellipPCMat, 1, j + iStart - 1, 1, i - 1, phi, INSERT_VALUES, ierr)
      |                                                                    1
Error: Rank mismatch in argument ‘e’ at (1) (rank-1 and scalar)
3D_elliptic.F90:532:75:

  532 |                 call MatSetValues(ellipPCMat, 1, j + iStart - 1, 1, i - 1, phi, INSERT_VALUES, ierr)
      |                                                                           1
Error: Rank mismatch in argument ‘f’ at (1) (rank-1 and scalar)
make[3]: *** [../../rulesSources.mk:19: 3D_elliptic.o] Error 1

I tried the -fallow-argument-mismatch flag but it still produces errors.

Code versions

Operating System: Linux 6.6.52-gentoo-gentoo-dist #10 SMP PREEMPT_DYNAMIC Mon Nov 11 10:26:45 CET 2024 x86_64 Intel(R) Core(TM) i7-14700 GenuineIntel GNU/Linux
cmake: 3.30.5
Gcc: (Gentoo 13.3.1_p20241025 p1) 13.3.1 20241024
Fortran Compiler: GNU Fortran (Gentoo 13.3.1_p20241025 p1) 13.3.1 20241024
Python: 3.12.7
OpenMPI: openmpi-4.2.3
MPICH: 4.2.3
CGNS: CGNS-4.5.0
PETSc: petsc-3.22.1

  • This repository:

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions