- Timestamp:
- 2011-04-08T14:05:35+02:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modlinktomodel.F
r2715 r2731 27 27 C 28 28 c external Agrif_InitValues 29 c external Agrif_InitWorkspace30 29 c external Agrif_detect 31 30 C 31 external Agrif_InitWorkspace 32 32 external Agrif_probdim_modtype_def 33 33 external Agrif_clustering_def 34 external Agrif_comm_def 34 35 C 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 35 48 Interface 36 49 Subroutine Agrif_Set_numberofcells(Agrif_Gr)
Note: See TracChangeset
for help on using the changeset viewer.