diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index fc70298da1a66edd19a92a446fd29e0576327932..fad7412ca20fa25eba3ca5ee3505dee8a369c70f 100644
--- a/src/helper/startup.tcl
+++ b/src/helper/startup.tcl
@@ -296,4 +296,13 @@ proc production_test {} {
 }
 add_help_text production "Runs test procedure. Throws exception if procedure failed. Prints progress messages."
 
+proc load {args} {
+	return [eval "load_image $args"]
+}
+add_help_text load "synonym to load_image"
+
+proc verify {args} {
+	return [eval "verify_image $args"]
+}
 
+add_help_text verify "synonym to verify_image"