New boundary condition 'wallTemperature' that simulates a reflecting

wall with constant temperature and specific heat.

src/modules/mesh/1DRad/moduleMesh1DRad.f90

@@ -56,6 +56,15 @@ MODULE moduleMesh1DRad
 
     END SUBROUTINE transparent
 
+    MODULE SUBROUTINE wallTemperature(edge, part)
+      USE moduleSpecies
+      IMPLICIT NONE
+
+      CLASS(meshEdge), INTENT(inout):: edge
+      CLASS(particle), INTENT(inout):: part
+
+    END SUBROUTINE wallTemperature
+
   END INTERFACE
 
   TYPE, PUBLIC, ABSTRACT, EXTENDS(meshVol):: meshVol1DRad
@@ -190,6 +199,9 @@ MODULE moduleMesh1DRad
         TYPE IS(boundaryTransparent)
           self%fBoundary(s)%apply => transparent
 
+        TYPE IS(boundaryWallTemperature)
+          self%fBoundary(s)%apply => wallTemperature
+
         CLASS DEFAULT
           CALL criticalError("Boundary type not defined in this geometry", 'initEdge1DRad')