From 076fecfc7b6a10ab7e4278b85f3dd6c0ca3d288a Mon Sep 17 00:00:00 2001
From: Dave Whipp <dwhipp@dal.ca>
Date: Mon, 13 Jun 2011 12:43:10 +0000
Subject: [PATCH] Another trivial change as a test
---
src/create_surfaces.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/create_surfaces.f90 b/src/create_surfaces.f90
index b56144da..a1f238e3 100644
--- a/src/create_surfaces.f90
+++ b/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)
--
GitLab