SIC SAVE

        [SIC\]SIC SAVE [FileName Symbol]

    This  is  a  specific  command (currently) used by the ALMA simulator to
    copy into an output file (a procedure) the name of any newly defined SIC
    variable, prefixed by whatever Symbol is given here.

    Without argument, just closes the current "save" file.

    Can be used whenever you need to apply different actions to the same set
    of variables, or get two sets of variables with similar names (one  pre-
    fixed,  the  other not) e.g. to store default values or last values. Re-
    defining the Symbol and executing the created procedure will do the  de-
    sired job on the list of variables defined when SIC SAVE was active...

       sic save define_all TOTO
       define a Bunch Of Variables Here /global ! Only global stuff, though...
       sic save
       !
       symbol TOTO "EXA &1 "   ! Examine the Variable name
       @ gag_proc:define_all   ! for all variables in this list...
       !
       sic output init_all.sic
       symbol TOTO "@ sicvar_init"   ! Look into gag_pro:clone_var.sic
       @ gag_proc:define_all         ! for further explanation
       sic output
       @ init_all.sic                ! Initialize them
       !
       define structure CLONE% /global
       sic output clone_all.sic
       symbol TOTO "@ sicvar_clone CLONE% "   ! Will actually create a
       @ gag_proc:define_all         ! copy of all variables into structure CLON
       sic output
       symbol TOTO continue
       @ clone_all.sic                ! Duplicate them into CLONE% structure