checkCIF procedure

PROC-NAME: FCOEF01 Type_1

PURPOSE: Check that the value of _refine_ls_structure_factor_coef is recognised.

CHECKLIST:

• Inet (net intensity)
  
• Fsqd (structure factor squared)
  
• F (structure factor magnitude)
  

Otherwise issue ALERT A
   "Alert A The absorption correction doesn't match a standard keyword"

_refine_ls_structure_factor_coef must ONLY be one of the following keywords (do not add extra text to this field - e.g. F-squared or F^2^ is not correct): Inet Fsqd F

IF extra text is found in this field or the keyword is almost correct issue General ALERT
   "Extra text has been found in the _refine_ls_structure_factor_coef field"

_refine_ls_structure_factor_coef must ONLY be one of the following keywords (do not add extra text to this field - e.g. F-squared or F^2^ is not correct): Inet Fsqd F