<pre>on subLaunchApplication application,document  -- sublaunch an application in multiFinder.  -- sublaunching may be suppressed if you don't have enough memory  if multiFinder() is false then exit subLaunchApplication  if application is empty then exit subLaunchApplication  if isRunning(application) then exit subLaunchApplication  put subLaunch(progName) into err  put subLaunch(progName,docName) into err  if err is 0 then exit subLaunchApplication               -- no error  if err < 0 then OsErr err                                -- osErr error  if err is 1 then answer "Parameter error" with "OK"      -- param error  if err is 2 then answer "Insufficient memory" with "OK"  -- sys errorend subLaunchApplication</pre>