Trivial update, just to switch stored username

src/create_surfaces.f90

@@ -616,7 +616,7 @@ select case(surface_type)
            end if
         end do
    case (12)
-        ! rectangular emboss with specified slope, 
+        ! rectangular emboss with specified slope
         ! sp01 is the z level
         ! sp02 and 03 are x1,x2 
         ! sp04 and 05 are y1,y2