Changeset 9445
- Timestamp:
- 2018-03-28T15:17:56+02:00 (7 years ago)
- Location:
- branches/2015/nemo_v3_6_STABLE/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/nemo_v3_6_STABLE/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modlinktomodel.F90
r6133 r9445 50 50 end subroutine alloc_proc 51 51 ! 52 subroutine typ edef_proc ( )52 subroutine typdef_proc ( ) 53 53 implicit none 54 end subroutine typ edef_proc54 end subroutine typdef_proc 55 55 ! 56 56 end interface 57 57 58 58 procedure(alloc_proc) :: Agrif_Allocationcalls 59 procedure(typ edef_proc) :: Agrif_probdim_modtype_def59 procedure(typdef_proc) :: Agrif_probdim_modtype_def 60 60 ! 61 61 end module Agrif_Link -
branches/2015/nemo_v3_6_STABLE/NEMOGCM/EXTERNAL/AGRIF/AGRIF_FILES/modutil.F90
r6133 r9445 700 700 subroutine Agrif_Init_Grids ( procname1, procname2 ) 701 701 !--------------------------------------------------------------------------------------------------- 702 procedure(typ edef_proc), optional :: procname1 !< (Default: Agrif_probdim_modtype_def)702 procedure(typdef_proc), optional :: procname1 !< (Default: Agrif_probdim_modtype_def) 703 703 procedure(alloc_proc), optional :: procname2 !< (Default: Agrif_Allocationcalls) 704 704 !
Note: See TracChangeset
for help on using the changeset viewer.