Function:     irlrs_set_delsnip

Purpose:      Delete an existing LRS set.

Category:     LRS

File:         irlrs_set.c

Author:       P.R. Roelfsema

Use:          IRLRS_SET_DELETE( LRSSET  ,      Input   character*(*)
                                STATUS  )      Output  integer

              LRSSET      Name of LRS set.
              STATUS      Status return:
                             0  - no problems.
                            -1  - LRSSET does not exists.
                            -2  - LRSSET exists, is not LRS set.
                          other - gds error code
                          For STATUS -1 or -2 LRSSET is not deleted.

Updates:      Jan 29, 1991: PRR, Creation date