故意伤害案件无罪辩护实录

(一)河北省**县人民检察院认定的基本事实（摘要）
被告人王影（化名）：基本情况及羁押情况略。
经依法审查查明：二00九年十月一日十七时许，在**县**饭店，被告人王影（化名）因结账与王宝宝（化名）发生争执，并对王宝宝进行殴打，后又行至**县钢材市场地磅处对王宝宝进行殴打，后逃离现场。当日十八时许，王宝宝被他人发现并经抢救无效死亡。
认定上述犯罪事实的证据有：一、被告人王影的陈述；二、证人李**等人的证言；三、现场看验笔录及照片；四、法医学尸体检验鉴定书、物证检验鉴定书。
本院认为，被告人王影故意伤害他人身体健康并致人死亡，其行为触犯了《中华人民共和国刑法》第二百三十四条第二款之规定，构成故意伤害罪。本案犯罪事实清楚，证据确实充分，应当以故意伤害罪追究其刑事责任。根据《中华人民共和国刑事诉讼法》第一百四十一条之规定，特提起公诉，请依法判处。
此致**县人民法院
二0一0年四月十三日

（二）被告人王影（化名）的有关陈述
问：你把那天下午喝酒的情况讲一下？
答：2009年10月1日下午4点多，我正在市场上，老二（指王宝宝）找到我叫我去喝酒，我同意了，我俩一起来到**饭店喝酒吃饭，我俩先要了一瓶白酒，点了几个菜，就一起喝酒聊天，喝完后又要了一瓶白酒，喝了多少我也记不清了，后来的事我就记不清了。
问：你俩的谈话的内容？
答：打牌，饭店的炒菜不好等闲聊内容。
问：在饭店喝酒时你与“老二”发生过争执或斗殴吗？
答：我喝多了我记不得了。
问：饭后你与“老二”去哪了？
答：我不知道了，怎么离开的饭店我记不得了，谁算的账我也记不得了。
问：你去过地磅那吗？
答：我记不得了，当天晚上我因喝多了酒，不知怎么就躺在村东的地里，半夜把我冻醒以后我回的地磅处小房里，当时小房门锁着，我从窗户那跳进去的。
--------
问：你以前向公安机关供述说，那天你同“老二”喝完酒后你去“*村”东面的耕地里睡觉了“老二”干什么去了？
答：我喝酒喝多了，不知道了。
问：你为何到耕地里睡觉？
答：我真喝酒喝多了，不知道了。
问：向王影（化名）出示公安机关在案发现场提取的一双布鞋。问：王影（化名）这双鞋是你的吗？
答：是。
问：有别人借过你这双鞋吗？
答：没有。
问：那天你是穿的这双布鞋吗？
答：我记不清了，因为喝酒喝多了，我只记得我在耕地里睡醒觉后，穿的是我的另外一双布鞋，这双布鞋在哪我不知道了。
问：这双鞋你平常穿吗？
答：就是这两双鞋替换穿。
问：你再仔细想一下，你同“老二”喝完酒后发生了什么事？
答：我真的喝多了，不知道了。
--------（略）

（三）王影涉嫌故意伤害罪辩护词

审判长、审判员：
作为王影（化名）的辩护人，依法参加今天的法庭审理。首先对死者的家属表示慰问和同情，这一结果是每个人都不希望发生的。但作为辩护律师，有责任依法维护法律的尊严与公正。法庭查明案件事实，依法作出公正判决，不仅是对死者及死者家属的交代，同时也是对被告人、对社会的交代。
辩护人总的辩护意见是：公诉机关对被告人王影故意伤害罪的指控，事实不清、证据不足，指控罪名不成立。理由如下：
1、**县公安局刑事科学技术室做出的（冀）公（*）鉴（法）字【2009】240号法医学尸体检验鉴定书明确认定：死者王宝宝（化名）系生前异物吸入导致机械性窒息死亡。
故意伤害致死的成立，客观上要求伤害行为与死亡结果之间具有因果关系。根据我国刑法的罪责自负原则，如果行为人的行为与危害结果之间不存在因果关系，那么其当然不对该结果负刑事责任。故本案中，王宝宝的死亡结果不应作为对王影定罪量刑情节予以考虑。
2、起诉书认定：“行至**县钢材市场地磅处对王宝宝进行殴打，后逃离现场。”公诉机关没有提出目击证人。也没有其他的直接证据。
案发现场的物证有：有尸体、血迹，带血迹的砖头，还有鞋子。这些都是间接证据。不能证明王影对王宝宝进行了殴打。公诉机关起诉书认定事实不清，证据不足，不能证明王影有罪。
我国刑事诉讼法第一百六十二条第(一)项规定,“案件事实清楚,证据确实、充分,依照法律认定被告人有罪的,应当作出有罪判决”。“事实清楚,证据确实、充分”因而被认为是法官作出有罪判决必须达到的证明标准。
根据法律规定和有关的司法解释，证据确实充分，具体是指达到以下标准：1、据以定案的每个证据都已查证属实；2、每个证据必须和待查证的犯罪事实之间存在客观联系，具有证明力；3、属于犯罪构成要件的事实均有相应的证据加以证明；4、所有证据形成一个证据锁链在总体上足以对所要证明的犯罪事实得出唯一结论，排除合理怀疑。
本案中，王影的供述，问：在饭店喝酒时你与老二发生过争执或殴斗吗？答：我喝多了我不记得。问：饭后你与老二 去哪了？答：我不知道了，怎么离开的饭店我都记不得了，谁算的账我也不记得。
国土资源部


关于统一图幅理论面积与图斑椭球面积计算要求的通知

（国土调查办发〔2008〕32号）


各省、自治区、直辖市第二次土地调查领导小组办公室，国土资源厅（国土环境资源厅、国土资源局、国土资源和房屋管理局、房屋土地资源管理局），解放军土地管理局、新疆生产建设兵团国土资源局：


面积计算是第二次土地调查的一项重要内容，国务院第二次全国土地调查领导小组办公室组织有关专家，依据《第二次全国土地调查技术规程》，对图幅理论面积与图斑椭球面积计算公式进行了细化，明确了面积计算方法，统一了公式中的有关参数，现将《图幅理论面积与图斑椭球面积计算公式及要求》予以印发，请各地严格遵照执行。



附：图幅理论面积与图斑椭球面积计算公式及要求



二〇〇八年三月二十七日

图幅理论面积与图斑椭球面积计算公式及要求

一、 图幅理论面积计算公式
（1）
式中：
a—椭球长半轴(单位：米)，α—椭球扁率，b—椭球短半轴(单位：米)。
е²﹦(a²﹣b²)/a²。
A﹦1﹢（3/6）е²﹢（30/80）е4﹢（35/112）е6﹢（630/2304）е8。
B﹦ （1/6）е²﹢（15/80）е4﹢（21/112）е6﹢（420/2304）е8。
C﹦ （3/80）е4﹢ （7/112）е6﹢（180/2304）е8。
D﹦ （1/112）е6﹢ （45/2304）е8。
E﹦ （5/2304）е8。
ΔL—图幅东西图廓的经差（单位：弧度）。
(B2﹣B1)—图幅南北图廓的纬差（单位：弧度），Bm﹦（B1﹢B2）/2。

二、椭球面上任意梯形面积计算公式
（2）
其中：A,B,C,D,E 为常数，按下式计算:
е²﹦(a²﹣b²)/a²
A﹦1﹢（3/6）е²﹢（30/80）е4﹢（35/112）е6﹢（630/2304）е8
B﹦ （1/6）е²﹢（15/80）е4﹢（21/112）е6﹢（420/2304）е8
C﹦ （3/80）е4﹢ （7/112）е6﹢（180/2304）е8
D﹦ （1/112）е6﹢（45/2304）е8
E﹦ （5/2304）е8
式中：a—椭球长半轴(单位：米)，b—椭球短半轴(单位：米)；
ΔL—图块经差(单位：弧度)； (B2﹣B1)—图块纬差(单位：弧度)
Bm﹦（B1﹢B2）/2。

三、高斯投影反解变换（ ）模型
（若坐标不带带号，则不需减去带号×1000000；）



+中央子午线经度值（孤度） （3）
式中：

公式说明：若坐标为没有带号前缀格式，则不需减去带号×1000000；若坐标为有带号前缀格式，则需减去带号×1000000。

四、计算用到的常数、椭球参数
在计算图幅理论面积与任意图斑椭球面积时，有关常数及保留的位数按给定数值计算。
常数：
π﹦3.14159265358979
206264.8062471
80椭球常数：
= 6378140 = 1/ 298.257
= 6356755.29
= 6.69438499958795E-03
= 6.73950181947292E-03
= 6399596.65198801
相关常数:
k0 = 1.57048687472752E-07
k1 = 5.05250559291393E-03
k2 = 2.98473350966158E-05
k3 = 2.41627215981336E-07
k4 = 2.22241909461273E-09

五、计算中的取位及要求
① 高斯投影反解变换后的B,L以秒为单位，保留到小数点后6位，四舍五入。
② 采用计算机计算时，所有变量数据类型均要定义为双精度。
③ 面积计算结果以平方米为单位，保留一位小数，四舍五入。
④ 各种比例尺标准分幅图经差、纬差见表1。
⑤ 在用大地坐标生成标准分幅图框时，要求在每条边框线的整秒处插入加密点。
表1 各种比例尺标准分幅图经差、纬差表
比例尺 1:100万 1:50万 1:25万 1:10万 1:5万 1:2.5万 1:1万 1:5千
经差 6º 3º 1º30′ 30′ 15′ 7′30″ 3′45″ 1′52.5″
纬差 4º 2º 1º 20′ 10′ 5′ 2′30″ 1′15″

六、任意图斑椭球面积计算方法
任意封闭图斑椭球面积计算的原理：将任意封闭图斑高斯平面坐标利用高斯投影反解变换模型，将高斯平面坐标换算为相应椭球的大地坐标，再利用椭球面上任意梯形图块面积计算模型计算其椭球面积，从而得到任意封闭图斑的椭球面积。
1、计算方法：
任意封闭区域总是可以分割成有限个任意小的梯形图块，因此，任意封闭区域的面积 ，式中Si为分割的任意小的梯形图块面积（i=1,2,…n）用公式(2)计算。
求封闭区域（多边形如图1）ABCD的面积 ，其具体方法为：
（1）对封闭区域（多边形）的界址点连续编号（顺时针或逆时针）ABCD，提取各界址点的高斯平面坐标A(X1,Y1)，B(X2,Y2)，C(X3,Y3)，D(X4,Y4)；
（2）利用高斯投影反解变换模型公式（3），将高斯平面坐标换算为相应椭球的大地坐标A(B1,L1)，B(B2,L2)，C(B3,L3)，D(B4,L4)；
（3）任意给定一经线L0（如L0＝60°），这样多边形ABCD的各边AB、BC、CD、DA与L0就围成了4个梯形图块（ABB1A1、BCC1B1、CDD1C1、DAA1D1）；
（4）由于在椭球面上同一经差随着纬度升高，梯形图块的面积逐渐减小，而同一纬差上经差梯形图块的面积相等，所以，将梯形图块ABB1A1按纬差分割成许多个小梯形图块AEiFiA1，用公式（2）计算出各小梯形图块AEiFiA1的面积Si，然后累加Si就得到梯形图块ABB1A1的面积，同理，依次计算出梯形图块BCC1B1、CDD1C1、DAA1D1的面积（注：用公式（2）计算面积时，B1、B2分别取沿界址点编号方向的前一个、后一个界址点的大地纬度，ΔL为沿界址点编号方向的前一个、后一个界址点的大地经度的平均值与L0的差）；
（5）多边形ABCD的面积就等于4个梯形图块（ABB1A1、BCC1B1、CDD1C1、DAA1D1）面积的代数和。

图1 椭球面上任意多边形计算面积
则任意多边形ABCD的面积P为：
P=ABCD= BCC1B1+ CDD1C1+ DAA1D1- ABB1A1
2、计算要求
① 利用图形坐标点将高斯坐标系下的几何图形反算投影到大地坐标系，进行投影变换。
② 任意指定一条经线L0，从选定多边形几何形状的起始点开始，沿顺时针方向依次计算相邻两点构成的线段，以及两点到指定经线的平行线构成的梯形面积。将该梯形沿纬度变化方向（Y轴）进行切割，至少需切割为2个部分。
③ 计算过程中应顺同一方向依坐标点逐个计算相邻两点连线与任意经线构成的梯形面积，坐标点不得有遗漏。若多边形包含内多边形（洞），则该多边形面积为外多边形面积减去所有内多边形面积之和。
④ 计算所有梯形面积的代数和即为该多边形的面积。
七、算法伪代码描述
为了确保编程使用的参数、算法一致，保证不同软件计算的椭球面积一致，我们用算法伪代码描述的方法对编程进行统一，在利用计算机编制椭球面积计算软件时，计算参数与计算顺序应严格按照以下代码执行。
1、参数说明
双精度类型：
圆周率值：PI = 3.14159265358979
中央经线:CenterL
RHO = 206264.8062471

A:ParamA
B:ParamB
C:ParamC
D:ParamD
E:ParamE

Const ZERO As Double = 0.000000000001

80椭球常数

椭球长半轴：aRadius = 6378140
椭球短半轴：bRadius = 6356755.29
椭球扁率：ParaAF = 1/ 298.257
椭球第一偏心率：ParaE1 = 6.69438499958795E-03
椭球第二偏心率：ParaE2 = 6.73950181947292E-03
极点子午圈曲率半径：ParaC = 6399596.65198801

k0:Parak0 = 1.57048687472752E-07
k1:Parak1 = 5.05250559291393E-03
k2:Parak2 = 2.98473350966158E-05
k3:Parak3 = 2.41627215981336E-07
k4:Parak4 = 2.22241909461273E-09

2、算法描述

初始化参数

Double e;
Double a;

e = ParaE2;
ParaC = aRadius / (1 - ParaAF);

ParamA = 1 + (3 / 6) * e + (30 / 80) * Power(e, 2) + (35 / 112) * Power(e, 3) + (630 / 2304) * Power(e, 4);

ParamB = (1 / 6) * e + (15 / 80) * Power(e, 2) + (21 / 112) * Power(e, 3) + (420 / 2304) * Power(e, 4);

ParamC = (3 / 80) * Power(e, 2) + (7 / 112) * Power(e, 3) + (180 / 2304) * Power(e, 4);
ParamD = (1 / 112) * Power(e, 3) + (45 / 2304) * Power(e, 4);

ParamE = (5 / 2304) * Power(e, 4);

参数初始化结束

中央经线转换为弧度
CenterL = TransDegreeToArc(CenterL)

选定本初子午线为参考经线
StandardLat = 0

For 起始点 To 倒数第二点

由高斯坐标反解计算经纬度值
ComputeXYGeo (PntColl.Point(i).y, PntColl.Point(i).x, B, L, CenterL)
ComputeXYGeo (PntColl.Point(i + 1).y, PntColl.Point(i + 1).x, B1, L1, CenterL)
将经纬度转换为弧度值
B = B / RHO
L = L / RHO
B1 = B1 / RHO
L1 = L1 / RHO

计算梯形面积
Double AreaVal;//梯形面积值
Double lDiference ;//经差
Double bDiference; //纬差
Double bSum;//纬度和
Double ItemValue(5);//计算变量

bDiference = (B1 - B0)；

bSum = (B1 + B0) / 2；

lDiference = (L1 + L) / 2;

ItemValue(0) = ParamA * Sin(bDiference / 2) * Cos(bSum);
ItemValue(1) = ParamB * Sin(3 * bDiference / 2) * Cos(3 * bSum);
ItemValue(2) = ParamC * Sin(5 * bDiference / 2) * Cos(5 * bSum);
ItemValue(3) = ParamD * Sin(7 * bDiference / 2) * Cos(7 * bSum);
ItemValue(4) = ParamE * Sin(9 * bDiference / 2) * Cos(9 * bSum);
AreaVal = 2 * bRadius * lDiference * bRadius * (ItemValue(0) - ItemValue(1) + ItemValue(2) - ItemValue(3) + ItemValue(4));

areaSum = areaSum + AreaVal;
Next

End Sub

3、高斯坐标反解算法

Public Sub ComputeXYGeo(x As Double, y As Double, B As Double, L As Double, center As Double)

Dim y1 As Double
Dim bf As Double

y1 = y - 500000

Dim e As Double

e = Parak0 * x

Dim se As Double

se = Sin(e)
bf = e + Cos(e) * (Parak1 * se - Parak2 * Power(se, 3) + Parak3 * Power(se, 5) - Parak4 * Power(se, 7))

Dim v As Double
Dim t As Double
Dim N As Double
Dim nl As Double
Dim vt As Double
Dim yn As Double
Dim t2 As Double
Dim g As Double

g = 1

t = Tan(bf)
nl = ParaE1 * Power(Cos(bf), 2)
v = Sqr(1 + nl)
N = ParaC / v
yn = y1 / N
vt = Power(v, 2) * t
t2 = Power(t, 2)
B = bf - vt * Power(yn, 2) / 2 + (5 + 3 * t2 + nl - 9 * nl * t2) * vt * Power(yn, 4) / 24 - (61 + 90 * t2 + 45 * Power(t2, 2)) * vt * Power(yn, 6) / 720

B = TransArcToDegree(B)

Dim cbf As Double

cbf = 1 / Cos(bf)
L = cbf * yn - (1 + 2 * t2 + nl) * cbf * Power(yn, 3) / 6 + (5 + 28 * t2 + 24 * Power(t2, 2) + 6 * nl + 8 * nl * t2) * cbf * Power(yn, 5) / 120 + center
L = TransArcToDegree(L)
End Sub

弧度转换为度
Public Function TransArcToDegree(arc As Double) As Double
Dim degree As Double
Dim min As Double
Dim sec As Double
Dim ret As Double
Dim tmp As Double
ret = arc * 180 / PI
degree = FormatValue(ret, 100, 100)
tmp = (ret - degree) * 60
min = FormatValue(tmp, 100, 100)
sec = (tmp - min) * 60
//秒保留到小数点后6位，四舍五入
sec = Format(sec, "####.000000") 'FormatValue(sec, 10000000, 100)
TransArcToDegree = degree * 3600 + min * 60 + sec
End Function

Private Function FormatValue(inputVal As Double, precsion As Long, scaleNum As Long) As Double
FormatValue = (Int(inputVal * precsion) - Int(inputVal * precsion) Mod scaleNum) / precsion
End Function