相交管道曲面的编程可以通过以下步骤实现：
启动 PATRAN
在xterm窗口中输入 `p3` 启动 P3/PATRAN。
打开数据库
使用命令 `open database （pipe.db）` 打开一个名为 `pipe.db` 的新数据库。
定义变量
在命令窗口中输入 `real rad_1 = 1., rad_2 = 0.5` 定义两个实数变量 `rad_1` 和 `rad_2`，分别代表两个圆柱体的半径。
创建几何图形
创建点：
输入 `point coordinate list ['rad_1' 0 0]` 创建一个点，该点坐标为 `（rad_1, 0, 0）`。
创建曲线：
输入 `curve axis total angle point list create curve 1` 创建一个轴，总角度为0度，点列表为 `['rad_1' 0 0]`，表示一个通过原点的轴。
输入 `curve rotate 0 0 0 90.0` 将该轴旋转90度，使其与x轴重合。
创建曲面：
输入 `surface method create` 创建一个曲面，该曲面由上述曲线生成。
验证结果
更改变量 `rad_1` 和 `rad_2` 的值并执行函数以验证其是否有效。
通过以上步骤，可以在PATRAN中创建一个相交管道曲面，并通过调整变量 `rad_1` 和 `rad_2` 的值来观察曲面的变化。这种方法适用于参数化建模，可以方便地解决不同半径管道相交的问题。