Opened 5 years ago

Closed 5 years ago

#1550 closed Bug (fixed)

diadct can fail if ln_ctl=true

Reported by: timgraham Owned by: timgraham
Priority: low Milestone:
Component: OCE Version: trunk
Severity: Keywords:
Cc:

Description

In dia_dct_init the following lines fail if ln_ctl=true because lwp=true on all cores and therefore each core attempts to open a file with the same name.

I think lwp should be replaced by lwm throughout the module. Any objections to this?

!open output file
     IF( lwp ) THEN
        CALL ctl_opn( numdct_vol,  'volume_transport', 'NEW', 'FORMATTED', 'SEQUENTIAL', -1, numout,  .FALSE. )
        CALL ctl_opn( numdct_heat, 'heat_transport'  , 'NEW', 'FORMATTED', 'SEQUENTIAL', -1, numout,  .FALSE. )
        CALL ctl_opn( numdct_salt, 'salt_transport'  , 'NEW', 'FORMATTED', 'SEQUENTIAL', -1, numout,  .FALSE. )
     ENDIF

Commit History (1)

ChangesetAuthorTimeChangeLog
5505timgraham2015-06-29T14:51:57+02:00

Fix for #1550. Replaced lwp by lwm so that only lead processor writes out transports even if ln_ctl=true.

Change History (1)

comment:1 Changed 5 years ago by timgraham

  • Resolution set to fixed
  • Status changed from new to closed

Fixed at r5505

Note: See TracTickets for help on using tickets.