Find,Face,Fight,Fix,Fun
  • Mapgis二次开发在地球物理中的应用

    2010-05-26

    近期关注

    作者:大笨蛋 | 分类目录:Geophysics | 标签:
  • 由Surfer的等值线Srf文件直接得到网格Grd文件

    2010-02-05

    有的时候,仅仅只有Srf工程文件,没有网格文件。

    比如网格文件丢失,比如对方仅仅给了Srf工程文件,在需要对数据进行琢磨时可以利用如下办法得到网格文件

    打开Surfer等值线,选中,运行如下Surfer脚本语言

    Sub Main
    Dim Surf As Object
    Dim plotdoc1 As Object
    Dim shapes1 As Object
    Dim mapframe1 As Object
    Dim ovrly As Object
    Dim grd As String

    Debug.Print “—– “;Time;” —–”
    Set Surf = GetObject(,”surfer.application”)
    Set plotdoc1 = Surf.ActiveDocument
    Set shapes1 = plotdoc1.Shapes
    Set mapframe1 = plotdoc1.Selection(1)
    For Each ovrly In mapframe1.Overlays
    ‘Vector map Not included. srfShapeVectorMap = 23.
    Debug.Print ovrly.Type;InStr(” 15 16 19 20 22″, ovrly.Type)
    If InStr(” 15 16 19 20 22″,ovrly.Type) <> 0 Then _
    ovrly.Grid.SaveFile(GetFilePath(ovrly.Grid.FileName,”grd”, _
    “c:\incoming\”,”Save GRD File”,3),Surfer.srfGridFmtS7)
    Next ovrly
    End

    End Sub

    即可

    作者:大笨蛋 | 分类目录:Geophysics | 标签:
  • 瞬变电磁2.5维正演

    2009-12-28


    作者:大笨蛋 | 分类目录:Geophysics | 标签:
  • 4年前对Geophysics的认识

    2009-12-13

    好几年前的课程作业,当时什么也不懂,对专业的认识蛮有趣。现在什么都想懂,却什么弄也不懂。
    正演问题。就像。有人跟你提起了你的一位朋友。你开始在脑海中回忆你的这位朋友鲜明的个性特征,于是你可以得到一系列关于你这位朋友的信息。这就是,给定了一个地质模型,运用一定的地球物理方法,一定的装置下,测量得到一系列的观测值,比如视电阻率等等。

    反演问题,就像,有人跟你提起了你的一位朋友的一系列的个性特征信息,而你,需要根据这些信息,回忆思考判断,这位被提起的朋友究竟是谁。这就是,给定了一系列的观测值,一定的地球物理方法,一定的地质模型的先验信息,计算推得地下的地质构造模型。比如由视电阻率值反演得到地下的电阻率分布情况。 Read More »

    作者:大笨蛋 | 分类目录:Geophysics | 标签:
  • Geophysical Online Articles

    2009-12-13

    排名无先后,术业有专攻
    >>>–阅读更多–>>>
    Read More »

    作者:大笨蛋 | 分类目录:Geophysics | 标签: