Another trivial change as a test

src/create_surfaces.f90

@@ -658,7 +658,7 @@ select case(surface_type)
         end do
 
    case (13)
-     ! a 2D embankment of finite length and with 2 kinks
+     ! a 3D embankment of finite length and with 2 kinks
      ! sp01 is the z level
      ! sp02 is the thickness (zthick)
      ! sp03 is slope angle (psi)