diff --git a/src/finiteArea/fields/areaFields/areaFields.C b/src/finiteArea/fields/areaFields/areaFields.C
index 2120369959..8aadca90f2 100644
--- a/src/finiteArea/fields/areaFields/areaFields.C
+++ b/src/finiteArea/fields/areaFields/areaFields.C
@@ -6,7 +6,7 @@
      \\/     M anipulation  |
 -------------------------------------------------------------------------------
     Copyright (C) 2016-2017 Wikki Ltd
-    Copyright (C) 2018-2022 OpenCFD Ltd.
+    Copyright (C) 2018-2023 OpenCFD Ltd.
 -------------------------------------------------------------------------------
 License
     This file is part of OpenFOAM.
@@ -34,12 +34,14 @@ License
 namespace Foam
 {
 
+defineTemplateTypeNameAndDebug(areaLabelField::Internal, 0);
 defineTemplateTypeNameAndDebug(areaScalarField::Internal, 0);
 defineTemplateTypeNameAndDebug(areaVectorField::Internal, 0);
 defineTemplateTypeNameAndDebug(areaSphericalTensorField::Internal, 0);
 defineTemplateTypeNameAndDebug(areaSymmTensorField::Internal, 0);
 defineTemplateTypeNameAndDebug(areaTensorField::Internal, 0);
 
+defineTemplateTypeNameAndDebug(areaLabelField, 0);
 defineTemplateTypeNameAndDebug(areaScalarField, 0);
 defineTemplateTypeNameAndDebug(areaVectorField, 0);
 defineTemplateTypeNameAndDebug(areaSphericalTensorField, 0);
diff --git a/src/finiteArea/fields/areaFields/areaFieldsFwd.H b/src/finiteArea/fields/areaFields/areaFieldsFwd.H
index 202298c2d3..ff90663cd6 100644
--- a/src/finiteArea/fields/areaFields/areaFieldsFwd.H
+++ b/src/finiteArea/fields/areaFields/areaFieldsFwd.H
@@ -6,7 +6,7 @@
      \\/     M anipulation  |
 -------------------------------------------------------------------------------
     Copyright (C) 2016-2017 Wikki Ltd
-    Copyright (C) 2018-2022 OpenCFD Ltd.
+    Copyright (C) 2018-2023 OpenCFD Ltd.
 -------------------------------------------------------------------------------
 License
     This file is part of OpenFOAM.
@@ -75,6 +75,7 @@ using AreaInternalField = DimensionedField<Type, areaMesh>;
 
 // Typedefs
 
+typedef GeometricField<label, faPatchField, areaMesh> areaLabelField;
 typedef GeometricField<scalar, faPatchField, areaMesh> areaScalarField;
 typedef GeometricField<vector, faPatchField, areaMesh> areaVectorField;
 typedef GeometricField<sphericalTensor, faPatchField, areaMesh>
diff --git a/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.C b/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.C
index ed7665090a..c6640cab01 100644
--- a/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.C
+++ b/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.C
@@ -30,17 +30,12 @@ License
 #include "areaFaMesh.H"
 #include "addToRunTimeSelectionTable.H"
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
+// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
 
 namespace Foam
 {
-
-// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
-
-makeFaPatchFields(calculated);
-
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
-
-} // End namespace Foam
+    makeFaPatchFields(calculated);
+    makeFaPatchFieldType(label, calculated);
+}
 
 // ************************************************************************* //
diff --git a/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.H b/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.H
index 2a3f522e09..e1336d1dba 100644
--- a/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.H
+++ b/src/finiteArea/fields/faPatchFields/basic/calculated/calculatedFaPatchFields.H
@@ -38,6 +38,7 @@ namespace Foam
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 makeFaPatchTypeFieldTypedefs(calculated);
+makeFaPatchFieldTypedef(label, calculated);
 
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
diff --git a/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchField.H b/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchField.H
index 57416d3c44..b1f41b21b1 100644
--- a/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchField.H
+++ b/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchField.H
@@ -212,6 +212,27 @@ public:
 };
 
 
+// * * * * * * * * * * * * Template Specialisations  * * * * * * * * * * * * //
+
+template<>
+tmp<Field<label>> coupledFaPatchField<label>::snGrad() const;
+
+template<>
+void coupledFaPatchField<label>::evaluate(const Pstream::commsTypes);
+
+template<>
+tmp<Field<label>>
+coupledFaPatchField<label>::valueInternalCoeffs(const tmp<scalarField>&) const;
+
+template<>
+tmp<Field<label>>
+coupledFaPatchField<label>::valueBoundaryCoeffs(const tmp<scalarField>&) const;
+
+template<>
+tmp<Field<label>>
+coupledFaPatchField<label>::gradientInternalCoeffs() const;
+
+
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 } // End namespace Foam
diff --git a/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.C b/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.C
index 44a92bef9e..38d1da2564 100644
--- a/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.C
+++ b/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.C
@@ -29,17 +29,70 @@ License
 #include "coupledFaPatchFields.H"
 #include "areaFields.H"
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
+// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
 
 namespace Foam
 {
+    makeFaPatchFieldsTypeName(coupled);
+    makeFaPatchFieldTypeName(label, coupled);
+}
 
-// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
+// * * * * * * * * * * * * * * * Specialisations * * * * * * * * * * * * * * //
 
-makeFaPatchFieldsTypeName(coupled);
+template<>
+Foam::tmp<Foam::Field<Foam::label>>
+Foam::coupledFaPatchField<Foam::label>::snGrad() const
+{
+    // TBD: Treat like zero-gradient
+    return tmp<Field<label>>::New(this->size(), Zero);
+}
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
-} // End namespace Foam
+template<>
+void Foam::coupledFaPatchField<Foam::label>::evaluate(const Pstream::commsTypes)
+{
+    if (!this->updated())
+    {
+        this->updateCoeffs();
+    }
+
+    // TBD: Treat like zero-gradient
+    faPatchField<label>::operator=(this->patchInternalField());
+    faPatchField<label>::evaluate();
+}
+
+
+template<>
+Foam::tmp<Foam::Field<Foam::label>>
+Foam::coupledFaPatchField<Foam::label>::valueInternalCoeffs
+(
+    const tmp<scalarField>&
+) const
+{
+    // TBD: Treat like zero-gradient
+    return tmp<Field<label>>::New(this->size(), label(1));
+}
+
+
+template<>
+Foam::tmp<Foam::Field<Foam::label>>
+Foam::coupledFaPatchField<Foam::label>::valueBoundaryCoeffs
+(
+    const tmp<scalarField>&
+) const
+{
+    // TBD: Treat like zero-gradient
+    return tmp<Field<label>>::New(this->size(), Zero);
+}
+
+
+template<>
+Foam::tmp<Foam::Field<Foam::label>>
+Foam::coupledFaPatchField<Foam::label>::gradientInternalCoeffs() const
+{
+    // TBD: Treat like zero-gradient
+    return tmp<Field<label>>::New(this->size(), Zero);
+}
+
 
 // ************************************************************************* //
diff --git a/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.H b/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.H
index 84d92206c2..fb80786131 100644
--- a/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.H
+++ b/src/finiteArea/fields/faPatchFields/basic/coupled/coupledFaPatchFields.H
@@ -38,6 +38,7 @@ namespace Foam
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 makeFaPatchTypeFieldTypedefs(coupled);
+makeFaPatchFieldTypedef(label, coupled);
 
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
diff --git a/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.C b/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.C
index 883f6b2c08..6289ff6d38 100644
--- a/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.C
+++ b/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.C
@@ -30,17 +30,12 @@ License
 #include "areaFaMesh.H"
 #include "areaFields.H"
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
+// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
 
 namespace Foam
 {
-
-// * * * * * * * * * * * * * * Static Data Members * * * * * * * * * * * * * //
-
-makeFaPatchFields(processor);
-
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
-
-} // End namespace Foam
+    makeFaPatchFields(processor);
+    makeFaPatchFieldType(label, processor);
+}
 
 // ************************************************************************* //
diff --git a/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.H b/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.H
index 74a8cd2b30..68206443f9 100644
--- a/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.H
+++ b/src/finiteArea/fields/faPatchFields/constraint/processor/processorFaPatchFields.H
@@ -38,6 +38,7 @@ namespace Foam
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 makeFaPatchTypeFieldTypedefs(processor);
+makeFaPatchFieldTypedef(label, processor);
 
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
diff --git a/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFields.C b/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFields.C
index 1cff858480..54d802041f 100644
--- a/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFields.C
+++ b/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFields.C
@@ -38,6 +38,7 @@ namespace Foam
     defineTemplateRunTimeSelectionTable(PatchTypeField, patchMapper);         \
     defineTemplateRunTimeSelectionTable(PatchTypeField, dictionary);
 
+makeFaPatchField(faPatchLabelField);
 makeFaPatchField(faPatchScalarField);
 makeFaPatchField(faPatchVectorField);
 makeFaPatchField(faPatchSphericalTensorField);
diff --git a/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFieldsFwd.H b/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFieldsFwd.H
index 67584bb3cb..da4abf2c80 100644
--- a/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFieldsFwd.H
+++ b/src/finiteArea/fields/faPatchFields/faPatchField/faPatchFieldsFwd.H
@@ -42,6 +42,7 @@ namespace Foam
 
 template<class Type> class faPatchField;
 
+typedef faPatchField<label> faPatchLabelField;
 typedef faPatchField<scalar> faPatchScalarField;
 typedef faPatchField<vector> faPatchVectorField;
 typedef faPatchField<sphericalTensor> faPatchSphericalTensorField;