[MOAB-dev] r5863 - MOAB/trunk/examples/itaps

[Tim Tautges]

That's my bad.  A STOP statement is meant to terminate the main program, whereas RETURN is used for functions and 
subroutines.

- tim

On 11/12/2012 03:56 PM, iulian at mcs.anl.gov wrote:
> Author: iulian
> Date: 2012-11-12 15:56:17 -0600 (Mon, 12 Nov 2012)
> New Revision: 5863
>
> Modified:
>     MOAB/trunk/examples/itaps/ListSetsNTagsF90.F90
> Log:
> intel fortran does not like return in main program
> why?
> the error is:
> error #6353: A RETURN statement is invalid in the main program.
>
>
> Modified: MOAB/trunk/examples/itaps/ListSetsNTagsF90.F90
> ===================================================================
> --- MOAB/trunk/examples/itaps/ListSetsNTagsF90.F90	2012-11-10 19:09:50 UTC (rev 5862)
> +++ MOAB/trunk/examples/itaps/ListSetsNTagsF90.F90	2012-11-12 21:56:17 UTC (rev 5863)
> @@ -120,6 +120,6 @@
>       call iMesh_dtor(%VAL(mesh), err)
>       ERRORR("Failed to destruct interface.")
>
> -    return
> +!    return
>     end program ListSetsNTags
>
>
>

-- 
================================================================
"You will keep in perfect peace him whose mind is
   steadfast, because he trusts in you."               Isaiah 26:3

              Tim Tautges            Argonne National Laboratory
          (tautges at mcs.anl.gov)      (telecommuting from UW-Madison)
  phone (gvoice): (608) 354-1459      1500 Engineering Dr.
             fax: (608) 263-4499      Madison, WI 53706