--> exec('E:\My program EM\7. Transmission of power\7.3.sce', -1)
The length of crossbelt L=6390.03 mm