Template:CMI Example get grid connectivity Fortran
From CSDMS
! Insert-Code-Here {edu.csdms.models.LTRANS.get_grid_connectivity} (get_grid_connectivity method)
!
! This method has not been implemented
!
! DO-DELETE-WHEN-IMPLEMENTING exception.begin(edu.csdms.models.LTRANS.get_grid_connectivity)
type(sidl_BaseInterface_t) :: throwaway
type(sidl_NotImplementedException_t) :: notImpl
call new(notImpl, exception)
call setNote(notImpl, 'Not Implemented', exception)
call cast(notImpl, exception,throwaway)
call deleteRef(notImpl,throwaway)
return
! DO-DELETE-WHEN-IMPLEMENTING exception.end(edu.csdms.models.LTRANS.get_grid_connectivity)