******* ********
** User callable
** For D7 data only
**
** Correct for "apparent" detector efficiencies using vanadium data. If desired,
** normalise intensity to an absolute scale. Must be run after components.pro!!!
**
** ARGUMENTS:
** filenum :number of vanadium integral file - "vanadium_.dat"
** created by vanadium.pro. Is possible also to input multiple
** vanadium file numbers for use with theta_scan data -
** e.g. filenum=[13487,13491] - use 5 vanadium files numbered
** 13487,13488,13489,13490,13491
** i.e. sequential order
** filenum=[13487,13490,13499] - use the three specified files
** i.e. non-sequential order
**
** S_mass :sample mass (g) -optional
** V_mass :V mass (g) -optional
** Fwt :formula weight (amu) per f.u. -optional
**
** (fn, op1, op2 and op3 are obsolete, kept for backwards compatability)
**
** DIMENSIONS:
** w_in=w_out(nspectra,nphases,nruns) unless
**
** COMMAND SYNTAX
** Simple Example:
** w2=norm_van(w1,filenum=[13478,13499])
** - correct det efficiencies using 12 vanadium files vanadium_13478.dat
** to vanadium_13499.dat taken at different scan positions
**
** Absolute Normalisation example:
** w2=norm_van(w1,filenum=13487,S_mass=13.45,V_mass=92.3,Fwt=6.29)
** - normalise to vanadium_13487.dat, using a sample mass of 13.45g
** and a formula weight of 92.3 amu. V mass is 6.29g.
**
** KHA,JRS 11/4/03
** -------------------------------------------------------------------------------
** *******************************************************************************