Building VORONOI with Intel Fortran compilation errors

[jbensabat]

Hello
I am trying to build VORONOI using the intel fortran under windows. I have built PETSC for the same OS and compiler.
upon compiling grid.f I am getting a number of compilation errors related to calls to PETSC routines. Here is one example

! TOUGH2
if (grid%is_tough .EQV. PETSC_TRUE) then
call MatRestoreRow(grid%adjmatrix_area, grid%vertex_ids(i) - 1, ncols, cols, PETSC_NULL_SCALAR, ierr); CHKERRQ(ierr)
else
call MatRestoreRow(grid%adjmatrix, grid%vertex_ids(i) - 1, ncols, cols, PETSC_NULL_SCALAR, ierr); CHKERRQ(ierr)

     endif
     ! END TOUGH2

the error I get is
C:\LANL\voronoi\src\grid.F90(1899): error #8284: If the actual argument is scalar, the dummy argument shall be scalar unless the actual argument is of type character or is an element of an array that is not assumed shape, pointer, or polymorphic. [VALS]

I tried

! TOUGH2
if (grid%is_tough .EQV. PETSC_TRUE) then
call MatRestoreRow(grid%adjmatrix_area, grid%vertex_ids(i) - 1, ncols, cols, vals, ierr); CHKERRQ(ierr)
else
call MatRestoreRow(grid%adjmatrix, grid%vertex_ids(i) - 1, ncols, cols, vals, ierr); CHKERRQ(ierr)

     endif
     ! END TOUGH2

and the error vanishes
but is it kosher ?
best
jac

[jbensabat]

Hi
Just a comment the solution to the problem I stated above is to replace PETSC_NULL_INTEGER with PETSC_NULL_INTEGER_ARRAY

and PETSC_NULL_SCALAR with PETSC_NULL_SCALAR_ARRAY

[jbensabat]

Now I am left with the last errors related to the routine
call MatSetValues(grid%conn1, 1, a1 - 1, 1, b1 - 1, temp_int, INSERT_VALUES, ierr)
line 3726

the error I get is
If the actual argument is scalar, the dummy argument shall be scalar unless the actual argument is of type character or is an element of an array that is not assumed shape, pointer, or polymorphic. [F]

here again scalars are passed instead of arrays
best
jac

[jbensabat]

Sorry I found the solution
in order to overcome problem I defined three arrays
idxm(1) = a_i-1 (i=1,2,3)
idxn(1) = b_i-1 (i=1,2,3)
vtemp_int(1) = temp_int

the last problem I have is during linking
number of functions seem to be missing

INITLAGRIT
DOTASK CMO_GET_NAME
CMO_GET_INFO
HPSORT1
GRID_MODULE_mp_DIAGNOSTICS
MATGETSUBMATRICES

I understand that voronoi can be run as a standalone app
where can i find these functions ?
best
jac