|
✪两套软件Intel Fortran源码按单元模块整理上传，模块相对独立，便于调用。点击模块名称，弹出代码资源，下载链接文件。 ✪代码模块简介主要包括：模块名称，基本功能，模块源码，算法公式，地球物理模型，调用模块源码。
2020-07-11
不规则采样的一维拉格朗日插值、牛顿插值和B样条插值算法软件包。模块源码：Interp1d.f90
2020-07-08
大地测量、测量平差大型法方程解算软件包。解算方法包括：奇异值分解法、共轭梯度法、Guass-Jordon法、平方根法和岭估计法。模块源码：Equation.f90
2020-07-08
大地测量各种形式时间系统高精度相互转换软件包。模块源码：TimeTrans.f90
2020-07-08
地球坐标系统中各种形式大地测量三维坐标形式变换包。
2020-07-08
根据给定的经纬度、起止时间（ETideLoad3.0格式）、时间间隔（分）、时区号，由大气潮负荷球谐系数模型（hPa），预报全球任意地面/海面处大气压（hPa）。模块源码：TideairPress.f90地球物理模型：（1）大气压球谐系数模...
2020-07-08
由分潮Doodson常数（整数，如M2分潮为255555），计算分潮的相位偏差（度）。算法公式：IERS2010标准的Table6.6, Table6.7。模块源码：TBiasTide.f90
2020-07-08
根据给定的经纬度、起止时间（ETideLoad3.0格式）、时间间隔（分）、时区号，由海潮负荷球谐系数模型（cm），预报全球任意海面处潮高值（cm）。模块源码：TidehOload.f90地球物理模型：海潮球谐系数模型FES2004S1.d...
2020-07-08
由分潮Doodson常数（整数，如M2分潮为255555）和MDJ天，计算分潮的交点因子f和交点订正角μ（度）。模块源码：CalcTidefu.f90
2020-07-08
由地面数字高程模型、地面大地高数字模型和地形一阶水平梯度格网，按严密积分公式，计算地面及地球外部点扰动重力的局部地形影响（mGal）。程序适合大地水准面及其外部近地空间点计算。地面扰动重力局部地形影响的平面近似，等于传统地形改正的负值。模块...
2020-07-08
由地面数字高程模型、地面大地高数字模型和地形二阶水平梯度格网，按严密积分公式，计算地面及地球外部点扰动位的局部地形影响（m2/s2）。程序适合大地水准面及其外部近地空间点计算。模块源码：LRlfBLHdPotent.f90算法公式：《PAL...
2020-07-08
采用最小二乘参数估计法，由格网模型及其所在面的大地高格网数字模型，估计格网模型格值的2阶水平梯度（单位为 /m2）。常用于重力场积分奇异值计算。模块源码：HGradientTwo.f90调用模块：（1）大地坐标转换为球坐标模块BLH_RLAT
2020-07-08
采用最小二乘参数估计法，由格网模型及其所在面的大地高格网数字模型，估计格网模型格值的一阶水平梯度（单位为 /m）。常用于重力场积分奇异值计算。模块源码：HGradientOne.f90调用模块：（1）大地坐标转换为球坐标模块BLH_RLAT...
2020-07-08
由地面数字高程模型、地面大地高数字模型和空间计算点文件，按严密积分公式，计算地面及地球外部点高程异常（m）、扰动重力（mGal）、空间异常（mGal）或扰动位（m2/s2）的局部地形影响。模块源码：LTerInfluNintg.f90算法公...
2020-07-08
由地面或地球外部空间计算点文件，和超高阶重力场位系数模型文件，计算地球空间任意点处的高程异常（m）、空间异常（mGal）、扰动重力（mGal）、垂线偏差向量（s，ʺ/秒，南向、西向）、（垂向）扰动重力梯度（E）、水平重力梯度向量（E，北向、...
2020-07-08
采用改进的Belikov递推算法，计算超高阶规格化缔合勒让德函数；同时采用非奇异递推算法，计算超高阶规格化缔合勒让德函数对θ的一阶、二阶导数。测试完成5400阶规格化缔合勒让德函数及其一、二阶导数的快速稳定计算，未开展更高阶测试工作。模块源...
2020-07-08
由正常地球椭球参数，按严密球谐级数展开式，计算偶数阶正常地球引力位系数J2n（n=2,3,...）。模块源码：normdjn.f90算法公式：《PALGrav.0用户操作手册》式（1.1）~（1.2）。
2020-07-08
计算勒让德函数Pn(cosθ)及其对θ的一、二阶导数。代码适合低阶勒让德函数计算。算法公式：重力场及大地水准面精化系统《用户操作手册》式（1.12）~（1.18）。模块源码：LegPn_dt2.f90
2020-07-08
由正常地球椭球参数，采用严密的球谐级数公式，计算地球空间点的正常重力位（m2/s2）、正常重力（mGal）、正常重力梯度（E）、正常重力线方向（'，用其相对于地心的北偏角表示）或正常重力梯度方向（'，用其相对于地心的北偏角表示）。算法公式： |
