Function BESSJ(N:Integer; X:Real):Real; var BJ,BJM,BJP,SUM,TOX,ANS:Real; J,JSUM,M:Integer; const IACC = 40; BIGNO =…
BJ-EPM240 源代码
汇集 BJ-EPM240 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
Function BESSJ(N:Integer; X:Real):Real; var BJ,BJM,BJP,SUM,TOX,ANS:Real; J,JSUM,M:Integer; const IACC = 40; BIGNO =…
unit Unit2; interface uses Windows, Messages, SysUtils, Classes, Graphics,unit1, Controls, Forms, Dialogs; procedure MMID(…
unit Unit2; interface uses Windows, Messages, SysUtils, Classes,unit1, Graphics, Controls, Forms, Dialogs; procedure RK4…
unit Unit2; interface uses Windows, Messages, SysUtils, Classes,unit1, Graphics, Controls, Forms, Dialogs; procedure RKD…
unit Unit2; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs; Function BESSJ1(X:rea…
#include #define ACC 40.0 #define BIGNO 1.0e10 #define BIGNI 1.0e-10 float bessj(n,x) int n; float x; { int j,jsum,m…
double bessj(int n, double x) { int iacc,j,m; double temp,bigno,bigni,ax,tox,bj,bjp,bjm,besj,jsum,sum; iacc = 40; b…
SCC = This is a Source Code Control file [UIBase.dsp] SCC_Aux_Path = "\\192.9.100.203\测试库\宣武环保" SCC_Project_Name = "$/2006051…
SCC = This is a Source Code Control file [WordOle.dsp] SCC_Aux_Path = "\\192.9.100.203\测试库\宣武环保" SCC_Project_Name = "$/200605…