Nodes of different colours represent the following:
Solid arrows point from a parent (sub)module to the submodule which is descended from it. Dashed arrows point from a module being used to the module or program unit using it. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | boundaryConditionType | |||
| character(len=*), | intent(in) | :: | currentName | 
FUNCTION CreatExtBooundCondName (boundaryConditionType, currentName) RESULT (cOut)
    ! FUNCTION INFORMATION:
    !       AUTHOR         Greg Stark
    !       DATE WRITTEN   July 2008
    !       MODIFIED       September 2010, Kyle Benne
    !                      Modified FUNCTION syntax to use RESULT keyword
    !       RE-ENGINEERED  na
    ! PURPOSE OF THIS FUNCTION:
    ! This subroutine writes the external boundary condition data to the SQL database
    !
    ! METHODOLOGY EMPLOYED:
    ! Standard SQL92 queries and commands via the Fortran SQLite3 API
    ! REFERENCES:
    ! na
    ! USE STATEMENTS:
    USE DataGlobals
    USE DataSurfaces, ONLY: ExternalEnvironment, Ground, OtherSideCoefNoCalcExt, OtherSideCoefCalcExt, OtherSideCondModeledExt
    IMPLICIT NONE ! Enforce explicit typing of all variables in this routine
    ! FUNCTION ARGUMENT DEFINITIONS:
    INTEGER, INTENT(IN) :: boundaryConditionType
    CHARACTER(len=*), INTENT(IN) :: currentName
    CHARACTER(len=MaxNameLength) :: cOut
    ! FUNCTION PARAMETER DEFINITIONS:
    ! na
    ! INTERFACE BLOCK SPECIFICATIONS:
    ! na
    ! DERIVED TYPE DEFINITIONS:
    ! na
    ! FUNCTION LOCAL VARIABLE DECLARATIONS:
    ! na
    SELECT CASE (boundaryConditionType)
        CASE(ExternalEnvironment)
            cOut = 'External Environment'
        CASE(Ground)
            cOut = 'Ground'
        CASE(OtherSideCoefNoCalcExt,OtherSideCoefCalcExt)
            cOut = 'Other Side Coefficients'
        CASE(OtherSideCondModeledExt)
            cOut = 'Other Side Conditions'
        CASE DEFAULT
            cOut = currentName
    END SELECT
END FUNCTION CreatExtBooundCondName