Freint, an integration routine calculating Fresnel diffraction

Title of program: FREINT Catalogue Id: ACUB_v1_0 Nature of problem FREINT evaluates the integral A(x) exp(i q (x'-x)^2) dx [i= (-1)^1/2, x = xi,xf] occurring in optical transfer theory. By application of this integral the wave amplitude A(t+d;x') at a plane z = t+d can be calculated on some premises from the amplitude field A(t;x), e.g. in electron microscopy if an object is imaged in a defocussed mode (catchword : Fresnel diffraction). A(x) is given by a complex vector. CORRECTION SUMMARY: Vol:Year:Page 0:unpublished:unpublished "000ACORRECTION 27/11/78" "Unpublished correction to FREINT: an integration routine calculating Fresnel diffraction." W.J. Gruschel Note: correction instructions are contained in source code Versions of this program held in the CPC repository in Mendeley Data ACUB_v1_0; FREINT; 10.1016/0010-4655(79)90086-9 This program has been imported from the CPC Program Library held at Queen's University Belfast (1969-2019)程序名称：FREINT 目录编号：ACUB_v1_0 问题本质 FREINT用于计算积分∫(x=xi到xf) A(x)exp[iq(x'-x)²]dx（其中i为虚数单位，满足i²=-1，即√(-1)），该积分出现于光学传递理论中。通过应用该积分，可以在若干前提条件下，由振幅场A(t;x)推导出平面z=t+d处的波振幅A(t+d;x')；例如在电子显微学中，当物体采用散焦模式成像时（主题词：菲涅耳衍射（Fresnel diffraction））。其中A(x)为复矢量（complex vector）。 校正摘要： 卷:年份:页码 0:未出版:未出版 “000ACORRECTION 27/11/78” “对FREINT的未出版校正：一款用于计算菲涅耳衍射的积分程序” W.J. Gruschel 注：校正说明已包含于源代码中。 本程序收录于门德列数据（Mendeley Data）的CPC知识库中，版本信息为ACUB_v1_0；关联程序FREINT；DOI：10.1016/0010-4655(79)90086-9。 本程序源自贝尔法斯特女王大学馆藏的CPC程序库（1969-2019）