> parallel/mpi-ch            3       root@garbled.net

Can anybody fix this?

/usr/tmp/parallel/mpi-ch/work/mpich-1.2.6/bin/mpif77  -o  fcoll_test fcoll_test.f 
fcoll_test.f:
   MAIN main:
Warning on line 171 of fcoll_test.f: mpi_null_copy_fn declared EXTERNAL but never used.
Warning on line 171 of fcoll_test.f: mpi_wtick declared EXTERNAL but never used.
Warning on line 171 of fcoll_test.f: mpi_wtime declared EXTERNAL but never used.
Warning on line 171 of fcoll_test.f: mpi_dup_fn declared EXTERNAL but never used.
Warning on line 171 of fcoll_test.f: pmpi_wtick declared EXTERNAL but never used.
Warning on line 171 of fcoll_test.f: pmpi_wtime declared EXTERNAL but never used.
Warning on line 171 of fcoll_test.f: mpi_null_delete_fn declared EXTERNAL but never used.
fcoll_test.c: In function 'MAIN__':
fcoll_test.c:51: error: expected declaration specifiers or '...' before 'longint'
fcoll_test.c:58: error: expected '=', ',', ';', 'asm' or '__attribute__' before 'disp'
fcoll_test.c:58: error: 'disp' undeclared (first use in this function)
fcoll_test.c:58: error: (Each undeclared identifier is reported only once
fcoll_test.c:58: error: for each function it appears in.)
fcoll_test.c:295: warning: passing argument 4 of 'mpi_file_set_view__' from incompatible pointer type
fcoll_test.c:295: warning: passing argument 5 of 'mpi_file_set_view__' from incompatible pointer type
fcoll_test.c:295: warning: passing argument 7 of 'mpi_file_set_view__' makes integer from pointer without a cast
fcoll_test.c:295: error: too many arguments to function 'mpi_file_set_view__'
fcoll_test.c:301: warning: passing argument 4 of 'mpi_file_set_view__' from incompatible pointer type
fcoll_test.c:301: warning: passing argument 5 of 'mpi_file_set_view__' from incompatible pointer type
fcoll_test.c:301: warning: passing argument 7 of 'mpi_file_set_view__' makes integer from pointer without a cast
fcoll_test.c:301: error: too many arguments to function 'mpi_file_set_view__'

-- 
Best regards, Aleksey Cheusov.