From 6498610ce50d6c55024a0a78f0b73b96d8cb0f0a Mon Sep 17 00:00:00 2001
From: ignis <ignis@postech.ac.kr>
Date: Fri, 31 Jan 2020 08:49:21 +0900
Subject: [PATCH] added no argument case to subroutine parse

---
 code/ysolve.f90 | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/code/ysolve.f90 b/code/ysolve.f90
index 1792a59..8ab3149 100644
--- a/code/ysolve.f90
+++ b/code/ysolve.f90
@@ -18,6 +18,9 @@
         !First, make sure the right number of inputs have been provided
         IF(COMMAND_ARGUMENT_COUNT().EQ.1)THEN
           CALL GET_COMMAND_ARGUMENT(1,num1char)   !first, read in the two values
+        ELSE IF(COMMAND_ARGUMENT_COUNT().EQ.0)THEN
+          WRITE(*,*)'ERROR, NO COMMAND-LINE ARGUMENT'
+          num1char = "-h"
         ELSE
           WRITE(*,*)'ERROR, TOO MANY COMMAND-LINE ARGUMENTS(MORE THAN ONE). STOPPING'
           STOP