New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 2731 for trunk/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modlinktomodel.F – NEMO

Ignore:
Timestamp:
2011-04-08T14:05:35+02:00 (13 years ago)
Author:
rblod
Message:

Changes for Agrif in MPI

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modlinktomodel.F

    r2715 r2731  
    2727C 
    2828c        external Agrif_InitValues 
    29 c        external Agrif_InitWorkspace 
    3029c        external Agrif_detect 
    3130C 
     31        external Agrif_InitWorkspace 
    3232        external Agrif_probdim_modtype_def 
    3333        external Agrif_clustering_def 
     34        external Agrif_comm_def 
    3435C     Interface                        
     36      INTERFACE 
     37      SUBROUTINE  Sub_Loop_Agrif_InvLoc(indloc,nprocloc,i, 
     38     &            indglob,njmppt,nimppt) 
     39      INTEGER :: indglob 
     40      INTEGER :: indloc 
     41      INTEGER :: nprocloc 
     42      INTEGER :: i 
     43 
     44      INTEGER, ALLOCATABLE, Dimension(:) :: njmppt 
     45      INTEGER, ALLOCATABLE, Dimension(:) :: nimppt 
     46      END SUBROUTINE 
     47      END INTERFACE 
    3548      Interface 
    3649         Subroutine Agrif_Set_numberofcells(Agrif_Gr) 
Note: See TracChangeset for help on using the changeset viewer.