******* ************
** User callable
** Read a quartz flipping ratio file 'quartz__.dat' and loads it
** into desired workspace
**
** ARGUMENTS:
** numor : numor corresponding to quatzfile of interest
** temp : temperature parameter of corrected quartzfile (see quartz.pro)
** (nm is obsolete, kept for backwards compatability)
**
** COMMAND SYNTAX:
** w1=input_quartz(numor=)
** (optional arguments shown in square brackets)
**
** KHA,JRS 16/5/03
** -------------------------------------------------------------------------------
** *******************************************************************************