#This test serves as a great example for how to write
#a unittest using the OpenGGCM unittest framework.
#You can run this command by doing 
#`../unittest -t testfile` or just `../unittest`
#You could also make the output a little more verbose
#by passing the -v flag to ../unittest.

SRCDIR=${OPENGGCMDIR}/src

#sed_extract "subroutine stupid_copy_file" "end subroutine" from ${SRCDIR}/mhd-rcm.for
extract stupid_copy_file from from ${SRCDIR}/mhd-rcm.for
include main.F

setenv FC gfortran

fcompile test_stupid_copy

run ./test_stupid_copy