diff --git a/src/99_postliminary/01_functors/reflection_coefficient.jl b/src/99_postliminary/01_functors/reflection_coefficient.jl
index 3f92ef3..b10b57a 100644
--- a/src/99_postliminary/01_functors/reflection_coefficient.jl
+++ b/src/99_postliminary/01_functors/reflection_coefficient.jl
@@ -1,15 +1,7 @@
 export reflection_coefficient_profile
 export ReflectionCoefficientProfile
 
-struct ReflectionCoefficientProfileType <: ModellingFunction end
-const reflection_coefficient_profile = ReflectionCoefficientProfileType()
-
-struct ReflectionCoefficientProfile{ProfileFunctionType <: Function} <: ModellingFunctor
-    profile::ProfileFunctionType
-end
-
-EnvironmentComponent(::ReflectionCoefficientProfileType) = GenericOceanInterface()
-ModellingFunction(::Type{<:ReflectionCoefficientProfile}) = reflection_coefficient_profile
+@implement_environment_function_and_functor ReflectionCoefficient GenericOceanInterface
 
 function (FunctorType::Type{<:ReflectionCoefficientProfile})(
     EC::GenericOceanInterface,