[原创]RP Fiber Power——光纤端面反射 [复制链接]

有一个函数 set_R(channel,R1,R2)，用于定义某个正向传播信道在光纤两端面的反射率。 cC~
RW71  
这主要用于激光建模。 c~<;}ve^z  
例如，光纤激光器可定义为： ;,bgJgK  
pump := addinputchannel(P_p_in, l_p, 'I_p', 0, forward) y_m+&Oe  
signal_fw := addinputchannel(P_s_in, l_s, 'I_s', 0, forward) f|{iW E2d  
signal_bw := addinputchannel(P_s_in, l_s, 'I_s', 0, backward) ^xe+(83S2?  
calc set_R(signal_fw, 1, 0.90) K6DN>0sY  
在这里，激光波长的反射率在左端（带泵浦输入）为 100%，在右端（用于激光输出）为 90%。实际上，set_R()的调用将两个信道耦合在一起。（后向信道 signal_bw 没有明确指定，而是自动识别为相应的信道，因为它具有相同的波长。） ]B
O:*&O  
还可以定义反射镜内部和外部的局部损耗。 $a_y-lY  
注意，在调用 finish_fiber()之前必须调用函数 set_R()。 VWft/2p~  
nCYkUDnZ  
y[m,t}gi  
局部内部和外部损耗 Qx)b4~F?  
通过类似 set_loss_int(channel, loss_int1, loss_int2)的函数调用，可以定义局部功率损耗，分别应用于左侧或右侧光纤端面和对应端面镜之间的路径。换言之，这些损耗在端面镜反射前后（甚至在环形谐振腔中）均有效。 ` -_!%m/  
同样，通过 set_loss_ext(channel, loss_ext1, loss_ext2)可以定义适用于端面镜之外的局部功率损耗。 'rB%a<  
在任何情况下，损耗值必须介于 0 和 1 之间。例如，0.1 意味着 10%的功率损耗。前向传播光信道对光纤的有效输入功率为 P_in * (1 – loss_ext1) * (1 – R1) * (1 – l_int1)， (=j;rfvP  
其中 P_in 为输入功率，R1 为左侧的反射率。正向传播光信道的有效输出功率将为 P_fiber* (1 – l_int2) * (1 – R2)* (1 – loss_ext2)，其中 P_fiber 是光纤端面的功率，R2 是右侧的反射率。 UWT%0t_T  
GD4S/fn3  
对于相应的反向传播光信道，这些损耗不必单独设置。 yd;e;Bb7*  
通过函数 sp_gain()、sp_gain_dyn()和 NF()考虑设置的局部损耗。 ovKM;cRs/