VC1 = VGCOD[1];   (1 >> G01)

IF [VGCOD[1] EQ 1] THEN G00

IF [VC2 EQ 1] THEN VC1=VGCOD[12]

------

VTOFH[15]    /// 125 MM

T15(H15)

VC1 = VHCOD   // 15

VC1 = VTOHD[VHCOD]  / // 125

VC2 = VTOFD[VDCOD]   // 10

 

https://cnc.im/library/ftp/5/syntec/main/4_1_syntec_main.html