OUTRES,ERASE !将 OUTRES 的参数重置
为其默认值;控制数据的存储 9
OUTRES,ALL,1 !
my_time=0
XX=0.2e-3 !XX,YY 用于定义局部坐标的原
点
YY=0.2e-3
!**** 高斯光束能量公式定义(GUI 方式自动
生成)****
!****GAUSS=2*P/(PI*(w0)^2)*exp(-2*({X}^2+
{Y}^2)/(w0)^2)****
LOCAL,11,0,XX,YY,height !定义局部坐标系
11
*DEL,_FNCNAME
*DEL,_FNCMTID
*DEL,_FNC_C1
*DEL,_FNC_C2
*DEL,_FNCCSYS
*SET,_FNCNAME,'GAUSS'
*DIM,_FNC_C1,,1
*DIM,_FNC_C2,,1
*SET,_FNC_C1(1),P !
*SET,_FNC_C2(1),w0 !
*SET,_FNCCSYS,11 !将方程坐标系设定为自
己定义的局部坐标系
! /INPUT,GAUSS.func,,,1
*DIM,%_FNCNAME%,TABLE,6,24,1,,,,%_FNC
CSYS%
!
! Begin of equation:
2*P/(PI*(w0)^2)*exp(-2*({X}^2+{Y}^2)/(w0)^2
)
*SET,%_FNCNAME%(0,0,1), 0.0, -999
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), %_FNC_C1(1)%
*SET,%_FNCNAME%(4,0,1), %_FNC_C2(1)%
*SET,%_FNCNAME%(5,0,1), 0.0
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 2, 0, 0,
17
*SET,%_FNCNAME%(0,2,1), 0.0, -2, 0, 1, -1, 3,
17
*SET,%_FNCNAME%(0,3,1), 0, -1, 0, 2, 0, 0,
18
*SET,%_FNCNAME%(0,4,1), 0.0, -3, 0, 1, 18,
17, -1
*SET,%_FNCNAME%(0,5,1), 0.0, -1, 0,
3.14159265358979310, 0, 0, -3
*SET,%_FNCNAME%(0,6,1), 0.0, -4, 0, 1, -1, 3,
-3
*SET,%_FNCNAME%(0,7,1), 0.0, -1, 0, 1, -2, 4,
-4
*SET,%_FNCNAME%(0,8,1), 0.0, -2, 0, 0, 0, 0,
0
*SET,%_FNCNAME%(0,9,1), 0.0, -3, 0, 1, 0, 0,
-2
*SET,%_FNCNAME%(0,10,1), 0.0, -4, 0, 1, -2, 2,
-3
*SET,%_FNCNAME%(0,11,1), 0.0, -2, 0, 2, 0, 0,
-4
*SET,%_FNCNAME%(0,12,1), 0.0, -3, 0, 1, -4, 3,
-2
*SET,%_FNCNAME%(0,13,1), 0.0, -2, 0, 2, 0, 0,
2
*SET,%_FNCNAME%(0,14,1), 0.0, -4, 0, 1, 2,
17, -2
*SET,%_FNCNAME%(0,15,1), 0.0, -2, 0, 2, 0, 0,
3
*SET,%_FNCNAME%(0,16,1), 0.0, -5, 0, 1, 3,
17, -2
*SET,%_FNCNAME%(0,17,1), 0.0, -2, 0, 1, -4, 1,
-5
*SET,%_FNCNAME%(0,18,1), 0.0, -4, 0, 1, -3, 3,
-2
*SET,%_FNCNAME%(0,19,1), 0.0, -2, 0, 2, 0, 0,
18
*SET,%_FNCNAME%(0,20,1), 0.0, -3, 0, 1, 18,
17, -2
*SET,%_FNCNAME%(0,21,1), 0.0, -2, 0, 1, -4, 4,
-3
*SET,%_FNCNAME%(0,22,1), 0.0, -2, 7, 1, -2, 0,
0
*SET,%_FNCNAME%(0,23,1), 0.0, -3, 0, 1, -1, 3,
-2
*SET,%_FNCNAME%(0,24,1), 0.0, 99, 0, 1, -3,
0, 0
! End of equation:
2*P/(PI*(w0)^2)*exp(-2*({X}^2+{Y}^2)/(w0)^2
)
!-->
!***************************************
**********
*DO,i, 0,10,1
LOCAL,11,0,XX,YY,height
评论5