Ocean Modeling Discussion

ROMS/TOMS

Search for:
It is currently Wed Dec 13, 2017 7:00 am




Post new topic Reply to topic  [ 1 post ] 

All times are UTC

Author Message
PostPosted: Thu Sep 21, 2017 3:17 am 
Offline

Joined: Fri Sep 11, 2009 1:48 pm
Posts: 54
Location: nmefc
Dear all,
I want to try the parallel input/output in order to increase the speed of I/O. But I have found a bug with the function mp_collect when I compiled the ROMS code 857 with the option #define PARALLEL_IO.

I have double checked that the parameter A of function mp_collect_f(ng,model,Npts,Aspv,A) is defined in the MODULE distribute_mod as
Code:
integer, intent(inout) :: A(Npts)
, however it is used in the function nf_fread2d with the parameter Awrk is defined as
Code:
real(r8),allocatable :: Awrk(:,:)
So, while compling it with the option #define PARALLEL_IO, I have got the error messages as follow,
Quote:
nf_fread2d.f90(314): error #6285: There is no matching specific subroutine for this generic subroutine call. [MP_COLLECT]
Code:
CALL mp_collect (ng, model, Npts, IniVal, Awrk)

-----------------^
compilation aborted for nf_fread2d.f90 (code 1)
make: *** [/fs01/home/Build/nf_fread2d.o] Error 1
make: *** Waiting for unfinished jobs....


Anyone can help me to figure out this bug? Thanks.


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 1 post ] 

All times are UTC


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Group