Changes between Initial Version and Version 1 of Ticket #13


Ignore:
Timestamp:
05/10/07 12:53:05 (18 years ago)
Author:
arango
Comment:

Legend:

Unmodified
Added
Removed
Modified

  • Ticket #13 – Description

    initial v1  
    1 ''copy paste from ROMS-3.0 version 39
     1copy paste from ROMS-3.0 version 39
    22
    3 -----------------------------------------------
     3----
     4
     5{{{
    46# ifdef DISTRIBUTE
    57      Lwrite=Master
    … …  
    3638     &        /,11x,'mpirun -np 4 masterM < coupling.in',/)
    3739 30   CONTINUE
     40}}}
    3841
    39 ---------------------------------------------------------
     42----
     43
    4044first: I believe that in
     45     
     46{{{
    4147      WRITE(stdout,*) 'MyRank = ', MyRank, Iname
    42 it should be 'Cname' instead of 'Iname';
    43 second: this version doesn't work for me. Instead it works adding ...
     48}}}
     49
     50it should be '''Cname''' instead of '''Iname'''.
     51
     52second: this version doesn't work for me. Instead it works if I add:
     53
     54{{{
    4455      DO ng=1,Ngrids
    4556        CALL mp_bcasts (ng, model, Cname, 80)
    46      END DO
     57      END DO
     58}}}
    4759right before the OPEN command.
    4860
    4961Is that correct?
    50 
    51 Jacopo