Ignore:
Timestamp:
Sep 3, 2014 10:34:01 AM (8 years ago)
Author:
vondreele
Message:

change lower limit of LGmix to 0 from 0.1 - recompile Win-32 & Win-64 fortran sources
fix ellipseSizeDeriv - didn't do it correctly before
fix mustrain & size fxns & derivatives for CW (minor) & TOF major; all checked against numerical derivatives for both lorentzian & gaussian contributions as well as mixing coeff.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/fsource/powsubs/epsvoigt.for

    r829 r1484  
    4949!CODE:
    5050
    51       SQSGT = MAX(SQRT(SIG),0.01)
    52       GAM = MAX(GAM,0.1)
     51      SQSGT = MAX(SQRT(SIG),0.00001)
     52      GAM = MAX(GAM,0.00001)
    5353      FWHG = STOFW*SQSGT
    5454      PGL = FWHG**5
Note: See TracChangeset for help on using the changeset viewer.