如何使用利普刀

所谓“利普刀”，是欧美广泛运用的Leep术，其通过细如发丝一样的高频电波丝来完成宫疾病的治疗。它通过圆形、方形、三角形电极来修复宫颈管组织，可以达到传统治疗达不到的非常精细的手术效果，不会造成的组织拉扯、炭化的现象，对周围组织伤害小，留下瘢痕的机会小，并发症少。手术时间短， *** 作简单，仅用局部麻醉，不必住院，为患者减少了治疗费用，从而让越来越多的女性提供了健康保证。

“利普刀”治疗宫颈糜烂前，应排除有宫颈癌的可能性。因为早期的宫颈癌与宫颈糜烂外观十分相似，一般用肉眼无法鉴别，需要做一个宫颈涂片或活检来了解有无宫颈恶性疾病的存在。假如有宫颈癌而误用了利普刀治疗，不仅会延误宫颈癌的治疗，还会使癌细胞扩散。另外，治疗前几天尽可能不要同房，若一定要有性生活，最好使用避孕套。

“利普刀”治疗宫颈糜烂，一般选在月经干净3-7天内进行，因为治疗之后宫颈会有一定的创面，如正逢月经期间则易发生感染。

采用“利普刀”热凝治疗后，一般来讲，创面需要约2个月的时间愈合。在此期间，尽可能避免同房，减少对宫颈的刺激，因为同房不仅由于机械刺激影响宫颈创面的愈合，还可能引起阴道炎症，从而会影响宫颈正常组织的修复。

治疗后，往往由于创面的愈合，会出现大量的阴道排液，有时会给患者带来一定不便。医生在治疗时应向患者交代清楚，以免患者以为出现了什么异常。患者应保持外阴的清洁，勤洗外阴，但不要自行使用阴道栓或进行阴道冲洗。要勤换内裤，必要时使用卫生垫等。在治疗后的一两个月，要到医院复查，了解宫颈创面的愈合情况，以便早日康复。

目前，妇科Leep术工作站运用阴道镜诊断和Leep术治疗宫颈病变，如宫颈糜烂、宫颈息肉、宫颈湿疣、子宫颈上皮内瘤病变及宫颈肥大、宫颈陈旧性裂伤等，在治疗病灶的同时，可保留子宫，保留年轻患者的生育能力。

我上星期刚做完leep，花了一千三。

手术过程中有点痛，但还可以忍受。做完以后大概疼了三个小时，然后就完全不疼了。

术后要用消炎、止血药、防感染的一些药物。

术后最好卧床休息1周。而且隔一天要到医院冲洗上药，直至创面基本愈合，大约持续两周。

术后14天左右开始脱痂，会有比较多的分泌物。

术后3个月内禁止性生活、游泳、盆浴、剧烈运动等。

想做的话，建议安排好时间。手术当天最好休息，尽量保证隔日去医院冲洗上药，这样对愈合有好处，自己在家冲洗上药的效果实在不理想。

手术问题不大，正规医院都做的比较好。手术后全靠上药和休养了。

如果还有疑问的话，多向医生咨询吧。

#include "Stdio.h"

#include "Conio.h"

/*L是矩阵的行减1,从程序上看是最外层循环的次数

N 对应矩阵的行数，M对应矩阵的列数

可以通过改变L、N、M来控制矩的阶数 */

#define L 3

#define N 4

#define M 5

void gauss(double a[N][M],double x[N])

{int i,j,l,n,m,k=0

double temp[N]

/*第一个do-while是将增广矩阵消成上三角形式*/

do{n=0

for(l=kl<Ll++)temp[n++]=a[l+1][k]/a[k][k]

for(m=0,i=ki<Ni++,m++)

for(j=kj<Mj++)a[i+1][j]-=temp[m]*a[k][j]

k++

}while(k<N)

/*第二个do-while是将矩阵消成对角形式，并且重新给k赋值*/

k=L-1

do{n=0

for(l=kl>=0l--)temp[n++]=a[k-l][k+1]/a[k+1][k+1]

for(m=0,i=ki>=0i--,m++)

for(j=kj<Mj++)a[k-i][j]-=temp[m]*a[k+1][j]

k--

}while(k>=0)

/*下一个for是解方程组*/

for(i=0i<Ni++)x[i]=a[i][N]/a[i][i]

}

void menu()

{printf("\n _ _ _ _ _\n")

printf(" 1.operation\n")

printf(" 2.exit")

printf("\n _ _ _ _ _\n")

}

main()

{int i,j,choose

double a[N][M]={0},answer[N]

clrscr()

while(1){

leep:menu()

scanf("%d",&choose)

switch(choose){

case 1:

printf("!!The size of Maxrix is %d * %d,each line enter %d element:\n ",N,M,M)

for(i=0i<Ni++)

{printf("Enter the Matrix's %d line:\n",i)

for(j=0j<N+1j++)

scanf("%lf",&a[i][j])

}

printf("\nthe corss matrix is:\n_ _ _ _ _\n")

gauss(a,answer)

for(i=0i<Ni++)

{for(j=0j<Mj++)

printf("%-2lf ",a[i][j])

putchar('\n')

}

printf("_ _ _ _ _\nthe solve is:\n")

for(i=0i<Ni++)printf("x%d=%lf\n",i+1,answer[i])

break

case 2:

exit(0)break

default:printf("input error:\n")goto leep

}

}

getch()

}

/*试验：

西安交通大学出版社出版的《计算方法》书上28页的例2.1:

1 2 3 -4 -2

_ -3 -4 -12 13 5

A= 2 10 0 -3 10

4 14 9 -13 7

试验结果：x1=1,x2=2,x3=3,x4=4 */

---