mod_ncll::has_unlimited Interface Reference

Public Member Functions
logical function	has_unlimited_ncf (LIST)
logical function	has_unlimited_var (LIST)

Detailed Description

Definition at line 315 of file mod_ncll.f90.

Member Function/Subroutine Documentation

has_unlimited_ncf()

logical function mod_ncll::has_unlimited::has_unlimited_ncf

(

type(ncfile), intent(in)

LIST

)

Definition at line 2806 of file mod_ncll.f90.

    IMPLICIT NONE
    TYPE(NCFILE),         INTENT(IN):: LIST
    LOGICAL                        :: FOUND
    TYPE(NCDIMP)           ,POINTER :: CURRENT, PREVIOUS
    
    previous => list%DIMS
    current  => previous%NEXT
    found = .false.

    DO
       IF(.NOT. ASSOCIATED(current)) RETURN !END OF LIST
       
       IF(current%DIM%UNLIMITED ) THEN ! FOUND THE DIM LINK
          found = .true.
          EXIT
       ELSE
          previous => previous%NEXT
          current  => current%NEXT
       END IF
    END DO

has_unlimited_var()

logical function mod_ncll::has_unlimited::has_unlimited_var

(

type(ncvar), intent(in)

LIST

)

Definition at line 2917 of file mod_ncll.f90.

    IMPLICIT NONE
    TYPE(NCVAR),          INTENT(IN)   :: LIST
    LOGICAL                            :: FOUND
    TYPE(NCDIMP)              ,POINTER :: CURRENT, PREVIOUS
    
    previous => list%DIMS
    current  => previous%NEXT
    found = .false.

    DO
       IF(.NOT. ASSOCIATED(current)) RETURN !END OF LIST
       
       IF(current%DIM%UNLIMITED ) THEN ! FOUND THE DIM LINK
          found = .true.
          EXIT
       ELSE
          previous => previous%NEXT
          current  => current%NEXT
       END IF
    END DO

---

The documentation for this interface was generated from the following file:

• FVCOMg01/mod_ncll.f90