Changeset 10586


Ignore:
Timestamp:
2019-01-27T20:42:34+01:00 (22 months ago)
Author:
nicolasmartin
Message:

Apply bugfix for PGI compilation of AGRIF, close #2072

Location:
vendors/AGRIF
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • vendors/AGRIF/dev/AGRIF_FILES/modlinktomodel.F90

    r5656 r10586  
    5050        end subroutine alloc_proc 
    5151! 
    52         subroutine typedef_proc ( ) 
     52        subroutine typdef_proc ( ) 
    5353            implicit none 
    54         end subroutine typedef_proc 
     54        end subroutine typdef_proc 
    5555! 
    5656    end interface 
    5757     
    5858    procedure(alloc_proc)   :: Agrif_Allocationcalls 
    59     procedure(typedef_proc) :: Agrif_probdim_modtype_def 
     59    procedure(typdef_proc) :: Agrif_probdim_modtype_def 
    6060! 
    6161end module Agrif_Link 
  • vendors/AGRIF/dev/AGRIF_FILES/modutil.F90

    r5656 r10586  
    700700subroutine Agrif_Init_Grids ( procname1, procname2 ) 
    701701!--------------------------------------------------------------------------------------------------- 
    702     procedure(typedef_proc), optional   :: procname1 !< (Default: Agrif_probdim_modtype_def) 
     702    procedure(typdef_proc), optional   :: procname1 !< (Default: Agrif_probdim_modtype_def) 
    703703    procedure(alloc_proc),   optional   :: procname2 !< (Default: Agrif_Allocationcalls) 
    704704! 
  • vendors/AGRIF/release-4.0/AGRIF_FILES/modlinktomodel.F90

    r5656 r10586  
    5050        end subroutine alloc_proc 
    5151! 
    52         subroutine typedef_proc ( ) 
     52        subroutine typdef_proc ( ) 
    5353            implicit none 
    54         end subroutine typedef_proc 
     54        end subroutine typdef_proc 
    5555! 
    5656    end interface 
    5757     
    5858    procedure(alloc_proc)   :: Agrif_Allocationcalls 
    59     procedure(typedef_proc) :: Agrif_probdim_modtype_def 
     59    procedure(typdef_proc) :: Agrif_probdim_modtype_def 
    6060! 
    6161end module Agrif_Link 
  • vendors/AGRIF/release-4.0/AGRIF_FILES/modutil.F90

    r5656 r10586  
    700700subroutine Agrif_Init_Grids ( procname1, procname2 ) 
    701701!--------------------------------------------------------------------------------------------------- 
    702     procedure(typedef_proc), optional   :: procname1 !< (Default: Agrif_probdim_modtype_def) 
     702    procedure(typdef_proc), optional   :: procname1 !< (Default: Agrif_probdim_modtype_def) 
    703703    procedure(alloc_proc),   optional   :: procname2 !< (Default: Agrif_Allocationcalls) 
    704704! 
Note: See TracChangeset for help on using the changeset viewer.