aselimov/cacmb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added mode merge, adjusted how file reading works to accomodate model merge

Browse source
This commit is contained in:
Alex 2019-12-07 13:39:29 -05:00
parent fb2abc60d1
commit 3c7461f094
3 changed files with 154 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/call_mode.f90
View file

@ -4,6 +4,7 @@ subroutine call_mode(arg_num,mode)
use mode_create
use mode_convert
use mode_merge
use parameters
implicit none
@ -15,9 +16,11 @@ subroutine call_mode(arg_num,mode)
case('--create')
call create
case('--convert')
call convert
call convert
case('--merge')
call merge
case default
print *, "Mode ", mode, " currently not accepted. Please check documentation for ", &
print *, "Mode ", trim(adjustl(mode)), " currently not accepted. Please check documentation for ", &
"accepted modes and rerun."
stop 3