!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
if (pro%narg.eq.0) then
   @ gag_demo:demo-basic.map
else if ((pro%arg[1].eq."basic").or.(pro%arg[1].eq."single").or.(pro%arg[1].eq."mosaic")) then
   @ gag_demo:demo-'pro%arg[1]'.map
else if (pro%arg[1].eq."all") then
   @ gag_demo:demo-basic.map
   @ gag_demo:demo-single.map
   @ gag_demo:demo-mosaic.map
else
   message e demo "Unknown first argument: "'pro%arg[1]'
   message e demo "Calling sequence: @ gag_demo:demo [basic|single|mosaic|all]"
endif
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
