diff --git a/Elasticity/screenshot1.png b/Elasticity/screenshot1.png
new file mode 100644
index 0000000000000000000000000000000000000000..c6473841f190ea7ded7a4d87842101759af939df
Binary files /dev/null and b/Elasticity/screenshot1.png differ
diff --git a/Elasticity/screenshot1_512.png b/Elasticity/screenshot1_512.png
new file mode 100644
index 0000000000000000000000000000000000000000..6a7e129d2020a5edb0983676d1995b4193e102e5
Binary files /dev/null and b/Elasticity/screenshot1_512.png differ
diff --git a/Elasticity/wrench2D.pro b/Elasticity/wrench2D.pro
index 2291330453e0bf7a1ac06f2f2e789d64d7f94c83..fab3a7f035c4acc497e333309e128c20051be577 100644
--- a/Elasticity/wrench2D.pro
+++ b/Elasticity/wrench2D.pro
@@ -81,7 +81,7 @@ Function {
   force_y[] = 0;
   /* Components of the surface traction force applied to the region "Sur_Force_Mec" */
   pressure_x[] = 0;
-  pressure_y[] = AppliedForce/(SurfaceArea[]*Thickness);
+  pressure_y[] = -AppliedForce/(SurfaceArea[]*Thickness); // downward vertical force
 }
 
 
@@ -343,7 +343,7 @@ PostOperation {
       Echo[ StrCat["l=PostProcessing.NbViews-1; ", 
       		   "View[l].VectorType = 5; ",
       		   "View[l].ExternalView = l; ",
-      		   "View[l].DisplacementFactor = 100; ",
+      		   "View[l].DisplacementFactor = 200; ",
       		   "View[l-1].IntervalsType = 3; "
 		   ],
              File "tmp.geo", LastTimeStepOnly] ;