Timetable file traindef.ttt

   1  # { [ (
   2
   3  $REQUIRE REPLACE.TTT
   4  $REQUIRE STREETDEF.TTT
   5  $REQUIRE ZSZ_DEF.TTT
   6  $REQUIRE JMD_DEF.TTT
   7  #------------------------------------------------------------------------------
   8  #
   9  # Semitrailer
  10  #
  11  $DEF AUFLIEGER=STRR|STRL
  12  #------------------------------------------------------------------------------
  13  #
  14  # Aggregates
  15  #
  16  $DEF AG40D=(CA_002_N0|FR_KO36|GRAV|FR_KO38|FR_HACK05|FR_SCH06|FR_SZ11|FR_SZ12|SOIL3|BRIQUETTE|CLAY16|   \
  17      SOIL4|FR09|FR_KO39|SOIL1|SOIL6)(|[M])
  18  $DEF AG45D=(FR_HACK03|FR_KO18|FR_HACK08|FR_SAND2|SOIL2|SOIL5|BALLAST05|COAL36|FR_KO16|CLAY15|FEAR_A_C1) \
  19      (|[M])
  20  $DEF AG50D=(FR_HACK02|FR_KO17|FR_KO8|SAND14|FTP_NL251_N0|FR28|FR_ORE02|FR_HACK04|FR_HACK06|FR_KO9|      \
  21      CLAY14)(|[M])
  22  $DEF AG55D=(FR_KO28|FR_KO29|STONE2|FTP_NP151_N0|FR_KO07|FR_KO15|FR_ORE03|BALLAST45|BALLAST46|FR_KO46|   \
  23      FAP_L_N1|FR_KO10|FR_KO11|FR_KO43|FVS_V2012_N0)(|[M])
  24  $DEF AG60D=(FR_ORE01|BALLAST18|FR_KO42|FR_REPA1|SOIL22|FR_ERZ02|FR_KO27|BALLAST19|BALLAST43|FR_ERZ06|   \
  25      FR_KO44|FR_ERZ21|FR_SAND1)(|[M])
  26  $DEF AG65D=(FR_AG03|FR_REPA2|FR_KO12|FR_KO13|FR_PO01|FAP_L_N2|FAP_L_N0|FTP_P101_N1|FR_KO23|FR_ERZ22|    \
  27      SAND15|FVS_V2012_N2|BALLAST11|FR_KO14|FS_L3R_N1|FS_L3R_N2|SAND5|FR_BRAM|BALLAST16|FR_PISEK1|        \
  28      FR_KO20|FR_KO21|FR_KO22|FR_KO34|FR_GRAVEL1|BALLAST01|BALLAST02|FVS_V2012_N1)(|[M])
  29  $DEF AG70D=(FR_ERZ20|BALLAST12|FR_PISEK2|COAL20|FR_SKLPISEK|FVB_V401_N2|FVB_V401_N1|FVB_V401_N0|        \
  30      FR_ERZ19|FR_RIZKY|FTP_NF131_N1|FR_SUTR|FR_PALIVO)(|[M])
  31  $DEF AG75D=(BALLAST14|FR_KO19|BEET1|FR_KO30|SOIL7|SOIL8|FER4|FER3|FR_ERZ18|FR_PISEK|FR_KO33|FR_KO35|    \
  32      FR_UHLI|FR_ERZ17|FR_ERZ05|BALLAST13|BALLAST15|BETTERAVES_2E1|BETTERAVES_2E2|FR_KO45)(|[M])
  33  $DEF AG80D=(FR06|COAL23|FR_ERZ04|FR_ERZ10|FR_KO31|COAL9|FR_ERZ09|FR_SAND3|FR07|FR_AG05|FR_KO32|FR_KO37) \
  34      (|[M])
  35  $DEF AG85D=(JR_HOKI9500BS|BALLAST20|BALLAST17|BALLAST50|FER1|FER2|FR_COAL1|BALLAST48|BALLAST49|         \
  36      FR_COAL2|FP_P614N0|BALLAST23)(|[M])
  37  $DEF COAL100=GRAVEL10|COAL27|COAL28|FR_UH3|FR_UH1|BALLAST09|COAL30|FR10|FR25|COAL29|FR_UH4|COAL31|COAL32
  38  $DEF SAND100=SAND(10|11|12|6|7|9)
  39  $DEF AG120D=(FR20|COAL21|BALLAST27|BALLAST29|BALLAST32|BALLAST34|BALLAST35|FR02|FR22|COAL1|BALLAST26|   \
  40      BALLAST28|BALLAST33|BALLAST04)(|[M])
  41
  42  $DEF AG50=AG50D|3:AG45D|AG40D
  43  $DEF AG55=AG55D|3:AG50D|AG45D
  44  $DEF AG60=AG60D|3:AG55D|AG50D
  45  $DEF AG65=AG65D|3:AG60D|AG55D
  46  $DEF AG70=AG70D|3:AG65D|AG60D
  47  $DEF AG75=AG75D|3:AG70D|AG65D
  48  $DEF AG80=AG80D|3:AG75D|AG70D
  49  $DEF AG85=AG85D|3:AG80D|AG75D
  50  $DEF AG120=AG120D
  51  #------------------------------------------------------------------------------
  52  #
  53  # Wood
  54  #
  55  $DEF W125=WOOD16|WOOD54|WOOD57|WOOD55|WOOD56|WOOD24|FR_WOOD9|WOOD127
  56  #------------------------------------------------------------------------------
  57  #
  58  # Other loads
  59  #
  60  $DEF LD100D=SQUAREPIPE|PIPE16|PIPE21|PIPE23|PIPE43|PIPE22|PIPE26|FR_CP2|FR_SP|FR_CP|PIPE52|PIPE32|      \
  61      PIPE3|PIPE2|BOX_BMW|BOX33|MOTOR5|MOTOR4|BOILER1|BOILER4|BOILER5|TANK1|TANK2|HIPRES_BURNER|          \
  62      LORRYCHASSIS1|BOILER2|SILO1|TARP11|TARP9
  63  $DEF LD125D=CHIMNEY2|CHIMNEY1|PIPE8|PIPE5|PIPE4|PIPE7|PIPE13|PIPE_HES_HALBERG|PIPE6|CABLE12|            \
  64      (CABLE1,15,CABLE1)|(CABLE17,3*(10,CABLE17))|(CABLE18,15,CABLE18,15,CABLE18)|ROPEDRUM|               \
  65      SHIPMOTORAXLE|BOILERRINGS|BOILER3|SOFFIT
  66  $DEF LD180D=PIPE40|PIPE19|PIPE17|PIPE18|PIPE39|STEEL12|STEEL9|TANK3|MACHINE1|MACHINE2|MACHINE3|REACTOR1
  67
  68  $DEF LD125=5:LD125D|3:LD100D
  69  $DEF LD180=5:LD180D|3:LD125D|LD100D
  70  #------------------------------------------------------------------------------
  71  #
  72  # General Europe
  73  #
  74  $DEF G_SHIM1=DB_SHIMMNS_TU718(_3|_4|B3|B4|B7)(|L)
  75  $DEF G_SHIM2=DB_SHIMMNS_TU720_(1|2|3|4|5|6)(|L)
  76  $DEF G_SHIM3=DB_SHIMMNS_TTU722_(6|7|8|9|10|11)(|L)
  77  $DEF G_SHIM4=DB_SHIMMNS_TTU723(_1|_2|_3|_4|G1|B2|B4|B6|BG1|BG3)(|L)
  78  $DEF G_SHIM=G_SHIM(1|2|3|4)
  79
  80  $DEF G_HBIS=2:DB_HBIS_T297(A|B|C)(|L)|DB_HBIS_WW299A(|L)|4:DB_HBIS299(|A|B|C|D|E|F|G|GL|H|HL)|          \
  81      3:DB_HBBIS306(A|B|C|D)(|L)
  82
  83  $DEF G_OIL1=ERMEWA_7837302|VTG_Z1|SIESS_1|SIESS_2|VTG_7|VTG_3|MINOL_7967200|VTG_8|VTG_Z2|               \
  84      MINOL_7845444|DB_KW4_1|ONRAIL_8|ONRAIL_8L|ONRAIL_2|ONRAIL_2L|NACCO_6|NACCO_6L|NACCO_5|NACCO_5L|     \
  85      NACCO_1|NACCO_1L|NACCO_4|NACCO_4L|NACCO_3L|NACCO_2|NACCO_2L|WASC_19|WASC_19L|WASC_18|WASC_18L|      \
  86      WASC_17|WASC_17L
  87
  88  # Extrem kurze Containerwagen
  89  $DEF C_EXTREMKURZ=DB_3BT10[O:C20B|CT61|C20SP|C30A|C30A|WB70|WB70|WB70|WB70,,12]
  90
  91  # Kurze Containerwagen
  92  $DEF CKURZW=4:SJ_LGNS2|                                                                                 \
  93      1:(G_LGS1|M_443LGS|M_LGS|GO43|G055|GO44|GO57|SNCF_LGS_NV|SNCF_LGS_NC|RF_LFGSS|SNCB_LGNSS1|          \
  94      RF_LGNSS1L|RF_LGNSS1|RF_LGNSS2L|RF_LGNSS2|RF_LGNSS3L|RF_LGNSS3|RF_LGSS1L|RF_LGSS1|RF_LGSS2L|        \
  95      RF_LGSS2|DB_LGNS570|SJ_LGNS2)
  96  $DEF C_KURZ=CKURZW[O:C20B|C20B|CT61|C20SP|C30A|C30A|C40B|C40B|C40B|C40B|WB70|WB70]
  97
  98  # Kurze Containerwagen, differenziert beladen
  99  $DEF C_KURZ_DIFF=CKURZW[O:2@C20B]|CKURZW[O:2*C20B]
 100
 101  # Lange Containerwagen
 102  $DEF CLANGW=4:SJ_SDGMS|AAE_SGSS_Y703|EVB_SGNS4558A|G_SGNS10|G_SGNS11|G_SGNS12|G_SGNS13|G_SGNS14|        \
 103      G_SGNGS18|G_SGNGS19|G_SGNGS20|G_SGNGS21|G_SGNGS22|G_SGNGS23|SBB_SGNS|GO48HUPAC|GO48FRET|GO48SNCF|   \
 104      GO48SEGI|GO48MAV1|GO48MAV2|GO48MAV3|SJ_SDGMS|G_SGNS3|G_SGNS8|G_SGNS7|G_SGNS1|G_SGNS4|G_SGNS5|       \
 105      G_SGNS6|G_SGNS9|G_SGNS2|G_SGNS15|G_SGNS16|M_457SGNS1|M_457SGNS2|M_457SGNS3|M_457SGNS4|M_457SGNS5|   \
 106      M_457SGNS6|AAE_SGNSS60|HUPAC_2|HUPAC_196|SBB_SGNS1L|SBB_SGNS1|G_SGS1|G_SGS2|G_SGS3|G_SGS4|          \
 107      M_454SGS|M_454SGS4|M_SGNSSL|M_SGNSS|M_454SGS2|M_454SGS3|CFL_SLPS1L
 108  $DEF C_LANG=CLANGW[O:C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90]
 109
 110  # Lange Containerwagen, differenziert beladen
 111  $DEF C_LANG_DIFF=CLANGW[O:2@CT61|C30A|C30A|C30A|C30A|WB70|WB70|WB70|WB70]|                              \
 112      CLANGW[O:2*CT61|C30A|C30A|C30A|C30A|WB70|WB70|WB70|WB70]|CLANGW[O:3@C20B|C20B]|CLANGW[O:3*C20B]|    \
 113      CLANGW[O:(C20B,C4)]|CLANGW[O:(C4,C20B)]
 114
 115  $DEF EUR6FCONW=C_EXTREMKURZ|C_KURZ|C_KURZ_DIFF|C_LANG|C_LANG_DIFF
 116
 117  # Intermodal-Kombiverkehr
 118
 119  # Doppeleinheit
 120  $DEF F6DOPPEL=(<DB_SDGGMRSSL[OB:AUFLIEGER,,5]|                                                          \
 121      DB_SDGGMRSSL[O:C30A|C30A|C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90|WB90|WB90,,12]|                     \
 122      DB_SDGGMRSSL[O:2@C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]|                                     \
 123      DB_SDGGMRSSL[O:2*C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12],                                     \
 124      DB_SDGGMRSS[OB:AUFLIEGER,,5]|                                                                       \
 125      DB_SDGGMRSS[O:C30A|C30A|C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90|WB90|WB90,,12]|                      \
 126      DB_SDGGMRSS[O:2@C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]|                                      \
 127      DB_SDGGMRSS[O:2*C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12])
 128
 129  # Taschenwagen
 130  $DEF F6TASCHENW=4:(SJ_SDGMS833L|SJ_SDGMS833)|                                                           \
 131      1:(DB_SDKMS707L|DB_SDKMS707|DBAG_SDKMS707L|DBAG_SDKMS707|DBC_SDKMS707L|DBC_SDKMS707|OBB_SDGKKLMS|   \
 132      OBB_SDGKKMSSL|OBB_SDGKKMSS|SBB_SDGKKLMS|HUPAC_4SGGNOSL|HUPAC_4SGGNOS|HUPAC_5SGGNOSL|HUPAC_5SGGNOS|  \
 133      SNCF_SDKMMSL|SNCF_SDKMMS|SNCF_KANGB_SEGI|SEGI_K67L|SEGI_K67|SEGI_KBL|SEGI_KB|SEGI_KML|SEGI_KM|      \
 134      SNCF_SDKMMS_NOVATRANSML|SNCF_SDKMMS_NOVATRANSM|SNCF_KANGB_NOVATRANS|SNCF_SDKMMS_CNCL|               \
 135      SNCF_SDKMMS_CNC|SNCF_KANGB_CNC_VI|SNCB_SDKMSS_EL|SNCB_SDKMSS_E|SNCB_SDKMSS_OL|SNCB_SDKMSS_O|        \
 136      BCAR_SDKMSL|BCAR_SDKMS|NS_SDKMMSS_TRAILSTARL|NS_SDKMMSS_TRAILSTAR|DSB_SDKMSL|DSB_SDKMS|             \
 137      SJ_SDGMS833L|SJ_SDGMS833|FS_SDGKKMMSL|FS_SDGKKMMS|GO47_CNC|SNCF_S73)
 138
 139  # Intermodal-Kombiverkehr mix
 140  $DEF EUR6FKOMBIW=F6DOPPEL|F6TASCHENW[OB:AUFLIEGER,,5]|                                                  \
 141      CLANGW[O:C30A|C40B|C40B|C40B|C40B|CL45_C48|WB90|WB90|WB90|WB90,,12]|                                \
 142      CLANGW[O:2@C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]|                                           \
 143      F6DOPPEL[O:2*C20B|C20B|CT61|C20SP|WB70|WB70|WB70|WB70,,12]
 144
 145  #  Container train EP 6 Freight
 146  $DEF EUR6FKOMBI=6-9*(EUR6FCONW|EUR6FKOMBIW|EUR6FCONW|EUR6FCONW)
 147
 148  #----------------------------------------------------------------------------------------------------
 149  #
 150  #Middle Europe Freight
 151
 152  # Container
 153
 154  # EP 6  Freight long Container 1
 155  $DEF Z_D_E6_C1=(<DBC_LGNS570_0L[O:C4I_PO3|C4I_MOL1,21,12],                                              \
 156      DBC_LGNS570_0L[O:C4R_CHY|C4R_CHINA3|C4I_LATEXA2|C4I_HANJIN1|C4R_BERTSCHI_DSM|C4S_FEHRING,21,12],    \
 157      DBAG_SGGMRS715[O:C4R_HAMBURG2|C4R_GEEST1|C4R_DHL1|C4R_COSCO|C4R_CMACGM,17,11]                       \
 158      [O:C4R_KLINE2|C4R_HYUNDAI3|C4R_HAR_VAESSEN,199,11],                                                 \
 159      DB_SDGGMRS744[O:C4I_CMA1|C4I_CMA_CGM5|C4I_CHINA3|C4R_PO5|C4R_PONED2|C4R_NORFOLK,17,11]              \
 160      [O:C4I_COSCO3|C4I_BERTSCHI|C4RF_MAERSK1|C4RH_EG2|C4R_PONED2,199,11],                                \
 161      AAE_SGGMRSS104[O:C4S_DANZAS|C4R_ECS1|C4R_HANJIN2|C4R_CAT,197,11]                                    \
 162      [O:C4S_KEHRLI|C4R_EG1|C4R_CMACGM1|C4R_HATSU|C4R_CNC,17,11],                                         \
 163      AAE_SGGMRSS90[O:C3B_BERTSCHI|C3B_HOYER3|C3B_BUZZ2|C3B_BERTSCHI1,25,11]                              \
 164      [O:C3T_BUZZ|C3B_EUROPOOL1|C3B_ITALCOMBI2|C3B_NB|C3B_VANDENBOSCH1,180,11],                           \
 165      HUPAC_4[O:C4R_MARUBA|C4R_MITSUI1|C4R_MITSUI2|C4R_NYKL|C4R_PONED1|C4R_U45|C4R_UNIGLORY2|C4R_YANG3|   \
 166      C4RH_HAPAG|C4RH_NYK2|C4RH_KLINE,,11],                                                               \
 167      HUPAC_3[O:CT_GRUBER|CT_BERTSCHI12|CT_BERTSCHI14|CT_BERTSCHI13|CT_CAMPIONI|CT_BERTSCHI8,20,11]       \
 168      [O:CT_HOYER2|CT_HOYER5|CT_CONSERT1|CT_GRUBER|CT_HSFOOD2|CT_HARTOGH2,103,11],                        \
 169      AAE_SGNS_S1[O:C2IT01|CT01|CT31|CT07|CT17|CT12|CT_BERTSCHI7|CT_EUROTAINER2|CT_HARTOGH1|CT_HOYER3|    \
 170      CT_HSFOOD1|CT_OMYA|CT_RINNEN6|CT_RINNEN7,103,11]                                                    \
 171      [O:CT04|CT11|CT18|CT10|CT_BERTSCHI|CT_BERTSCHI1|CT_BERTSCHI2|CT_BERTSCHI5,20,11],                   \
 172      SNCB_LGNSS2[O:(C138_29|CL45_C48|C138_26),,12],AAE_LGNSS443[O:(C138_29|CL45_C48|C138_26),,11],       \
 173      AAE_SGGMRSS90A[O:C4_SADLEIRS|C4_COSCO|C4_HANJIN|C4_HAPAG3|C4_IBC|C4_KLINE1|C4007|C4_CHOYANG|        \
 174      C4_SADLEIRS,158,11]                                                                                 \
 175      [O:C4_FCL|C4I_PO5|C4I_SENATOR1|C4I_YANG_MING2|C4IH_PO1|C4I_SBBC|C4IT_BERTSCHI2|C4IT_SIMONS5|        \
 176      C4_CAPITAL2,11,11],                                                                                 \
 177      AAE_SGGMRSS90AL[O:C4I_HAMBURG1|C4I_HANJIN6|C4I_HAPAG1|C4I_HYUNDAI3|C4I_ITALIA2|C4I_LATEXA1|         \
 178      C4I_MOL4|C4I_MOL1|C4I_PO2|C4I_SAMSKIP1,158,11]                                                      \
 179      [O:C4I_CHINA3|C4I_CHINA2|C4I_CHO_YANG2|C4I_CMACGM1|C4I_COSCO1|C4I_COSCO2|C4I_DE_RIJKE1|C4I_DHL1|    \
 180      C4I_EG5|C4I_GEBRWEISS1,11,11],                                                                      \
 181      AAE_SGGMRSS90A[O:C4I13|C4I_APL|C4I_CAPITAL1|C4I_CAST2|C4I_CHINA1|C4I_CMACGM3|C4I_COSCO3|            \
 182      C4I_DELMAS1|C4I_EG6|C4I_GFOK1,158,11]                                                               \
 183      [O:C4I_HANJIN3|C4I_HANJIN4|C4I_HAPAG|C4I_HYUNDAI1|C4I_IRISL1|C4I_KLINE2|C4I_MOL2|C4I_PO1|C4I_PO3|   \
 184      C4I_UNIGLORY1,11,11],                                                                               \
 185      AAE_SGGMRSS90A[O:C4I_SAFMARINE1|C4I_SANARA1|C4I_ZIM1|C4I_ZIM3|C4IH_CDS1|C4IH_CONTAINERSHIPS1|       \
 186      C4IH_EG1|C4I_NEDLLOYD|C4IR_SKIPPERS1,11,11])
 187
 188  # EP 6  Freight long Container 2
 189  $DEF Z_D_E6_C2=2-3*((AAE_SGGMRSS90|AAE_SGGMRSS90L)                                                      \
 190      [O:C4T_02|C4T_RAILROADS|C4T_05|C4T_SIMONS|C4T_SIMONS4,20,11]                                        \
 191      [O:C4T_BERTSCHI4|C4RT_BRUHN|C4T_BERTSCHI3|C4T_BERTSCHI1|C4T_SIMONS3,158,11]),                       \
 192      6*((WASC_SGGRSS80L|WASC_SGGRSS80)                                                                   \
 193      [O:C4R_KLINE3|C4R_HAPAG6|C4R_HYUNDAI1|C4R_IFF|C4R_MAERSK2|C4R_MSC4|C4R_OEBB|C4RH_NYK1|C4RO_EG|      \
 194      C4RO_SEASTAR,10,11]                                                                                 \
 195      [O:C4R_HAMBURG3|C4S_DANZASL|C4R12|C4R_BRAUN|C4R_CHY1|C4R_ECS|C4R_UNIGLORY1|C4RH_HAMBURG|            \
 196      C4RH_KLINE1,138,11])
 197
 198  # EP 6  Freight long Container 3
 199  $DEF Z_D_E6_C3=4-5*(WASC_T2000(|L)|WASC_T5S)[O:WASC_T2000K,82,6][O:WASC_T2000K,259,6]                   \
 200      [O:BOX7_SCHENKER|BOX745_ANSORGE1|BOX745_BAS1|BOX745_BERGMANN1|BOX745_BERTSCHI1|BOX745_BIPA|         \
 201      BOX745_CARGOFITTT1|BOX745_CARGOFITTT4|BOX745_HANGARTNER5|BOX745_CROSSRAIL2|BOX745_CROSSRAIL4|       \
 202      BOX745_CROSSRAIL7|BOX745_DANZAS6|BOX745_DHL1|BOX745_DHL6|BOX745_EXEL2|BOX745_FAXION|                \
 203      BOX745_FERCAM2|BOX745_FRANS2|BOX745_GEBWEISS1|BOX745_GEBWEISS4|BOX745_GESEACO2|BOX745_HANGARTNER3|  \
 204      BOX745_HANGARTNER7|BOX745_HELLMANN3L|BOX745_HUPAC1|BOX745_MAGETRA2|BOX745_NORFOLKLINE6|             \
 205      BOX745_PLANZER1|BOX745_REXWAL1P|BOX745_SAIMA|BOX745_SEACO3|BOX745_SIFTE_BERTI1|BOX745_SKANDI2|      \
 206      BOX745_TIP|BOX745_VANDERGRAAF|BOX745_WALTER2|BOX745_WEYAND1|BOX745_WINNER2|BOX745_HANGARTNER15|     \
 207      BOX745_HANGARTNER16|BOX745_HELLMANN2|BOX745_LEMAN|BOX745_NORFOLKLINE5|BOX745_PANEUROPA1|            \
 208      BOX745_PENNY,12,12]                                                                                 \
 209      [O:BOX745_ANSORGE2|BOX745_BAS3|BOX745_BERGMANN2|BOX745_BILLA1|BOX745_CARGO_DOMINO1|                 \
 210      BOX745_CARGOFITTT6|BOX745_CONFERN|BOX745_CROSSRAIL3|BOX745_DANZAS5|BOX745_DHL4|BOX745_DREIER3|      \
 211      BOX745_FERCAM1|BOX745_GEBWEISS3|BOX745_GEBWEISS6|BOX745_GEBWEISS8|BOX745_GEBWEISS10|                \
 212      BOX745_GEBWEISS13|BOX745_GEBWEISS16|BOX745_GESEACO3|BOX745_HANGARTNER1|BOX745_HANGARTNER13|         \
 213      BOX745_HELLMANN2|BOX745_HUPAC3|BOX745_NORFOLKLINE7|BOX745_REXWAL1T|BOX745_REXWAL2P|BOX745_SAE5|     \
 214      BOX745_SEACO2|BOX745_TRANSVERBA2|BOX745_WINNER4|BOX745_SAE3|BOX745_GEBWEISS9|BOX745_GEBWEISS11|     \
 215      BOX745_GEBWEISS14|BOX745_HANGARTNER17|BOX745_HANGARTNER18|BOX745_HELLMANN1L|BOX745_HELLMANN3|       \
 216      BOX745_HUPAC4|BOX745_LAGERMAX|BOX745_GRT1|BOX745_SKANDI3|BOX745_TERRATRANS1,91,12]                  \
 217      [O:BOX745_02|BOX745_05|BOX745_ARCESE|BOX745_BERGMANN3|BOX745_BILLA3|BOX745_CARGO_DOMINO2|           \
 218      BOX745_CARGOFITTT3|BOX745_CONFERNL|BOX745_CROSSRAIL5|BOX745_DENNINGHAUS1|BOX745_DHL7|               \
 219      BOX745_EVOLA2|BOX745_FORY|BOX745_GEBWEISS2|BOX745_GEBWEISS15|BOX745_GESEACO1|BOX745_GRT2|           \
 220      BOX745_HANGARTNER7|BOX745_HANGARTNER14|BOX745_HELLMANN1|BOX745_HUPAC2|BOX745_LARLO|                 \
 221      BOX745_MAGETRA1|BOX745_NORFOLKLINE4|BOX745_NORFOLKLINE8|BOX745_PANEUROPA2|BOX745_POST2|             \
 222      BOX745_REXWAL2|BOX745_ROMERQUELLE|BOX745_SAE4|BOX745_SEACO1|BOX745_SPEDIRAIL|BOX745_TIPES|          \
 223      BOX745_WINNER5|BOX745_SIFTE_BERTI1|BOX745_REXWAL2L|BOX745_REXWAL2PL|BOX745_SAE3L|BOX745_SAE3|       \
 224      BOX745_SCHONIL|BOX745_SIFTE_BERTI2|BOX745_SITTAM2|BOX745_TRANSVERBA1|BOX745_VAILLANT|               \
 225      BOX745_WALTER5,178,12]                                                                              \
 226      [O:BOX745_04|BOX745_ARMANDO_VIDALE|BOX745_BAS4|BOX745_BENNTRANS|BOX745_BERGMANN4|BOX745_BERTSCHI2|  \
 227      BOX745_BILLA2|BOX745_BR|BOX745_CARGEX|BOX745_CARGOFITTT2|BOX745_CARGOFITTT5|BOX745_CRETSCHMAR|      \
 228      BOX745_CROSSRAIL1|BOX745_CROSSRAIL6|BOX7_DANZAS3|BOX745_DANZAS8|BOX745_DENNINGHAUS2|BOX745_DHL2|    \
 229      BOX745_DHL5|BOX745_DPOST2|BOX745_DREIER1|BOX745_ESPERIA|BOX745_EVOLA1|BOX7_FERCAM|BOX745_FORSTER|   \
 230      BOX745_FRANS1|BOX745_GEBWEISS7|BOX745_GEBWEISS12|BOX745_GEBWEISS17|BOX745_GESEACO5|                 \
 231      BOX745_NORFOLKLINE3|BOX745_NORFOLKLINE9|BOX745_OPTIMUS1|BOX745_OPTIMUS2|BOX745_PANEUROPA1L|         \
 232      BOX745_REXWAL1|BOX745_REXWAL2TL|BOX745_SAE2|BOX745_SCHONI|BOX745_SIGGI|BOX745_TERRATRANS1|          \
 233      BOX745_WALTER3|BOX745_WALTER4|BOX745_WINNER1|BOX745_SENN|BOX745_SITTAM1|BOX745_SKANDI1|             \
 234      BOX745_TERRATRANS2,257,12],2-3*WASC_T5L[O:WASC_T5K,136,5][O:(C138_29|CL45_C48|C138_26),9,11],       \
 235      2-3*WASC_T5[O:WASC_T5K,61,5]                                                                        \
 236      [O:C4IT_BACHMANN1|C4IT_BERTSCHI3|C4IT_RAILROADS|C4IT_SCHMIDT1|C4IT_SIMONS1|C4IT_SIMONS2|            \
 237      C4IT_SIMONS3|C4IT_SIMONS4|C4IT_SIMONS6|C4IT_SIMONS1,61,11],                                         \
 238      2-3*AAE_SGNS_S1L[O:C4I_LINEAMEX1|C4I16|C4I07|C4I_APL1|C4I_APL3|C4I_AWS1|C4I_BACO1|C4I_CAI2|         \
 239      C4I_CAPITAL2|C4I_CHINA|C4I_CMA2|C4I_CMA_CGM6|C4I_CMA_CGM4|C4I_CNC1|C4I_DELMAS2|C4I_EG3|C4I_EG4|     \
 240      C4I_GEBRWEISS1L|C4I_HANJIN2|C4I_HANJIN5|C4I_IRISL3|C4I_KLINE3|C4I_KLINE|C4I_LINEAMEX2|C4I_MOL3|     \
 241      C4I_MSC1|C4I_MSC2|C4I_OOCL,38,11]
 242
 243  # EP 6  Freight long Container 4
 244  $DEF Z_D_E6_C4=10*(6:(BTS_SGGMRS714_(5|4|3|2|1|2L|1L)[O:(C75|WB74|WB74|CT74),11,11]                     \
 245      [O:(C75|WB74|WB74|CT74),91,11][O:(C75|WB74|WB74|CT74),174,11][O:(C75|WB74|WB74|CT74),254,11])|      \
 246      1:(BTS_SGGMRS714_(5|4|3|2|1|2L|1L)[O:(C75|WB74|WB74|CT74),11,11][O:(C75|WB74|WB74|CT74),91,11])|    \
 247      1:(BTS_SGGMRS714_(5|4|3|2|1|2L|1L)[O:(C75|WB74|WB74|CT74),174,11][O:(C75|WB74|WB74|CT74),254,11]))
 248
 249  # EP 6  Freight long Container 5
 250  $DEF Z_D_E6_C5=(<(3*((G_SGNGS5|G_SGNGS7|G_SGNGS9|G_SGNGS8)                                              \
 251      [O:(CM_HAMBURG1|CM_HAMBURG2|BOX14_MEGACOMBI01|BOX14_MEGACOMBI02|BOX14_MEGACOMBI03|                  \
 252      BOX14_MEGACOMBI04|BOX14_MEGACOMBI05|BOX14_MEGACOMBI06|BOX14_MEGACOMBI07|BOX14_MEGACOMBI08|          \
 253      BOX14_MEGACOMBI09|BOX14_MEGACOMBI10|BOX14_MEGACOMBI11|BOX14_MEGACOMBI12|BOX14_MEGACOMBI13|          \
 254      BOX14_MEGACOMBI14|BOX14_MEGACOMBI15|BOX14_MEGACOMBI16|BOX14_MEGACOMBI17|BOX14_MEGACOMBI18|          \
 255      BOX14_MEGACOMBI19|BOX14_MEGACOMBI20|CM_FORD),,11])),                                                \
 256      3*((ERR_SGS|ERR_SGSL)                                                                               \
 257      [O:(BOX745I_BERGMANN3|BOX745I_CARGODOMINO5L|BOX745I_CARGODOMINO5|BOX745I_CARGODOMINO6L|             \
 258      BOX745I_CARGODOMINO6|BOX745I_DE_WAARD2|BOX745I_FERCAM1|BOX745I_GESEACO1|BOX745I_CARGODOMINO6L),9,   \
 259      11]                                                                                                 \
 260      [O:(BOX745I_CARGOLINE1|BOX745I_02|BOX745I_03|BOX745I_GESEACO2|BOX745I_GESEACO3|BOX745I_GESEACO4|    \
 261      BOX745I_LUCA1|BOX745I_PANEUROPA1|BOX745H_GRANVOLUME|BOX745H_GRT|BOX745I_05),114,11]),               \
 262      5*((BTS_SGGMRS714_2L|BTS_SGGMRS714_1L|BTS_SGGMRS714_1|BTS_SGGMRS714_2|BTS_SGGMRS714_4|              \
 263      BTS_SGGMRS714_5)                                                                                    \
 264      [O:(BOX14_AMBROGIO04|BOX14_AMBROGIO03|BOX14_AMBROGIO06|BOX14_AMBROGIO07|BOX14_AMBROGIO08|           \
 265      BOX14_AMBROGIO09|BOX14_AMBROGIO01|BOX14_AMBROGIO22|BOX14_AMBROGIO23|BOX14_AMBROGIO24|BOX14_02|      \
 266      BOX14_04|BOX14_05|BOX14_ALBERTI_SPANTI2|BOX14_CROSSRAIL4|BOX14_DACHSER1|BOX14_AMBROGIO25|           \
 267      BOX14_AMBROGIO26),22,11]                                                                            \
 268      [O:(BOX14_AMBROGIO04|BOX14_AMBROGIO11|BOX14_AMBROGIO12|BOX14_AMBROGIO13|BOX14_AMBROGIO14|           \
 269      BOX14_AMBROGIO15|BOX14_AMBROGIO16|BOX14_AMBROGIO17|BOX14_AMBROGIO21|BOX14_GEEST3|BOX14_MVT1|        \
 270      BOX14_SAMSKIP|BOX14_BAS|BOX14_CONTAINERLEASING|BOX14_AMBROGIO18),184,11]),                          \
 271      4*((PCCR_SGS2|G_SGS5|PCCR_SGS)                                                                      \
 272      [O:(BOX745I_CARGODOMINO6L|BOX745I_CARGOLINE2|BOX745I_CAWA_TRANS1|BOX745I_DE_WAARD1|BOX745I_BAS3|    \
 273      BOX745I_BAS4|BOX745I_HELLERMANN1|BOX745I_HELLERMANN2|BOX745I_HELLERMANN4|BOX745I_REXWAL1|           \
 274      BOX745I_REXWAL2|BOX745I_REXWAL3|BOX745I_REXWAL4|BOX745I_REXWAL5|BOX745I_REXWAL6|BOX745I_REXWAL9|    \
 275      BOX745I_06L|BOX745I_04|BOX745I_06|BOX745I_07|BOX745I_08|BOX745I_BAS1|BOX745I_BAS2|BOX745I_01|       \
 276      BOX745I_BERGMANN5|BOX745I_BILLA1|BOX745I_BILLA2|BOX745I_BILLA3|BOX745I_CARGO_FITTT1|                \
 277      BOX745I_SEACO2|BOX745I_SEACO3|BOX745I_SIFTE_BERTI1|BOX745I_SIFTE_BERTI2|BOX745I_SIGGI1|             \
 278      BOX745I_WETRON1|BOX745IF_PIPE1|BOX745IF_PIPE2|BOX745IR_CARGODOMINO1L|BOX745IR_CARGODOMINO1|         \
 279      BOX745IR_CARGODOMINO2L|BOX745IR_CARGODOMINO2),16,12]                                                \
 280      [O:(BOX745I_CARGOLINE1|BOX745I_BIPA1|BOX745I_CARGO_FITTT7|BOX745I_CARGODOMINO1L|                    \
 281      BOX745I_CARGODOMINO1|BOX745I_CARGODOMINO3L|BOX745I_CARGODOMINO3|BOX745I_CARGODOMINO4L|              \
 282      BOX745I_CARGO_FITTT6|BOX745I_CARGODOMINO2L|BOX745I_CARGODOMINO2|BOX745I_HELLERMANN5|                \
 283      BOX745I_KOESTER_HAPKE1|BOX745I_LARLOEXPRESS1|BOX745I_PANEUROPA2|BOX745I_PENNY1|                     \
 284      BOX745I_CARGO_FITTT2|BOX745I_CARGO_FITTT3|BOX745I_CARGO_FITTT4|BOX745I_CARGO_FITTT5|                \
 285      BOX745I_CARGODOMINO4|BOX745I_ESPERIA1|BOX745I_FERCAM2|BOX745I_GESEACO5|BOX745I_HELLERMANN3|         \
 286      BOX745I_RCA_AUTOTEILE1|BOX745I_RCA_AUTOTEILE2|BOX745I_REXWAL7|BOX745I_REXWAL8|BOX745I_SAE2|         \
 287      BOX745I_SAE3|BOX745I_SCHOENI1|BOX745I_SCHOENI2|BOX745I_SEACO1),104,12]))
 288
 289  # EP 6  Freight long Container 6
 290  $DEF Z_D_E6_C6=10-12*((KOMBI_T2000(A|B)(|L)[O:C2I_MSC(4|5|6|7|8|9),17,12][O:C2I_MSC(4|5|6|8|9),81,12]   \
 291      [O:C2I_MSC(4|5|6|8|9),197,12][O:C2I_MSC(4|5|6|8|9),261,12])|                                        \
 292      (CGN_T2000B(|L)[O:C4I_MSC(4|5|6|8|9),17,12][O:C4I_MSC(4|5|6|8|9),200,12])|                          \
 293      (AT_T2000(B|RBS)(|L)                                                                                \
 294      [O:C4IH_(SEACO|SEAWHEEL|POWER|OOCL(|2|3|4)|NORFOLKLINE|HYUNDAI|UASC|NYK2|WANHAI2|TURKON(|2)|        \
 295      OOCL(|2|3|4)),17,12]                                                                                \
 296      [O:C4IH_(MOL|LLOYD(|2|3)|HORIZON(1|2|3)|MARUBA|SAMSKIP|SAFMARINE|NAMSUNG|NEDLLOYD2|YANGMING),200,   \
 297      12])|                                                                                               \
 298      (KOMBI_T2000(A|B)[OB:STRAILST1,34,11][OB:STRAIL_VANDIEREN(2|3|4|5|6|7|8|9|10)[!L],20,4]             \
 299      [OB:STRAIL_(TRANSCO1|WETRON|TRANSLOG|TRANSCO2|SCHONI(4|3|1|2)|PNO|MAINSPED(3|4)),188,4]             \
 300      [OB:STRAILST1,305,11])|                                                                             \
 301      (WASC_SGNSS(|L)[O:(C3I_(ZIM(1|2)|IFF(3|4)|GRP|INTERBULK)|C3IO_01),9,11]                             \
 302      [O:C3I_(TIPES|SIMONS|NIJHOF(1|2)|BRUHN|SETTI),101,11])|                                             \
 303      (AAE_SGGMRSS90A(|L)[O:C4IT_(08|05|06|07|09|10),10,11][O:C4IT_EUROPOOL(1|2),163,11])|                \
 304      (G_SGGMRSG2(|L)[O:C4IF_(NEDLLOYD3|NYK3|WANHAI1)|(C4I_(TROPICAL|WANHAI|NORFOLKLINE)),9,11]           \
 305      [O:C4IH_(NORDEX|SEACARGO|SEACO2|SINOTRANS|SEA2RAIL|ZIM(|2)),164,11]))
 306
 307  # EP 6  Freight long Container 7
 308  $DEF Z_D_E6_C7=11-13*((KOMBI_SDGGMRS(|4|2|3)[OB:STRAILST1,35,8][OB:STRAILST1,300,8][OB:(STRR),188,3]    \
 309      [OB:(STRL),18,3])|                                                                                  \
 310      (KOMBI_T2000(B|A)(|L)                                                                               \
 311      [O:C4I_MSC7|C4I_JINJANG|C4IH_CARU|C4IH_HEUNG|C4IO_HAPAG1|C4IO_MSC|C4IO_YANGMING|C4IH_PONED|         \
 312      C4IH_SITC|C4IH_MSC|C4IH_HORIZON1|C4IH_CROWLEY|C4IH_GESEACO|C4IH_GVC,19,12]                          \
 313      [O:C4I_MSC7|C4IO_EG2|C4IO_MAERSK|C4IO_PO|C4IH_KLINE|C4IH_2XL|C4IH_CROWLEY2|C4IH_GEEST|C4IH_PO4|     \
 314      C4IH_GVC|C4IH_ABX|C4IH_HATSU,202,12])|                                                              \
 315      (G_SGNGS7[O:(BOX745_09|BOX745_ASSOCARGO|BOX745_GHP),23,11][O:(BOX745_09|BOX745_REXWAL2T),99,11])|   \
 316      ((PCCR_SGS2|G_SGS5)                                                                                 \
 317      [O:(CT_RINNEN(8|9)|CT_EXSIF|CT_TRANSAMERICA(1|2|3)|CT_RODELLA(1|2|3|4)|CT_RMI(2|3|5)|CT_MEURER|     \
 318      CT_ALFRED_TALKE),18,12]                                                                             \
 319      [O:(CT_HARTOGH|BOX745_08|BOX745_CARGOFITTT7|BOX745_HORNBACH|BOX745_DANZAS4|BOX745_CERES_STRONGALE|  \
 320      CT_ITC(2|3)),105,12])|(2*DB_SGJKKMMS(1|2|3)[O:CL45_C48,,12])|                                       \
 321      (2*DBC_SGKKMS698A(|L)[O:CL45_C48,,8])|                                                              \
 322      (WASC_SGGRSS80(|L)[O:(C2I_CARU|C2I_DELMAS2|C2I_HEUNG_A|C2I_KTS|C2I_TURKON|(C2I_UNIT20(|L))),8,11]   \
 323      [O:(C2IO_COSCO|C2IO_TIPES|(C2IO_GTM(3|2|1))|C2IO_TIPES|(C2IO_EBERHARD(1L|2L|1|1L))),69,11]          \
 324      [O:(C4RS_2XL|C4R_SF|C4RH_GARTNER1|C4I_GOLD2|C4IS_TFG|C4IH_NYK1|C4R_2XL|C4RH01),137,11])|            \
 325      (G_SGGMRS1[O:WBGALL,15,11][O:WBGALL,>323,11])),                                                     \
 326      (2*(DB_LGJNS576KM|DB_LGJNS576VRM|DBC_LGS579M|DBS_LGS579M)[O:C20A,11,12][O:C20A,73,12]),             \
 327      (2*(DB_LGS580M|DBC_LGS580M|DBS_LGS580M)[O:C40B,,12])
 328
 329
 330  # EP 6 Freight Container 8
 331  $DEF Z_D_E6_C8=15-18*(((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C30A,7,11]         \
 332      [OT:C30A,99,11])|                                                                                   \
 333      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C20A,7,11][OT:C20A,68,11]            \
 334      [OT:C20A,128,11])|(AAE_SGNS4553467[O:WBGA75,9,12][O:WBGA75,>188,12])|                               \
 335      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C40B,7,11][OT:C20A,128,11])|         \
 336      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C40B,7,11])|                         \
 337      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))                                         \
 338      [O:CT_BERTSCHI11|CT_CHIMICAL_EXPRESS|CT_CONSERT2|CT_CONTAINERDIENST|CT_HOYER1|CT_MILKA|CT_REXWAL|   \
 339      CT_TANKCT|CT_TIPHOOK,112,11][OT:C30A,99,11])|                                                       \
 340      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[O:C20B,7,11][O:C20B,68,11]              \
 341      [O:C20B,129,11])|                                                                                   \
 342      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[O:C2I_EXTE_WOOD(1|2|3|4|5|6),7,11]      \
 343      [O:C2I_EXTE_WOOD(1|2|3|4|5|6),68,11][O:C2I_EXTE_WOOD(1|2|3|4|5|6),129,11])|                         \
 344      (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11)[OT:C40B,160,11][OT:C40B,15,11])|                                 \
 345      (CEMAT_SGNSS[O:C30A,9,11][O:C30A,100,11])|(CEMAT_SGNSS[O:C40B,9,11]))
 346
 347  # EP 6 Freight Container 9
 348  $DEF Z_D_E6_C9=15-18*(((WASC|HUPAC)_T5(|L)[O:WB71,12,11][O:WB71,117,11])|                               \
 349      ((WASC|HUPAC)_T5(|L)[O:(WB72|WB73),11,11][O:(WB72|WB73),116,11])|                                   \
 350      ((WASC|HUPAC)_T5(|L)[O:(WB74|WB75),10,11][O:(WB74|WB75),115,11])|                                   \
 351      ((WASC|HUPAC)_T5(|L)[O:(WB76|WB77),9,11][O:(WB76|WB77),114,11])|                                    \
 352      ((WASC|HUPAC)_T5L[O:(WB74|WB75),10,11][O:C3P_EWALS05,92,11])|                                       \
 353      ((WASC|HUPAC)_T5(|L)[O:WB90,17,11][O:WB71,115,11])|((WASC|HUPAC)_T5[O:WB90,17,11][O:WB71,115,11])|  \
 354      (AAE_SGNNS1(|L)[O:(CT_STAR|CT_BERTSCHI16(|L)|CT21|CT_HARTOGH4|CT_HOYER7|CT_STAR),12,11]             \
 355      [O:(CT_BERTSCHI16(|L)|CT21|CT_HARTOGH4|CT_HOYER7),102,11])|                                         \
 356      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C40B,7,11][OT:C20A,128,11])|         \
 357      (G_SGGMRSG(|2|3|4|5)(|L)[O:C40B,164,11])|(CBR_SGGMRSS1(|L)[O:C40A,10,12][O:C40A,159,12])|           \
 358      (WASC_SGGMRSS90L[O:BOX745I_REXWAL8,13,11][O:BOX745I_REXWAL8,207,11])|                               \
 359      ((AAE_SGNS_S_FBR(R|G)(|L)|ERR_SGNS_S(|PCC|FBR|_FBRPCC)(|L))[OT:C7(7|9),9,11][OT:C7(7|9),111,11])|   \
 360      (G_SGGMRSS2(|L)[O:(C4_SEALAND|C4_GREENC01|C4_GREENC02L|C4_GREENC02),9,12]                           \
 361      [O:(C4_SEALAND|C4_GREENC01|C4_GREENC02L|C4_GREENC02),172,12][OT:C7(7|9),9,11][OT:C7(7|9),111,11]))
 362
 363  # EP 6 Freight Container 10
 364  $DEF Z_D_E6_C10=15*((G_SGNGS(18|20|21|22|23|19)                                                         \
 365      [O:((C20(A|B),C20(A|B),C20(A|B))|(C40B,C20(A|B))|(C20(A|B),C40B)|(C30A,C30A)),,11])|                \
 366      (G_SGNS(24|25|26|26L|27|27L|22L)                                                                    \
 367      [O:((C20(A|B),C20(A|B),C20(A|B))|(C40B,C20(A|B))|(C20(A|B),C40B)|(C30A,C30A)),,11])|                \
 368      (ERR_SG(S|S1|NS_S_FBRPCC|NS_SFBR|NS_S|NS_SPCC)(|L)                                                  \
 369      [O:((C20(A|B),C20(A|B),C20(A|B))|(C40B,C20(A|B))|(C20(A|B),C40B)|(C30A,C30A)),,11])|                \
 370      (G_SGGMRS1 (([O:(C40B),7,11][O:(C40B),209,11])|                                                     \
 371      ([O:(C20(A|B),30,C20(A|B)),7,11][O:(C20(A|B),30,C20(A|B)),179,11]))))
 372
 373  # EP 6 Freight Container 11
 374  $DEF Z_D_E6_C11=5-8*NOVATRANS_K(UM|CM|1ML|1M)[O:(C40A),,13],                                            \
 375      7-11*(RAI_SGNS691M(|L)|DB_SGNS691VRM(|L)|DBC_SGNS691M(|L)|DB_SGNSS704M(|L)|DBS_SGNSS704M(|L)|       \
 376      ERR_SGNSS3_60M|EVB_SGNS4558AM|KOMBI_SGSS703M)[O:C60(A|B),7,12]
 377
 378  # EP 6  Freight long Container MiX
 379  $DEF D6FCM=Z_D_E6_C(1|2|3|4|5|6|7|8|9|10|11)
 380
 381  # Tank ------------------------------------------------------------
 382
 383  # EP 4  Freight tank cars mixed
 384  $DEF D4FZ1=22*((DB_LBSEAG36_BP1M|DB_S24_ESSO2M|DB_S24_ESSO3M|DB_LBUE30_ESSO2M|DB_LBUE30_ESSO3M|         \
 385      VTG_S26_2M|VTG_LBUE30_2M|VTG_LBLHB40_2M|VTG_LBLHB40_1SHELLM|VTG_Z_LBLHB40_2SHELLM)(|L))
 386
 387
 388  # EP 5  Freight tank cars mixed
 389  $DEF D5FZ1=22*((VTG_ZACNS(1|2|3)|VTG_2(A|B)(|L)|VTG_ZANS(1|2|3|4)(|L)|                                  \
 390      (VTG_ZAS1|DB_KW4_1|VTG_ZAS807849695(|L)|VTG_ZAS857862487(|L))))
 391
 392  # EP 6  Freight short tank cars 1
 393  $DEF Z_D_E6_G_KK1=5*(NACCO_1L|NACCO_1|NACCO_3L|NACCO_3|NACCO_5|NACCO_5L|NACCO_6|NACCO_6L|GATX_ZAS1|     \
 394      MINOL_7845444|DB_KW4_1|GATX_7|WASC_11|VTG_10|ERMEWA_7956102|KVG_Z1|WASC_6L|VTG_2A|ONRAIL_3L|        \
 395      GATX_1L|GATX_DHL1L|ERMEWA_1|DEC_KVG_1L|MINOL_7967200|VTG_7|VTG_Z1|KVG_ZAS1|KEG_ZAS1|VTG_ZAS1|GT32|  \
 396      KVG_7956310|VTG_7957043|NACCO_7956673)
 397
 398  # EP 6  Freight short tank cars 2
 399  $DEF Z_D_E6_G_KK2=ERMEWA_OMV_Z01L,VTG_KEWA_01L,WASC_OMV_01L,WASC_OMV_01,G_Z1
 400
 401  # EP 6  Freight short tank cars 3
 402  $DEF Z_D_E6_G_KK3=7-9*(KVG_ZAGS(|L)|NACCO_ZAG(|N)S(|L)|DB_ZAG(|N)S_WESTFALENGAS(|L)|                    \
 403      DB_ZAG(|N)S_LANGEGAS(|L)|DB_ZAGS_LOTTER(|L))|PANGAS_ZS7416005(|L)
 404
 405  # EP 6  Freight short tank cars mixed
 406  $DEF D6FZKM=Z_D_E6_G_KK(3|2|1)
 407
 408  # EP 6  Freight long tank cars 1
 409  $DEF Z_D_E6_G_Kessel=GT16,VTG_Z2,VTG_859823,NSB_UADHS,M_ZAES_11,GATX_11,VTG_16,GT29,VR_ZAGS_Y25,        \
 410      GT_CO2,DB_Z5CHLOR2,ERMEWA_5_ZAEFS7899L|ERMEWA_5_ZAEFS7899,WASC_4L,VTG_2A,                           \
 411      GATX_DHL1L|GATX_DHL2L|GATX_DHL2|GATX_DHL1,ERMEWA_1L,ONRAIL_2
 412
 413  # EP 6  Freight long tank cars 2
 414  $DEF Z_D_E6_G_Kessel2=3*((5*(GATX_ZAS1|GATX_1L|GATX_1|GATX_DHL1L|GATX_DHL1|GATX_DHL2L|GATX_DHL2))|      \
 415      (5*(BASF_(4|5|6)(|L)))|(5*(WASC_2(1|2|0)(|L)))|                                                     \
 416      (5*(EVS_GPS|DEC_5_ZAESRT500A1(|L)|DEC_5_ZAGKKS406RU(|L)|KVG_5_ZAGKKS406RU(|L))))|                   \
 417      (4-5*(VTG_Z12L|VTG_Z5L|G_6_Z4_02|ERMEWA_4|VTG_4_ZAFS7899004))|(4*Z_D_E6_G_KK(1|3|2))
 418
 419  # EP 6  Freight long tank cars 3
 420  $DEF Z_D_E6_G_Kessel3=4-5*((4-5*(G_46552_1|WASC_(15|10|14|8|9|11)|WASC_OMV_01(|L)|                      \
 421      WASC_(1|2|3|4|5|7|6)(|L)|WASC_STE1))|(4-5*(VTG_(11|8|Z2)|VTG_KEWA_01(|L)))|                         \
 422      (4-5*(GATX_(8|2|6|7)|GATX_ZANS(3|2|1)(|L)|DEC_(GATX|KVG)_1(|L)))|                                   \
 423      (4-5*(DB_ZAGNS_(LANGEGAS|WESTFALENGAS)(|L)|DB_ZAGS_(LOTTER|WESTFALENGAS(|2))(|L)|                   \
 424      (NACCO|KVG)_ZAGS(|L)|NACCO_ZAGNS(|L)))|                                                             \
 425      (4-5*(ONRAIL_(3|1|2)(|L)|ERMEWA_1(|L)|GATX_EXDEC(1|2|3|4)(|L)))|(4-5*(NACCO_(6|1|3|2|4|5)))|        \
 426      (4-5*(SBB_Z_AVIA(1|2|3)(|L))|ERMEWA_ZANS(|L)))
 427
 428  # EP 6  Freight long tank cars 4
 429  $DEF Z_D_E6_G_Kessel4=4-5*((4-5*VTG_ZAGNS(8|6|7)(|L))|                                                  \
 430      (4-5*((WASC_ZAGKKS1|WASC_ZAGNS|WASC_ZAGS1|CARBA_ZAGS7811302)(|L)))|(4-5*VTG_ZAGNS(1|2|3|4|5)(|L))|  \
 431      (4-5*VTG_ZAGS(1|2|3|4|5)(|L))|(4-5*DB_ZAGS_(LOTTER|LANGEGAS)(|L))|                                  \
 432      (4-5*BASF_ZAGS(1|2|3|1L|2L|3L|4L))|(4-5*DB_ZAGS_WESTFALENGAS(|2|3|4|5)(|L))|                        \
 433      (4-5*((MITRAG_ZAGKKS|VTG_ZAGKKS857915018|ERMEWA_ZAGS1)(|L)))|                                       \
 434      (4-5*((ERMEWA_ZANS|GATX_ZANS_DB|GATX_ZANS_ZSSK)(|L))))
 435
 436
 437  # EP 6  Freight long tank cars 5
 438  $DEF Z_D_E6_G_Kessel5=14*((VTG_ZACES1|VTG_ZACS8078(65145|45374|68214|68208)|ATIR_ZACNS1|GATX_ZACS1|     \
 439      ERMEWA_ZAFNS1|ERMEWA_ZACNS1|SLVAG_ZAES7861023|ERMEWA_ZAS(2|1)|CTL_ZACS7861763|ATIR_ZACNS807841995|  \
 440      VTG_ZACNS807846770|OSAG_ZAS7857214|VTG_ZANS(1|2|3|4|5|857837543|857836331|817837590)|               \
 441      VTG_ZAS(2|857862487|807849695)|WASC_ZANS1|GATX_ZANS4|SCHENK_ZAS0774125|DEC_KVG_2|                   \
 442      GATX_ZACENS(1|857931069)|ALCOS_ZAS7852(222|203)|OBB_ZANS7837421|SNCF_ZANS78(36337|48191|48119)|     \
 443      VTG_ZACNS857929212|VTG_ZACNS857929213|VTG_ZAS807849217|ERMEWA_ZANS877848(537|199|246)|              \
 444      WASC_ZAS8578574(01|02|04))(|L)),                                                                    \
 445      3*((ALCOS_ZS7353832|VTG_ZCS807366382|BSH_ZCS7366120|SBB_ZS7357790|LONZA_ZCS7367(500|527|513|526)|   \
 446      ALCOS_ZS7353812|WASC_ZGS807318077|SCHENK_ZS7(207507|359705|359701))(|L))
 447
 448  # EP 6  Freight long tank cars 6
 449  $DEF Z_D_E6_G_Kessel6=4-5*((4-5*(MILLET_ZANS|VTG_ZACNS)(|L))|(4-5*WASC_ZANS(|_OMV)(|L))|                \
 450      (4-5*ERMEWA_ZANS(|_OMV)(|L))|(4-5*(KVG_ZANS|VTG_ZACNS)(|L))|(4-5*GATX_ZANS_(DB|ZSSK)(|L)))
 451
 452  # EP 6  Freight long tank cars mixed
 453  $DEF D6FZM=Z_D_E6_G_Kessel(|2|3|4|5|6)
 454
 455  # mixed ---------------------------------------------------------------
 456
 457
 458  # EP 6  Freight private shunting
 459  $DEF D6FP1KC=(3-4*(NACCO_EANOS(1|2)(|L)[OB:SCRAP(4|5|6)(|[M]),,31]))|                                   \
 460      (3-4*(CAPT_EAOS(2N|_N)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,28]|                                            \
 461      CAPT_EAOS(|2)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,33]))|(3-4*ERMEWA_UACNS809327026(|L))|                   \
 462      (3-4*VTG_SHIMMNS467(A|B|C|D|E|F|G|H|I|J|K)(|L))|(2-3*VTG_TADS960A)|                                 \
 463      (3-4*((ERMEWA_UACNS(4|5)|GATX_UACNS1|VTG_UACNS3)(|L)))|                                             \
 464      (3-4*VTG_RBS(3|1)(|L)[OB:WOOD(124|19|24)(|[M]),,12])|                                               \
 465      (3*(DB_HABBIILLNS2802004|DB_HABINS2783076|TWAG_HABIIS802846946|TWAG_HABBIINS802846979|              \
 466      TWAG_HABIIS802743354L|TWAG_HABIIS802743354|TWAG_HABIINS802745458L|TWAG_HABIINS802745458|            \
 467      TWAG_HABBIINS802743013L|TWAG_HABBIINS802743013|TWAG_HABBIINS802743088L|TWAG_HABBIINS802743088|      \
 468      TWAG_HABINS1L|TWAG_HABINS1|TWAG_HABINS2|TWAG_HABBIINS802743390L|TWAG_HABBIINS802743390|             \
 469      TWAG_HABBIINS802743617L|TWAG_HABBIINS802743617|DB_HABINS2771967L|DB_HABINS2771967|                  \
 470      DB_HABBINS350_2770257L|DB_HABBINS350_2770257|DB_HABBIINS2742422L|DB_HABBIINS2742422|                \
 471      TWAG_HABBIINS802742071L|TWAG_HABBIINS802742071|TWAG_HABIINS802745485))|                             \
 472      (3-4*(ERMEWA_UACNS(1|2|_RSB)(|L)|XSLO_UACNS(|L)|ENVI_UACNS0(1|2)(|B)(|L)|CFR_UACS|DB_UACS|DBC_UACS))| \
 473      (3-4*ERR_EANOS(|_FBR)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,34])|(2*TWAG_LAAIIS985(D|B|A|C))|                \
 474      (3-4*AWT_EAOS(|L)[OB:SCRAP(4|5|6)(|[M]),,30])|(3-4*GATX_2)|(3-4*WASC_12)|(3-4*(ERMEWA_UACNS1))|     \
 475      (3-4*(G_UAGPS1(|L)))|(3-4*(EVS_UACS(1|2|3|4)(|L)))|(3-4*(VTG_UACS(1|2|3|4|5|6|7)(|L)))|             \
 476      (3-4*HGK_EAOS(2|1)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,33])|(3-4*(G_6_HBBINS0(2|1|3|4|5)(|L)))|            \
 477      (3-4*(VTG_EANOS(2|1|2FBR)(|L)[OB:SCRAP(8|10|9)(|[M]),,33]|VTG_EAOS(|L)[OB:SCRAP(4|5|6)(|[M]),,33]))| \
 478      (3-4*HGK_EAOS(2|1)(|L)[OB:SCRAP_1(4|5|3)(|[M]),,33])|(3-4*G_6_HBBINS0(2|1|3|4)(|L))|                \
 479      (3-4*(SBB_RS3901A|SBB_2750500GR1))|(3-4*((HVLE|ITL)_RES(|L)[O:FR31(|[M])]))|                        \
 480      (3-4*ONRAIL_EAOS(2|1|_BA070)(|L)[OB:SCRAP(4|5|6)(|[M]),,33])|(3-4*TWAG_HIIRRS(1|2|3|4|5|6))|        \
 481      (3-4*EICH_6_EAOSX054(|L)[OT:SCRAP(6|5|7)(|[M]),,32])|(3-4*(CVIR_UACS0(1|2|3|4|4)(|L)))|             \
 482      (3-4*(EVS_UACS(2|3)(|L)))|(3-4*G_0(09|10|14))|                                                      \
 483      (3-4*(GREINER_HBKS|GH_HBBKS|EUROPLASTIC_HBBKS|LANG_HBBKS|SOGEFA_HBKS|DUNLOP_HBBKS)(|L))
 484
 485  # EP 6  Freight private short
 486  $DEF D6FP1K=2*D6FP1KC
 487
 488  # EP 6  Freight private long
 489  $DEF D6FP1=6-7*D6FP1KC
 490
 491  # EP 6  Freight long wood
 492  $DEF Z_D_E6_G_Holz=5*(RTRAN_UAS_O|RTRAN_UAS_N|RTRAN_UAS_Y25),                                           \
 493      7*(RTRAN_LAAPS1W|RTRAN_LAAPS2W|G_LAARS_W1L|G_LAARS_W1|G_LAARS_W2L|G_LAARS_W2|G_LAARS_W3L|           \
 494      G_LAARS_W3|G_LAARS_W4L|G_LAARS_W4|G_LAARS_W5L|G_LAARS_W5|G_LAARS_W6L|G_LAARS_W6|G_LAARS_W7L|        \
 495      G_LAARS_W7|G_LAARS_W8L|G_LAARS_W8),G_SNPS_XL_W(|L)
 496
 497  # EP 6  Freight long steel
 498  $DEF D6FP2=14*(ERR_RCA_SHIMMNS1L|ERR_RCA_SHIMMNS1|ERR_RCA_SHIMMNS2L|ERR_RCA_SHIMMNS2|                   \
 499      ERR_RCA_SHIMMNS3L|ERR_SHIMMNS728AL|ERR_SHIMMNS728A|ERR_SHIMMNS728BL|ERR_SHIMMNS728B|                \
 500      ERR_RCA_SHIMMNS3|NACCO_SHIMMNS1L|NACCO_SHIMMNS1|NACCO_SHIMMNS2L|NACCO_SHIMMNS2|NACCO_SHIMMNS3L|     \
 501      NACCO_SHIMMNS3|NACCO_SHIMMNS4L|NACCO_SHIMMNS4|NACCO_SHIMMNS5L|NACCO_SHIMMNS5|ERR_SHIMMNS1L|         \
 502      ERR_SHIMMNS1|ERR_SHIMMNS2L|ERR_SHIMMNS2|ERR_SHIMMNS_B1L|ERR_SHIMMNS_B1|ERR_SHIMMNS_B2L|             \
 503      ERR_SHIMMNS_B2|ERR_SHIMMNS_B3L|ERR_SHIMMNS_B3|NACCO_SHIMMNS6|NACCO_SHIMMNS7|NACCO_SHIMMS1L|         \
 504      NACCO_SHIMMS1)
 505
 506  #----------------------------------------------------------------------------------------------------
 507  #
 508  #Hungary
 509
 510  # KKSTB EP1 = Austria
 511
 512  # EP 3B Freight short
 513  $DEF H3GS=(4-5*((M_KZ(|H|HL)[OB:FR_SAND1|FR_REPA2(|[M]),,25])))|                                        \
 514      (4-5*(M_GAX(|H)(4|3|2|1)(|L)|M_3_GZK(|H)(|L)))|(4-5*(M_3_KHM))|                                     \
 515      (4-5*(M_216HEKS3|M_148GGS2|M_148GGS3|M_148GGS5|GY_148GGS3|M_GGS2|M_148GGS4|GY_148GGS4|GY_148GGS5))| \
 516      (4-5*(M_3_KY(|B|BL|H|HL|L)[OB:COAL(43|45|44|40|57)(|[M]),,27]))|(4-5*M_330KS1(4|3|2|1))|            \
 517      (4-5*M_LCK)|(4-5*M_(L|3_LV1))|(4-5*(M_GGH(1|2)(|L)|M_G(2|1|3|2H|2HL)))|(4-5*M_ZS2(|L))|             \
 518      (3-4*(M_3_GJO176(|L)|M_3_LZ139103(|L)),MAV_3_RT510390(|L))|                                                         \
 519      (4-5*(M_3_G(|L|H|HL|U|UHL|UH|U193|U193L|Z|ZL|ZE141433L|ZE141433|P|PL|ZKH|ZKHL|ZK|ZKL|HF1)))|        \
 520      (4-5*(M_394RGS12[OB:BOILERRINGS,,12]|M_394RGS13[OB:BOILER3,,12]))|                                  \
 521      (4-5*(M_3_GU(|H|HL)|M_3_GZ(|L)|M_3_GYEKO(|H)(|L)|M_3_GP(|L)|M_3_GHF(0|1)))|                         \
 522      (4-5*(M_157GBGS2|M_157GBGS5|M_157GBGS6|M_157GBGS8|M_157GBGS12|GY_157GBGS2|GY_157GBGS4|GY_157GBGS5))| \
 523      (4-5*(M_395RMMS1[O:BELFA1A,,12]|M_395RMMS2[O:TARP11,,12]|M_393RES12[O:SCRAP18]|M_393RES13[O:SCRAP4]))
 524
 525  # EP 3B Freight long
 526  $DEF H3FL1=(5*H3GS)|                                                                                    \
 527      (<M_KZHL,M_KZH,M_J|M_KZM|M_KZ|M_GZKK|M_GZKKL,M_GZK,M_G3H|M_G1HL|M_G1H|M_G2HL|M_G2H|M_G3HL,          \
 528      M_JZKN|M_JZ|M_JZHL|M_JZH|M_JZKNHL|M_JZH1|M_JZH2,M_072TCS4,M_072TCS7|M_JZKNH,                        \
 529      M_ZA0_BCL|M_785ZAS_MOL|M_785ZAS_BC,M_330KS1,((M_330KS2|M_330KS3|M_330KS11)[OB:BETONPIPE1,,12]),     \
 530      ((M_330KS12|M_330KS13|M_072TCS1)[OB:HIPRES_BURNER,,10]),M_633FCCPP1|M_633FCCPP4L,M_633FCCPP3L,      \
 531      M_633FCCPP5L|M_633FCCPP4|M_633FCCPP4L,M_G1|M_G3|M_G2,M_HS,M_GAXH1,M_GAXH3|M_GAX1L|M_ZS2L,           \
 532      M_216HEKS4|M_216HEKS2|JZ_GDOVGL|M_GGH1|M_GGH2L,M_GGH1L|M_GGH2|JZ_GDOVG,M_806ICHQRS)
 533
 534  # EP 3B Passenger 2x
 535  $DEF H3P2=(<M_BZX59000L,M_BZ52000L,2*M_BZ53000L,M_AZ16000L|M_AZ10000L,M_BZ56000L,M_DNZ64000)|           \
 536      (<M_DNZ64000L,M_BZ52000,2*M_BZ53000,M_AZ16000|M_AZ10000,M_BZ56000,M_BZX59000)
 537
 538
 539  # EP 3 Passenger long distance
 540  $DEF H3PD1=(<M_3B_BA3000L,M_3B_ABA2000L|M_3B_ABA2000,M_3B_AA1000L|M_3B_AA1000,M_3B_WR200L|M_3B_WR200,   \
 541      M_3B_WR200(|L)|M_3B_WR300L|M_3B_WR300,                                                              \
 542      2*(M_3B_BA3000L|M_3B_BA3000|M_3B_BAK5100L|M_3B_BAK5100|M_3B_BAK5300L|M_3B_BAK5300|M_3B_BAK5400L|    \
 543      M_3B_BAK5400),M_3B_BAKET3800|M_3B_BAKET3800L)
 544
 545  # EP 3 Passenger long distance
 546  $DEF H4P1=(5*(M_785ZAS0|M_785ZAS1|M_785ZAS2|M_785ZAS3L|M_785ZAS3|M_785ZAS4L|M_785ZAS4|M_785ZAS5L|       \
 547      M_785ZAS5))
 548
 549  # EP 4 Freight short
 550  $DEF H4FS=(1-2*M_930UACES)|(3-5*(GY_148GGS(1|2)|M_GGS2))|                                               \
 551      (3-5*(M_555ES(2|4)(|H|B|BL)([OB:(GLASS4|TYRE1)(|[M]),,26]|[OB:SCRAP13(|[M]),,25])))|                \
 552      (3-5*(M_683FACCPPS(1|3)(1|2|3|4|5)[OB:Sand(14|5|15)([|M]),,(38|39|37)]))|                           \
 553      (4-5*(M_4_GKLM_KOBANYAI|M_GGS2|(GY|M)_148GGS(1|2|3|4|5)))|                                          \
 554      (4-5*(M_4_ES5550(|L)[OB:COAL(43|45|44|40|57)(|[M]),,27]|                                            \
 555      M_4_ES5557(B|BL|H|HL)[OB:COAL(43|45|44|40|57)(|[M]),,27]))|(2-3*(GY_157GBGS(1|2)|M_157GBGS12))|     \
 556      (1-3*(M_UARS(|L)))|(1-3*(M_395RMMS(1|2|3)[OB:(TRK06|CLAAS_EUROPA|K700A),,11]))|                     \
 557      (2-3*(M_394RGS1(1|2|3)[OB:RAIL1,15,11][OB:RAIL1,95,11]))|(2-3*(M_072TCS(1|2|3)))|(2-3*M_PULTR(|1))
 558
 559  # EP 4 Freight long
 560  $DEF H4F1=5*H4FS
 561
 562  # EP 5 Long distance
 563  $DEF H5PL1=(<M_Z1DWA_AVMZML,M_Z1CAF_AMZML,M_Z1GOSA_ABMZ(|O)ML,M_Z1DWA_WRBUMZML,3*M_Z1GOSA_BMZML,        \
 564      3*M_Z1DWA_BPMML)|                                                                                   \
 565      (<3*M_Z1DWA_BPMM,3*M_Z1GOSA_BMZM,M_Z1DWA_WRBUMZM,M_Z1GOSA_ABMZ(|O)M,M_Z1CAF_AMZM,M_Z1DWA_AVMZM)
 566
 567  # EP 5 Passenger regional
 568  $DEF H5PR1=(<MAVS_BP2,MAVS_BHV,MAVS_BDBHV,MAVS_BDT)|(<4*M_BHV_(A|D)2(|L))|                              \
 569      (<2*(M_2917(A|D)2|M_2905BP2(|L)),M_1917(A|D)2(|L)|M_3917A2(|L)|M_1027(A|D)2(|L),                    \
 570      2*(M_2917(A|D)2|M_2905BP2(|L)))
 571
 572  # EP 5 Freight long
 573  $DEF Z_H_E5_G1=GY_148GGS1,GY_148GGS2,M_082TADGS2,M_082TADGS3,M_UAGPS933A,M_765ZA2,M_ZANS_KVG_MOL,       \
 574      M_245HBBILLNS,M_533EAOS2|M_595EAS1,M_SHIMMS,M_477SHIMMSSL,G_SHIMMNST_Y25_4,                         \
 575      M_593EAMS11|M_533EAOS3|M_595EASX1,M_595EASX3,M_393RES1[O:STEEL16],M_394RGS11[OB:PIPE41,,12],        \
 576      M_181GABS2,M_GAGSV1,M_157GBGS11,M_683FACCPPS2,M_683FACCPPS22,M_633FCCPP3,M_633FCCPP2L
 577
 578  # EP 6 Freight shunting
 579  $DEF H6F1R=(2-3*G_5_EAS(|L)[O:SCRAP(6|4|5)(|[M])])|(4-5*M_654FAL(1|2|3|4|5))|(2-3*M_683FACCPPS5(1|2))|  \
 580      (2-3*(GY_246HBBILLNS|G_HBBILLNS|M_245HBBILLNS(|1)))|(2-3*M_227HBILS(|2))|                           \
 581      (2-3*(M_246HBBILLNNS(1|2|3|4)))|(M_293HILLMRRS(|2))|(M_277HABIS(|2))|(1-2*M_354RILS)|               \
 582      (3-4*M_SHIMMS(|D|U|U2)(|L))|(2-3*GY_082TADGS|M_082TADGS(1|2|3|4))|                                  \
 583      (3-4*MAV_UAGPPS1|M_UAGPS933A|M_UAGPS933B)|(3-4*M_ZAES_1(1|2|3|4|0|5)(|L))|                          \
 584      (3-4*GY_HBBILLNS24620(02|12|00)(|L))|(2-3*M_RAG_530074_AFOR(|L))|(3-4*GY_TADGSM(|L))
 585
 586  # EP 6 Freight short
 587  $DEF H6F1S=3*H6F1R
 588
 589  # EP 6 Freight long
 590  $DEF H6F1=6-8*H6F1R
 591
 592  # EP 6 Long distance
 593  $DEF H6PL1=(<,MAVS_Z1CAF_APMZML,MAVS_Z1CAF_AMZML,MAVS_Z1GOSA_ABMZML,MAVS_WRM8881L,3*MAVS_Z1CAF_BMZML,   \
 594      3*MAVS_Z1GOSA_BMZML)|                                                                               \
 595      (<3*MAVS_Z1GOSA_BMZM,3*MAVS_Z1CAF_BMZM,MAVS_WRM8881,MAVS_Z1GOSA_ABMZM,MAVS_Z1CAF_AMZM,              \
 596      MAVS_Z1CAF_APMZM)
 597
 598  # EP 6 Passenger regional
 599  $DEF H6PR1=(<M_9580AL|M_9247CL,MAVS_BP3,3*MAVS_BHRV)|                                                   \
 600      (<(3*MAVS_BHRV),MAVS_BP3,M_9247C|M_6BD8444|M_9580A)|(<M_BYEE2155RL,2*M_BYEE2155GL)|                 \
 601      (<M_BYEE2155G,2*M_BYEE2155R,M_BYDEE8455R)|(<4*M_BHV_(A|D)2(|L),M_BHV22)
 602
 603  # EP 6 Passenger regional push and pull L
 604  $DEF H6PRL=(<MAVS_BYDEE,MAVS_ABYEE,MAVS_BYEE,MAVS_BYBDTEE)|(<M_BYBDTEEL,M_HALB_ABY(|L),2*M_HALB_BYL)|   \
 605      (<M_BYBDTEE8055AL|M_BYBDTEE8055L,M_ABYEE3155L,M_BYEE2155L,M_BYDEE8455L|M_BYDEE8455AL)|              \
 606      (<M_BYBDTEEL,M_HALB_ABY(|L),MAVS_BMX2105,MAVS_BDMPEE8405)
 607
 608  # EP 6 Passenger regional push and pull R
 609  $DEF H6PRR=(<MAVS_BMX2105,MAVS_BDMPEE8405,M_HALB_ABY(|L),M_BYBDTEE1)|                                   \
 610      (<(2*M_HALB_BY1),M_HALB_ABY(|L),M_BYBDTEE1)|(<M_BYDEE8455,M_BYEE2155,M_ABYEE3155,M_BYBDTEE8055)|
 611
 612  # EP 6 Passenger historic pre-War 2x cars
 613  $DEF H6PH1=MNOS_SR8929,MNOS_AB3420574,MNOS_AB3420059,MNOS_WRR8821,MNOS_BP2421416,MNOS_BP2421743
 614
 615  # EP 6 Passenger historic pre-War 4x cars
 616  $DEF H6PH2=MNOS_DA6404,(<MNOS_ABAU630,MNOS_WR2347,MNOS_ABA2305,MNOS_CAU14821)
 617
 618  # EP 6 Passenger historic post War 4x cars
 619  $DEF H6PH3=(MNOS_DA6404,                                                                                \
 620      (<MNOS_WR252,MNOS_9940051,MNOS_9940300|MNOS_9940301G,MNOS_9940002|MNOS_WLS8969053,                  \
 621      MNOS_WLS8969054|MNOS_WL7029362,MNOS_9940309))|                                                      \
 622      (MNOS_ISTROPOLITAN|MNOS_WLS8969056,MNOS_PIANO,MNOS_9910055,                                         \
 623      MNOS_WR8829425|MNOS_WRM8881029|MNOS_WRM8881012|MNOS_WRM881004,MNOS_BDPZ8436,                        \
 624      MNOS_WLDSM8971|MNOS_ORFEUM,MNOS_BPZ2936015)
 625
 626  # EP 6 Passenger GYSEV
 627  $DEF H6PG1=(3*GY_BY2130A,GY_ABY3130AL|GY_ABY3130A,GY_BY2130AL)|                                         \
 628      (<GY_BY2130(|B)(|L),GY_ABYZ2|GY_ABY3130L|GY_ABY3130BL,2*GY_BY2130(|L),GY_BYD8433L|GY_BYD8433)|      \
 629      (<GY_BYD8433L|GY_BYD8433,2*GY_BY2130(|B|A),GY_ABYZ2|GY_ABY3130|GY_ABY3130B,GY_BY2130(|B)(|L))|      \
 630      (<GY_BY2130L|GY_BY2130,GY_ABYZ2|GY_ABY3130,2*GY_BY2130(|B|A)(|L),GY_BYD8433L|GY_BYD8433)|           \
 631      (GY_1033|GY_AP1905|GY_1067C,4*(GY_2033|GY_2067C),GY_BDB1)|                                          \
 632      ((4*(GY_2033|GY_2067C)),GY_1033|GY_AP1905|GY_1067C)|(4*GY_BPZ2935A,GY_BDB|GY_BDB8436)
 633
 634  #----------------------------------------------------------------------------------------------------
 635  #
 636  # Germany
 637
 638  # EP 1 Bavaria Passenger regional secondary lines
 639  $DEF D1PLB=BAY_PWIL96,BAY_BCIL05,BAY_CIL98,BAY_CI10S
 640
 641  # EP 1 Bavaria Freight short
 642  $DEF D1FBS=(<BAY_G10,BAY_X_HOLZ,BAY_R10B_HOLZ,BAY_R10G_HOLZ,BAY_H_HOLZ)|                                \
 643      ((BAY_PWG_PFALZ(|L)),KPEV_G10_MBH(|L),MARK_45101A,BAY_OH2)|                                         \
 644      (4-5*(BAY_HG1|HG53|HG54|HG47|BAY_PB|BAY_OH2|BAY_G250L|BAY_G250|BAY_GM))
 645
 646  # EP 1 Bavaria Freight long
 647  $DEF D1FBL=BAY_PWG_PFALZ(|L),10*(BAY_HG1|HG53|HG54|HG47|BAY_PB|BAY_OH2)
 648
 649  # EP 1 Freight Wuerttemberg short
 650  $DEF D1FWS=(WUE_J66VR1L,WUE_J66(S|V)R(2|3|4)(|L),WUE_NI3(S|V)POST,WUE_O73(S|V)G(|L),                    \
 651      WUE_OC(S|V)SEEL(|L),WUE_GMVG(|L))|                                                                  \
 652      (<WUE_OC(S|V)N(1|2)(|L),WUE_G10VHG(|L),                                                             \
 653      WUE_G10(S|V)H(KNOR|LEIB|MAE1|MAE2|MAE3|SHB1|SHB2|STFB|SWBB)(|L),WUE_OMQ(S|V)H(N|G)(|L))|            \
 654      (<WUE_OC(S|V)FRNK(|L),WUE_S86(S|V)SG(|L),WUE_NI3(S|V)G(1|5|2|3|4),WUE_NI3(S|V)FW,WUE_OC(S|V)G(|L),  \
 655      WUE_O89(S|V)HG(1|2)(|L))|                                                                           \
 656      (<WUE_OMK(S|V)_G(1|2)(|L),WUE_G10(S|V)H(SALA|STFF|WACK)(|L),                                        \
 657      WUE_G10(S|V)H(BAER|CLUS|ENG1|ENG2|ESL1|ESL2|HGST|HONE)(|L),WUE_OMK(S|V)(|H)(R|N)(|L))|              \
 658      (<WUE_OM12(S|V)HG(1|2)(|L),WUE_OM12(S|V)HR(|L),WUE_NI3(S|V)HZWG(|L),WUE_OM12(S|V)R,WUE_X63SR2(|L),  \
 659      WUE_S86(S|V)S_N(|L))|                                                                               \
 660      (<WUE_OM12(S|V)MAE,WUE_G10(S|V)H(WGBR|ULAG|UPIL|VERB|WUL1|WUL2|WUL3|WUL4|ZOLL)(|L),                 \
 661      WUE_GML(VG|SN|SG)(|L),WUE_N63VS_N(|L),WUE_NI1SLCHT|WUE_NI1SGOES|WUE_NI1(S|V)_BWG)|                  \
 662      (<WUE_G10(S|V)HGMI(1|2)(|L),WUE_GMSG(|L),WUE_NI1(S|V)N(1|2),WUE_NI1(S|V)G,WUE_N63(S|V)S_N(|L),      \
 663      WUE_N63(S|V)SG(|L))|                                                                                \
 664      (<WUE_NI3(S|V)HZWG(|L),WUE_GMLVG(|L),WUE_GMLSN(|L),WUE_GMLSG(|L),WUE_GMVG(|L),WUE_OM12(S|V)G)|      \
 665      (<WUE_G10TBTL,WUE_TBTKRANL|WUE_TBTKRAN,WUE_G10TBT,WUE_REGENSBURG_PYLL|WUE_REGENSBURG_TBT(|L),       \
 666      WUE_N63VS_N(|L),WUE_NI1SLCHT|WUE_NI1SGOES|WUE_NI1(S|V)_BWG)|                                        \
 667      (<WUE_OM12(S|V)HG(1|2)(|L),WUE_OM12(S|V)HR(|L),WUE_NI3(S|V)G(1|5|2|3|4),WUE_NI3(S|V)HZWG(|L),       \
 668      WUE_X63SR2(|L),WUE_S86(S|V)S_N(|L))|                                                                \
 669      (<WUE_OM12(S|V)MAE,WUE_G10(S|V)H(WGBR|ULAG|UPIL|VERB|WUL1|WUL2|WUL3|WUL4|ZOLL)(|L),                 \
 670      WUE_G10SHGL|WUE_G10VG,WUE_OM12(S|V)R)|                                                              \
 671      (WUE_J66VR1L,WUE_J66(S|V)R(2|3|4)(|L),WUE_NI3(S|V)POST,WUE_O73(S|V)G(|L),WUE_OC(S|V)SEEL(|L),       \
 672      WUE_GMVG(|L))
 673
 674
 675  # EP 1 Freight Wuerttemberg long
 676  $DEF Z_D_E1_GW=(KPEV_PWGL~KDS|KPEV_PWG~KDS,WUE_OM12VHNL,WUE_OM12SHNL,WUE_OM12SN,WUE_Z2VHBSHM,           \
 677      WUE_EKWVHBRNL|WUE_EKWVHBRN,WUE_EKWSHBSHL|WUE_EKWSHBSH,WUE_EKWVHKNO|WUE_EKWVHKNOL,                   \
 678      WUE_EKWSHZE2L|WUE_EKWSHZE2,WUE_G10SHN,WUE_G10VN,WUE_G10VHN,KPEV_OMK,KPEV_OMK1,WUE_OCVN1L,           \
 679      WUE_X63SR2L,WUE_X63SR1L)|                                                                           \
 680      (WUE_PW70G(2|1)(|L),WUE_HS(0|1)G(|L),WUE_H89(B|A)G(|L),WUE_F46(B|A),WUE_X63(S|V)G(|L),              \
 681      WUE_OU(S|V)G(|L),WUE_K71(S|V)(G|N)(|L),WUE_J66(S|V)G(1|2|3)(|L),WUE_SS90(S|V)SCH,                   \
 682      WUE_L60(S|V)_H(|L),WUE_H10(S|V)_H(|L),WUE_OMK(S|V)HKTW(|L),WUE_G47(B|A)[O:SCRAP17,,21],WUE_SS90V,   \
 683      WUE_NI3(S|V)(ZAHN|WDHN|UBRG|PBIE|HCHT|DINK),WUE_X66(S|V)SG(|L)[OB:SPARE3,,13],                      \
 684      WUE_RM(1|0)1(N|G)[OB:BOILER1,,12],WUE_RM(1|0)2(N|G)[OB:BOILER4,,12])|                               \
 685      (WUE_NI3(S|V)PWG(2|1)(|L),3*D1FWS)|                                                                 \
 686      (WUE_NI3STNCH|WUE_NI3VTNCH,(<WUE_HRMZ(S|V)),WUE_Z2(S|V)HNGRN(|L),WUE_H56(A|B),WEG_G10(S|V)H(|L),    \
 687      (<WUE_HRMZ(S|V),WUE_HRMZ(S|V)H(B|G)),WUE_HRMZBS,WUE_HRMZBV,WUE_NI2(S|V)(G|N),                       \
 688      WUE_NI1VGOES|WUE_NI1VLCHT,WUE_G10(S|V)HMAE0(|L),WUE_H10(S|V),                                       \
 689      WUE_SSS95(S|V)[O:OBB_RWB,18,12][O:BOX_FRICHS,,12][O:#OBB_RWB,79,12],WUE_M69(S|V)G(|L),              \
 690      WNB_G10(S|V)H(G|N)(|L),WUE_L60(S|V),WUE_HRMZ(S|V)H(B|G)L,WUE_SML(S|V)(|L)[OB:RAIL1,,12],            \
 691      WUE_LAT(S|V)S(3|2|1)(|L),WEG_G10(S|V))|                                                             \
 692      (WUE_NI1(S|V)PFWG,                                                                                  \
 693      15*((WUE_EKW(S|V)HDP(3|2|1)(|L)|WUE_EKW(S|V)HB(SH|RN|K1|K2)(|L)|WUE_Z3(S|V)HZEL(2|1)(|L)|           \
 694      WUE_Z3VHPRIV(|L)|WUE_Z2(S|V)HZEL(2|1)(|L)|WUE_EKW(S|V)HOL(2|1)(|L)|WUE_EKW(S|V)HSWK(|L)|            \
 695      WUE_EKW(S|V)HZE(2|1|3|4)(|L)|WUE_GAS96SS(|L))))
 696
 697
 698  # EP 1 Passenger regional Wuerttemberg long
 699  $DEF D1PR1=(WUE_GEP_1891(|L)|WUE_GEP_B1891(|L)|WUE_PWI09B(|L)|WUE_PWI_1909(|L)),                        \
 700      (<WUE_D1(|L),WUE_E(1|2|4A)(|L),WUE_AC2G(|L)|WUE_D2(|L),WUE_E4_(1|2|3|3A|4)(|L),                     \
 701      WUE_A23(|L)|WUE_ABI_1877(|L),WUE_ABI_1877AL|WUE_ABI_1877A,WUE_CIL|WUE_CI,WUE_D2B|WUE_D2BL)
 702
 703  # EP 1 Prusia Freight shunting
 704  $DEF D1FPR=(2-3*(KPEV_W4L|KPEV_W4|KPEV_W4BL|KPEV_W4B|KPEV_W3L|KPEV_W3|KPEV_W3BL|KPEV_W3B))|             \
 705      (2-3*(KPEV_WOOD1))|(2-3*(KPEV_OMK|KPEV_OMK1))|(2-3*(WUE_Z2SHBSHM(|L)))|                             \
 706      (2-3*(KPEV_H2L|KPEV_H2|KPEV_H1|KPEV_H1L))|                                                          \
 707      (2-3*(KPEV_1_VWH2C1(A|B)(|H)(|L)|KPEV_1_VHA8(|H)(|L)|KPEV_1_VH2D10(|K)(|H)(|L)))|                   \
 708      (2-3*(KPEV_G10_MBHL|KPEV_G10_MBH))|(2-3*WUE_Z2SHBSHM|WUE_Z2VHBSHML)|                                \
 709      (2-3*(KPEV_1_OTRUIIC(6|12)(|H|HL)[O:FR_KO(36|40|41|64)(|[M])]))
 710
 711  # EP 1 Prusia Freight short
 712  $DEF D1FPS=(KPEV_PWG92CL|KPEV_PWG92C),3*D1FPR
 713
 714  # EP 1 Prusia Freight long
 715  $DEF Z_D_E1_GP=(KPEV_PWG92CL|KPEV_PWG92C),8*D1FPR
 716
 717  # EP 1 Prusia Passenger long distance
 718  $DEF D1PPD=KPEV_POST4PR(|L),KPEV_PW4UPR04|KPEV_PW4U07(|L),                                              \
 719      (<(2*KPEV_C4UPR08),KPEV_WR4U_PR11,KPEV_ABC4UPR09,KPEV_AB4PR94(|L),KPEV_ABC4UPR09L,KPEV_C4UPR08)|    \
 720      (<KPEV_C4U08L,KPEV_AB4U07L,KPEV_AB4U07L,KPEV_C4U08L,KPEV_WR0973,KPEV_ABC4U06)|                      \
 721      (<KPEV_C4U08,KPEV_AB4U07,KPEV_AB4U07,KPEV_C4U08,KPEV_WR0973L,KPEV_ABC4U06L)
 722
 723  # EP 1 Prusia Passenger 3 axle main lines
 724  $DEF Z_D_E1_PP1=(KPEV_POST3AL|KPEV_POST3A,KPEV_PW302L|KPEV_PW302,3*(KPEV_D3TR04HL|KPEV_D3TR04H),        \
 725      KPEV_AB3_91HL|KPEV_AB3_91H,KPEV_BC3PR92L|KPEV_BC3PR92,                                              \
 726      3*(KPEV_C3_04HL|KPEV_C3_04H|KPEV_C3_91HL|KPEV_C3_91H))|                                             \
 727      (KPEV_PW302L,(KPEV_C3_04HL,KPEV_C3_04H,KPEV_B3_07H(|L),KPEV_C3_04HL,KPEV_D3_00HL,KPEV_D3_00H))
 728
 729  # EP 1 Prusia Passenger 2 axle secondary lines
 730  $DEF D1PPN=KPEV_PWPOSTG(|L)|KPEV_PWPOSTIKL|KPEV_PWPOSTIK,                                               \
 731      (KPEV_DI95K|KPEV_DI95KL,KPEV_CDI95K,KPEV_BCI95K,KPEV_BCI95KL,KPEV_CI95KL|KPEV_CI95K,KPEV_CDI95KL)
 732
 733  # EP 1 Prusia Passenger semi-fast train
 734  $DEF Z_D_E1_PPS=(KPEV_POST4PRL|KPEV_POST4PR),(KPEV_C4PR12H|KPEV_PW4PR16AL|KPEV_PW4PR16A),               \
 735      2*(KPEV_C4PR94L|KPEV_C4PR94),(KPEV_AB4PR94L|KPEV_AB4PR94),2*(KPEV_C4PR94L|KPEV_C4PR94)
 736
 737  # EP 1 Saxonia Freight long
 738  $DEF D1FSAL=SAX_PWSA07,6-8*KPEV_GH(|L),                                                                 \
 739      8-10*SAX_OMKU(|H|HL)[O:(FR_KO36|FR_KO38|BRMB_L_KOHLE|FR_KO41)(|[M]),,27],3-5*WUE_G10(VN|SN|SHNL|SHN)
 740
 741  # EP 2 Passenger long distance night
 742  $DEF D2PN1=DRG_PW4UPR16BL|DRG_PW4UPR16B,DRG_ABC4UPR06B|DRG_ABC6UPR07B,                                  \
 743      (DRG_WL6U_20051G|DRG_WL6U_20051B|DRG_WL6U_20084G|DRG_WL6U_20084B),                                  \
 744      2*(DRG_WL6U_20189G|DRG_WL6U_20189B),(DRG_WL4U_20026GL|DRG_WL4U_20026DL),                            \
 745      (DRG_WR6U_761L|DRG_WR6U_761|DRG_WR4U_789L|DRG_WR4U_789)
 746
 747  # EP 2a Passenger long distance prusian cars
 748  $DEF D2PDPA=(DRG_PW4UPR07BL|DRG_PW4UPR07B,DRG_C4UPR94BL,DRG_WR4U_404G,DRG_AB4UPR93C,DRG_BC4UPR14BL,     \
 749      DRG_C4UPR11ABL,DRG_C4UPR13BSL)|                                                                     \
 750      (DRG_PW4UPR07BL|DRG_PW4UPR07B,                                                                      \
 751      (<DRG_C4UPR13BL|DRG_C4UPR13B2L,DRG_AB4UPR07B,DRG_AB4UPR09AB,DRG_WR4U_792L|DRG_WR4U_792,             \
 752      DRG_AB4UPR15B,DRG_C4UPR06B|DRG_C4UPR08B,DRG_ABC4UPR08B))|                                           \
 753      (DRG_PW4UPR07BL|DRG_PW4UPR07B,DRG_C4UPR94BL,DRG_WR4U_404G,DRG_AB4UPR93C,DRG_BC4UPR14BL,             \
 754      DRG_C4UPR11ABL,DRG_C4UPR13BSL)
 755
 756  # EP 2b Passenger long distance prusian cars
 757  $DEF D2PDPB=(DRG_PWPOST4UPR08BL|DRG_PWPOST4UPR08B,DRG_AB4UPR07A,DRG_AB4UPR09AA,DRG_C4UKPR13A,           \
 758      DRG_ABC4UPR08A|DRG_BC4UPR09|DRG_ABC4UPR09)|                                                         \
 759      (DRG_POST4UA17L2|DRG_POST4UA17L3,DRG_PW4UPR02BBL|DRG_PW4UPR02BB,                                    \
 760      (<DRG_C6UPR07AL|DRG_C6UPR07A,DRG_B4UPR20AL|DRG_B4UPR20A|DRG_AB6U06L,DRG_AB4UPR07AL|DRG_AB4UPR07A,   \
 761      DRG_WR6U_222RL|DRG_WR6U_222R,DRG_C4UPR11ABL|DRG_C4UPR11AB,DRG_ABC4UBAY04AL|DRG_ABC4UBAY04A))
 762
 763  # EP 2a Passenger long distance train Oldenburg cars
 764  $DEF D2PDOA=DRG_POST4_12|DRG_POST4_12L,DRG_PW4UPR07BL,                                                  \
 765      (<DRG_ABC4U_OLD10B|DRG_BC4U_OLD15B,2*DRG_AB4U_OLD12B,DRG_AB4UPR15B,DRG_C4UKPR13B,3*DRG_C4U_OLD12B,  \
 766      DRG_C4U_OLD17B)|                                                                                    \
 767      (<DRG_C4U_OLD17BL,3*DRG_C4U_OLD12BL,DRG_C4UKPR13BL,DRG_AB4U_OLD12BL,DRG_AB4UPR15BL,                 \
 768      DRG_ABC4U_OLD10BL|DRG_BC4U_OLD15BL)|                                                                \
 769      (DRG_POST4UA17L|DRG_POST4UA17,DRG_PW4UPR02BBL|DRG_PW4UPR02BB,                                       \
 770      (<DRG_C4U_OLD17BL|DRG_C4U_OLD12BL,                                                                  \
 771      DRG_ABC4UPR06BL|DRG_BC4UPR09AL|DRG_BC4UPR11BL|DRG_BC4UPR09AL|DRG_BC4UPR16BL,DRG_AB4U_OLD12BL,       \
 772      DRG_WR4U_404G|DRG_WR4U_407G,DRG_C4U_OLD12B,DRG_BC4U_OLD15B))
 773
 774  # EP 2b Passenger long distance train Oldenburg cars
 775  $DEF D2PDOB=(DRG_POST4B17PR2|DRG_POST4B17PR2L,DRG_PW4UPR10BL|DRG_PW4UPR10B,                             \
 776      DRG_C4U_OLD12A|DRG_C4U_OLD17A,DRG_AB4UPR15A,DRG_AB4U_OLD12A,DRG_WR6U_909L|DRG_WR6U_909,             \
 777      DRG_ABC4U_OLD10A|DRG_BC4U_OLD15A,DRG_C4U_OLD17AL)
 778
 779  # EP 2a-b Passenger long distance badenian cars
 780  $DEF D2PDBA=DRG_PW4U_BAD06(|L),                                                                         \
 781      (<2*DRG_C4UPR08A,DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35),DRG_WR4U_7(92|89),                        \
 782      DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35),DRG_ABC4U_BAD(11B35|06B|04B),                              \
 783      2*DRG_C4U_BAD(07B35|07B35A|03B))|                                                                   \
 784      (>2*DRG_C4UPR08AL,DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35)L,DRG_WR4U_7(92|89)L,                     \
 785      DRG_AB(4UE01B35|6U_BAD08B35|4U_BAD07B35)L,DRG_ABC4U_BAD(11B35|06B|04B)L,                            \
 786      2*DRG_C4U_BAD(07B35|07B35A|03B)L)
 787
 788  # EP 2a-b Passenger long distance bavarian cars
 789  $DEF Z_D_E2_PBB=(DRG_PW4UPR02BBL|DRG_PW4UPR02BB,DRG_C4U_BAD07A35A,DRG_C4U_BAD07A35,DRG_AB6U_BAD08A35L,  \
 790      DRG_AB4UBAY01|DRG_AB4UBAY02~LB|DRG_AB4UBAY02_30,                                                    \
 791      DRG_ABC4U_BAD11A35L|DRG_ABC4UBAY04B|DRG_ABC4UBAY08B|DRG_ABC4UBAY08A,DRG_C4UPR07A,DRG_C4UPR08A,      \
 792      DRG_C4UKPR13AL)|                                                                                    \
 793      (DRG_PW4UBAY09,DRG_POST4UA173,DRG_C4UBAY13,DRG_C4UBAY11,DRG_WR4U_212G,DRG_AB4UBAY08A,               \
 794      DRG_AB4UBAY08_11A,DRG_C4UBAY98,DRG_ABC4UBAY97L)|                                                    \
 795      (DRG_PW4UBAY06L~LB|DRG_PW4UBAY06~LB,DRG_C4UBAY98,DRG_BC4UBAY99|DRG_B4UBAY03B|DRG_B4UBAY03A,         \
 796      DRG_AB4UBAY08AL,DRG_WR6U_101DL|DRG_WR6U_222DL|DRG_WR6U_222D,DRG_AB4UBAY08L,                         \
 797      DRG_AB4UBAY08A|DRG_AB4UBAY08_11B,DRG_AB4UBAY98|DRG_AB4UBAY01B,DRG_C4UBAY03B|DRG_C4UBAY03A)
 798
 799  # EP 2a Passenger long distance saxonian cars 1930
 800  $DEF D2PDS=DRG_PW4USA07(|L),                                                                            \
 801      (<3*DRG_C4USA(05B|07B|18A),DRG_AB4USA(09|16)B,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)B,               \
 802      2*DRG_C4USA(05B|07B|18A),DRG_ABC4USA(08BB|03))|                                                     \
 803      (>3*DRG_C4USA(05B|07B|18A)L,DRG_AB4USA(09|16)BL,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)BL,            \
 804      2*DRG_C4USA(05B|07B|18A)L,DRG_ABC4USA(08BB|03)L)
 805  # EP 2a Passenger long distance saxonian cars 1936
 806  $DEF D2PDS6=DRG_PW4USA(07|18)(|L),DRG_POST4UA20_1928(|L),                                               \
 807      (<3*DRG_C4USA(05A|07A|18B),DRG_AB4USA(09|16)A,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)A,               \
 808      2*DRG_C4USA(05A|07A|18B),DRG_ABC4USA(08B|03)A)|                                                     \
 809      (>3*DRG_C4USA(05A|07A|18B)L,DRG_AB4USA(09|16)AL,DRG_WR6U_222G(|L),2*DRG_AB4USA(09|16)AL,            \
 810      2*DRG_C4USA(05A|07A|18B)L,DRG_ABC4USA(08B|03)AL)
 811
 812  # EP 2 Passenger long distance DRG cars
 813  $DEF Z_D_E2_PB2=DRG_PW4U36B37L|DRG_PW4U36B37,                                                           \
 814      (<DRG_AB4U35L,DRG_AB4U26AAL,DRG_WR4U35_1088L|DRG_WR4U35_1088,2*DRG_AB4U35)
 815
 816  # EP 2a-b Passenger semi-fast train prusian cars
 817  $DEF D2PE1=(DRG_POST4B12PRL|DRG_POST4B12PR,DRG_PW4PR16BL|DRG_PW4PR16B,                                  \
 818      (<DRG_C4PR18TH(|L),DRG_C4PR96HL|DRG_C4PR96H|DRG_C4PR96THL,DRG_B4PR95HL|DRG_B4PR95H,                 \
 819      DRG_B4PR04HL~LB|DRG_B4PR04THL,DRG_C4PR96H|DRG_C4PR96THL))|(DRG_PW4PR04BL|DRG_PW4PR04B),             \
 820      (DRG_C4PR02TH|DRG_C4PR02THL|DRG_C4PR02|DRG_C4PR02L),(DRG_BC4PR04),(DRG_BC4PR98HL|DRG_BC4PR98H),     \
 821      (DRG_B4PR18L|DRG_B4PR18),(DRG_C4PR12TH|DRG_C4PR12THL),                                              \
 822      (DRG_POST3C10PRML|DRG_POST3C10PRM)|                                                                 \
 823      (DRG_PW4PR04BL|DRG_PW4PR04B,(DRG_BC4PR05H|DRG_BC4PR05HL|DRG_BC4PR05|DRG_BC4PR05L),                  \
 824      (DRG_B4PR04HL~LB|DRG_B4PR04THL|DRG_B4PR04L~LB|DRG_B4PR04~LB),                                       \
 825      (DRG_C4PR04L~LB|DRG_C4PR04~LB|DRG_C4PR04H~LB|DRG_C4PR04HL~LB),(DRG_C4PR02|DRG_C4PR02L),             \
 826      (DRG_POST4B17PRL|DRG_POST4B17PR|DRG_POST4B17PR2|DRG_POST4B17PR2L|DRG_POST4B17PR3|DRG_POST4B17PR3L))
 827
 828  # EP 2a-b Passenger semi-fast train Oldenburg cars EP
 829  $DEF D2PE2=(DRG_POST4B12PRML|DRG_POST4B12PRM),(DRG_PW4PR16BL|DRG_PW4PR16B),                             \
 830      (DRG_C4_OLD00HL|DRG_C4_OLD00H|DRG_C4_OLD00L|DRG_C4_OLD00),                                          \
 831      (DRG_BC4_OLD04HL|DRG_BC4_OLD04|DRG_BC4_OLD04H|DRG_BC4_OLD04L),                                      \
 832      (DRG_BC4_OLD02HL|DRG_BC4_OLD02H|DRG_BC4_OLD02L|DRG_BC4_OLD02),                                      \
 833      (DRG_C4_OLD03HL|DRG_C4_OLD03H|DRG_C4_OLD03L|DRG_C4_OLD03)
 834
 835  # EP 2 Passenger regional badenian cars
 836  $DEF D2PR1=((DRG_PW_BAD(11|16)(|L)|DRG_PW3I_BAD03(|L)),(DRG_CIDBAD9212(|L)|DRG_CDIBAD93(|L)),           \
 837      DRG_CID_BAD10(|L),DRG_CID_BAD11(|L),                                                                \
 838      2*(DRG_BI_BAD12(|L)|DRG_BI_BAD02(|U)(|L)|DRG_BI_BAD98(|L)|DRG_BCIBAD11(|L)|DRG_B3IBAD04(|L)),       \
 839      3*(DRG_CID_BAD10|DRG_CID_BAD11)(|L),DRG_CIDBAD98(|L))|                                              \
 840      (DRG_PW_BAD16(|L)|DRG_PW_BAD97(|L),DRG_C_BAD95(|L),2*DRG_C3_BAD07(|U)(|L),DRG_BC3_BAD09(|U)(|L),    \
 841      DRG_BC3BAD(06|11)26(|U)(|L),2*DRG_C3_BAD07(|U)(|L))
 842
 843  # EP 2 Passenger regional bavarian cars
 844  $DEF Z_D_E2_PB3=DRG_PW3I_BAY95|DRG_PW3I_BAY95L,3*(DRG_C3I_BAY21B|DRG_C3I_BAY21BL),                      \
 845      DRG_BC3_BAY91B|DRG_BC3_BAY91|DRG_BC3_BAY91BL|DRG_BC3_BAY91L,DRG_BC3I_BAY07B|DRG_BC3I_BAY07BL,       \
 846      2*(DRG_C3I_BAY99A|DRG_C3I_BAY99AL),DRG_PWI_BAY10L|DRG_PWI_BAY10,DRP_POST3_A10BAY|DRP_POST3_A10BAYL
 847
 848  # EP 2 Passenger regional bavarian cars for secondary lines
 849  $DEF D2PR4=DRG_PWPOSTL_BAY14(|L),DRG_CL_BAY11(|L),DRG_BCL_BAY13|DRG_BCL_BAY13L,                         \
 850      2*(DRG_CL_BAY13L|DRG_CL_BAY13)
 851
 852  # EP 2A Passenger regional prusian cars main line
 853  $DEF D2PR3A=(DRG_POSTC85PR|DRG_POSTC85PRL|DRG_POST_C85PRM|DRG_POSTB85PRL|DRG_POSTB85PR),                \
 854      (DRG_PWPR02AL),(DRG_C3UPR02HL),(DRG_C3PR91BH|DRG_C3PR91BHL),                                        \
 855      2*(DRG_BCPR83HL|DRG_BCPR83H|DRG_BCPR87H|DRG_BCPR87HL),                                              \
 856      (DRG_CPR91BHL|DRG_CPR91BH|DRG_CPR91HL|DRG_CPR91H)|                                                  \
 857      ((DRG_PW3PR11|DRG_PW3PR11S,DRG_C3PR11HL~LB|DRG_C3PR11(S|T)H(|L)|DRG_C3PR11(|L)~LB|DRG_C3PR11S(|L),  \
 858      DRG_C3DTRPR04TH|DRG_C3DTRPR04L|DRG_C3DTRPR04_24TH,DRG_B3PR04HL|DRG_B3PR04|DRG_B3PR10H|DRG_B3PR10L,  \
 859      DRG_BC3PR96HL|DRG_BC3PR96L|DRG_BC3PR96,DRG_C3PR91BL|DRG_C3PR91BH|DRG_C3PR91BHL,                     \
 860      DRG_C3UPR02HA|DRG_C3UPR02,DRG_CPR21H|DRG_CPR21THL|DRG_CPR21L,                                       \
 861      DRG_C3PR11THL|DRG_C3PR11STHL|DRG_C3PR11S))
 862
 863  # EP 2B Passenger regional prusian cars main line
 864  $DEF D2PR3=((DRG_PW3PR11|DRG_PW3PR11S,                                                                  \
 865      DRG_C3PR11HL~LB|DRG_C3PR11(S|T)H(|L)|DRG_C3PR11(|L)~LB|DRG_C3PR11S(|L),                             \
 866      DRG_C3DTRPR04TH|DRG_C3DTRPR04L|DRG_C3DTRPR04_24TH,DRG_B3PR04HL|DRG_B3PR04|DRG_B3PR10H|DRG_B3PR10L,  \
 867      DRG_BC3PR96HL|DRG_BC3PR96L|DRG_BC3PR96,DRG_C3PR91BL|DRG_C3PR91BH|DRG_C3PR91BHL,                     \
 868      DRG_C3UPR02HA|DRG_C3UPR02,DRG_CPR21H|DRG_CPR21THL|DRG_CPR21L,                                       \
 869      DRG_C3PR11THL|DRG_C3PR11STHL|DRG_C3PR11S))|                                                         \
 870      (DRG_PWI28L|DRG_PWI28,                                                                              \
 871      5*(DRG_C3DTRPR04L|DRG_C3DTRPR04|DRG_C3DTRPR04HL|DRG_C3DTRPR04H|DRG_C3DTRPR04AL|DRG_C3DTRPR04A|      \
 872      DRG_C3PR11H~LB|DRG_C3PR11HL~LB|DRG_C3PR11L~LB|DRG_C3PR11~LB),                                       \
 873      DRG_BC3PR08HL|DRG_BC3PR08H|DRG_BC3PR08|DRG_BC3PR08L,                                                \
 874      DRG_B3PR10HL|DRG_B3PR10H|DRG_B3PR10|DRG_B3PR10L,                                                    \
 875      4*(DRG_C3PR11H~LB|DRG_C3PR11HL~LB|DRG_C3PR11SH|DRG_C3PR11SHL|DRG_C3PR11TH|DRG_C3PR11THL|            \
 876      DRG_C3PR11STH|DRG_C3PR11STHL|DRG_C3PR11L~LB|DRG_C3PR11~LB|DRG_C3PR11S|DRG_C3PR11SL))|               \
 877      ((DRG_POST3A10PR|DRG_POST3A10PRL|DRG_POST3A10PRML|DRG_POST3A10PRM),(DRG_PW3PR99A|DRG_PW3PR99AL),    \
 878      (DRG_C3UPR02H|DRG_C3UPR02HL|DRG_C3UPR02L|DRG_C3UPR02),                                              \
 879      (DRG_BCPR21HL|DRG_BCPR21L|DRG_BCPR21|DRG_BCPR21H),(DRG_B3PR04H|DRG_B3PR04THL|DRG_B3PR04L),          \
 880      (DRG_C3PR11TH|DRG_C3PR11THL),2*(DRG_C3DTRPR04HL|DRG_C3DTRPR04H),2*(DRG_C3PR11TH|DRG_C3PR11THL))|    \
 881      ((DRG_POST_B12STL|DRG_POST_B12ST),(DRG_PW3PR11L|DRG_PW3PR11SL),                                     \
 882      (DRG_CPR21HL|DRG_CPR21TH|DRG_CPR21),                                                                \
 883      (DRG_C3PR04HL|DRG_C3PR04|DRG_C3PR04THL|DRG_C3PR04L|DRG_C3PR04H),                                    \
 884      (DRG_BC3PR11HL|DRG_BC3PR11L|DRG_BC3PR11|DRG_BC3PR11H),                                              \
 885      (DRG_BC3PR91H|DRG_BC3PR91HL|DRG_BC3PR91L|DRG_BC3PR91),                                              \
 886      (DRG_C3UPR02H|DRG_C3UPR02L|DRG_C3UPR02HAL|DRG_C3UPR02AL|DRG_C3UPR02A),                              \
 887      2*(DRG_C3PR11TH|DRG_C3PR11THL),(DRG_C3DTRPR04TH|DRG_C3DTRPR04THL))
 888
 889  # EP 2A Passenger regional prusian cars for secondary lines
 890  $DEF D2PR4A=((DRG_PWPOSTI92L|DRG_PWPOSTI92),DRG_C3IPR14L|DRG_C3IPR14,DRG_BC3IPR10L|DRG_BC3IPR10,        \
 891      DRG_CC3IDPR07L|DRG_CC3IDPR07)|                                                                      \
 892      (DRG_PW3IPR91L|DRG_PW3IPR91,                                                                        \
 893      DRG_CIPR93L|DRG_CIPR93|DRG_CIPR86BL|DRG_CIPR86B|DRG_CIDPR88L|DRG_CIDPR88,                           \
 894      DRG_BCIPR90L|DRG_BCIPR90|DRG_BCIPR91L|DRG_BCIPR91,DRG_BIPR91L|DRG_BIPR91|DRG_BIPR96L|DRG_BIPR96,    \
 895      DRG_CIPR86L|DRG_CIPR86|DRG_CIPR86AL|DRG_CIPR86A|DRG_CIPR86CL|DRG_CIPR86C)|                          \
 896      ((DRG_POST_C85PRML),(DRG_PWPR02A|DRG_PWPR02AL),(DRG_C3PR02HL|DRG_C3PR02H|DRG_C3PR02L|DRG_C3PR02),   \
 897      (DRG_B3PR91HL|DRG_B3PR91H|DRG_B3PR91|DRG_B3PR91L),(DRG_C3TRPR00HL~LB|DRG_C3TRPR00H~LB),             \
 898      (DRG_C3PR91DH~LB|DRG_C3PR91DHL~LB|DRG_C3PR91D~LB|DRG_C3PR91DL~LB),(DRG_C3PR11H~LB|DRG_C3PR11HL~LB))| \
 899      ((DRG_PWIPR88L|DRG_PWIPR88),(DRG_BPR91H|DRG_BPR91HL|DRG_BPR91AHL|DRG_BPR91AH),(DRG_BC3PR96H),       \
 900      (DRG_C3PR83AH|DRG_C3PR83AHL|DRG_CPR91H),(<DRG_CPR79L,DRG_CPR79),(DRG_CPR86HL|DRG_CPR86H))
 901
 902  # EP 2B Passenger regional prusian cars for secondary lines
 903  $DEF D2PR4B=(DRG_PWPOSTI92L|DRG_PWPOSTI92,DRG_C3IPR14L|DRG_C3IPR14,DRG_BC3IPR10L|DRG_BC3IPR10,          \
 904      DRG_CC3IDPR07L|DRG_CC3IDPR07)|                                                                      \
 905      (DRG_PWPOSTI01L|DRG_PWPOSTI01,DRG_CIPR05L|DRG_CIPR05,DRG_CCIDPR93L|DRG_CCIDPR93,                    \
 906      DRG_CIPR92L|DRG_CIPR92,DRG_BCCIDPR95L|DRG_BCCIDPR95,DRG_BC3IPR91L|DRG_BC3IPR91,                     \
 907      DRG_CIPR83AL|DRG_CIPR83A)|                                                                          \
 908      (DRG_PWPOSTI94L|DRG_PWPOSTI94,DRG_CI31L|DRG_CI31,DRG_BCI34L|DRG_BCI34,DRG_CIPR05BL|DRG_CIPR05B,     \
 909      DRG_CCIDPR05L|DRG_CCIDPR05)|                                                                        \
 910      (DRG_PW3IPR91L|DRG_PW3IPR91,DRG_CIPR93L|DRG_CIPR93,DRG_CIPR91L|DRG_CIPR91,                          \
 911      DRG_BCIPR95L|DRG_BCIPR95|DRG_BCCIDPR95L|DRG_BCCIDPR95,DRG_C3IPR91L|DRG_C3IPR91,                     \
 912      DRG_C3IPR91AL|DRG_C3IPR91A)|                                                                        \
 913      (DRG_PWPOST4IPR11GL|DRG_PWPOST4IPR11G,DRG_CC4IDPR14G1L|DRG_CC4IDPR14G1,                             \
 914      DRG_CC4ITRPR07G1L|DRG_CC4ITRPR07G1,DRG_BC4IPR09GL|DRG_BC4IPR09G|DRG_BC4IPR14GL|DRG_BC4IPR14G,       \
 915      DRG_C4IPR23GL|DRG_C4IPR23G)
 916
 917  # EP 2 Passenger regional wuettembergian cars
 918  $DEF D2PRW1=DRG_POST9_7L|DRG_POST9_7,DRG_PW3IWU20AL|DRG_PW3IWU20A,DRG_CIWU19L|DRG_CIWU19,               \
 919      DRG_CIDWU90L|DRG_CIDWU90|DRG_CICIWU20,DRG_BCIWU08L|DRG_BCIWU08,DRG_BCIWU19L|DRG_BCIWU19,            \
 920      DRG_CIDWU08L|DRG_CIDWU08,DRG_CIDWU21L|DRG_CIDWU21
 921
 922  # EP 2 Passenger regional DRG cars for main lines
 923  $DEF D2PR5B=((DRG_POST3_12STL|DRG_POST3_12ST),(DRG_PW3IWU12L|DRG_PW3IWU12),                             \
 924      (DRG_C3UPR02HAL|DRG_C3UPR02HA),(DRG_CD27L|DRG_CD27),(DRG_C21L|DRG_C21),                             \
 925      (DRG_BC21AL|DRG_BC21A|DRG_CD21A),2*(DRG_C3PR11TH|DRG_C3PR11THL|DRG_C3PR11STH))
 926
 927  # EP 2 Passenger regional DRG cars for secondary lines
 928  $DEF Z_D_E2_PBN=DRG_PWI31AL|DRG_PWI31A,2*(DRG_CI33EL|DRG_CI33E),2*(DRG_BCI34EL|DRG_BCI34E),             \
 929      2*(DRG_CI33EL|DRG_CI33E)
 930
 931  # EP 2a Freight shunting 1920-1925
 932  $DEF D2FCA=(3*(DRG_GMLVHNM(|L)|DRG_2_G_MUE_U|DRG_2_G_MUEL|DRG_2_G_MUE|DRG_2_G_MUE_HL|DRG_2_G_MUE_H))|   \
 933      (2-3*(DRG_2_G_MUE_U|DRG_2_G_MUE(|L)|DRG_2_G_MUE_H(|L)))|(2-3*DRG_KALK1(|L))|                        \
 934      (2*((<DRG_K15(|B|C)HL,DRG_K15(|B|C))|(<DRG_K15(|B|C),DRG_K15(|B|C)H)|(<DRG_K_WUP_AB,DRG_K25H)|      \
 935      (<DRG_K25HL,DRG_K_WUP_ABL)))|(2-3*(DRG_X_ERFURTH(|L)))|(2-3*(DRG_O10J(1|2)|DRG_O11|DRG_O10H~BL))|   \
 936      (2-3*(DRG_NMVHKFMN(|L)|DRG_NMVHALPI(|L)))|                                                          \
 937      (2*(DRG_O10|DRG_O10J2|DRG_O10J3|DRG_O10HL|DRG_O10H|DRG_2_OM_KBGHL|DRG_2_OM_KBGH))|                  \
 938      (2-3*(DRG_O10|DRG_O10J2|DRG_O10J3|DRG_O10HL|DRG_O10H|DRG_2_OM_KBGHL|DRG_2_OM_KBGH))|                \
 939      (2-3*(DRG_RMMS33A|DRG_R10O(|L)))|(2-3*(DRG_R10H[OB:BOILER4,,13]|DRG_R10ROL[OB:BOILER5,,13]))|       \
 940      (2-3*(DRG_SSL25H|DRG_SSY45))|(2-3*(DRG_2_GL_DSNH(|L)|DRG_2_GLR_DSNL|DRG_2_G_MUE_H(|L)))|            \
 941      (2-3*(DRG_2_GW_MGD(|_H)(|L)|DRG_2_G_HAN(_L1VH|_L1VHL|_L1V|_V|_H|_VH|_VHL|_HL|_L1|_L1HL|_L1H)))|     \
 942      (2-3*DRG_2_OM_BSL(H|_AT|_S1|_AT32|_AT32H)(|L)[OB:SCRAP(11|12)(|[M]),,27])|                          \
 943      (2-3*DRG_2_OM_ESN(|U|H)(|L)[OB:COAL(20|40|56)(|[M]),,28])|                                          \
 944      (2-3*((DRG_2_VWH_ALTONA(|R)(|H))|(2-3*DRG_KRUPPTEER(|L))|                                           \
 945      (DRG_2_VH_ALTONA(|FKUV|FKU|KU|KUV|FU|F2UV|U|UV|V)(|H)|DRG_2_V_ALTONA(|H|H2|V|VH|VH2)|               \
 946      DRG_2_V_ALTONA_AB(P|1|2)(|H)|DRG_2_V_HBG)(|L)))|                                                    \
 947      (2-3*(DRG_2_GLPWHS_HAN(|L)|DRG_2_G_HAN|DRG_2_GBAY_HAN_H(|L)))|                                      \
 948      (2-3*(DRG_2_O01A|DRG_OOT8EL|DRG_OOT8E))
 949
 950  # EP 2a Freight short 1920-1925                          9
 951  $DEF D2FCAS=DRGA_PWGPR14(|L),3*D2FCA
 952
 953  # EP 2a Freight long 1920-1925
 954  $DEF D2FCAL=DRGA_PWGPR14(|L),7*D2FCA
 955
 956  # EP 2B Freight shunting 1926-1937
 957  $DEF D2FC1=(2-3*DRG_O_VILLACHH(|L))|(2-3*DRG_GMLVHNM(|L))|                                              \
 958      (2-3*(DRG_MUE_ENGELHARDT(|L)|DRG_MUE_SIMONBRAU(|L)))|(2-3*(DRG_GKHS2L|DRG_GKHS2))|                  \
 959      (2-3*(DRG_K15BH2L|DRG_K15BH2|DRG_K15C|DRG_K15CHL,DRG_K15CH,DRG_K15D))|                              \
 960      (2-3*(DRG_TNFS32|DRG_TNFS32HL|DRG_TNFS32H))|(2-3*DRG_R31H(M|BM)(|L)[OB:PIPE(21|16),,12])|           \
 961      (2-3*DRG_R31H(|B)(|L)[OB:BARREL1(4|5),,16])|(1-2*(<DRG_K_WUP_ABL,DRG_K_WUP_AB))|                    \
 962      (2-3*(DRG_BERLIN_GHKSO2|DRG_BERLIN_TKO02K|DRG_TKO02_57|DRG_TKO02_67)(|L))
 963
 964  # EP 2B Freight short 1926-1937
 965  $DEF Z_D_E2_GBK=DRG_PWGPR14(|L),8*(1:D2FC1|3:D2FCA)
 966
 967  # EP 2B Freight long 1926-1937
 968  $DEF Z_D_E2_GB=DRG_PWGPR02A|DRG_PWGPR02AL|DRG_PWGPR14L|DRG_PWGPR14|DRG_PWGIPR92L,                       \
 969      1:(15*DRG_2_OOT3(0|4|6)1(|L))|4:(8*(1:D2FC1|3:D2FCA))
 970
 971  # EP 2B Freight long Leig  1926-1937
 972  $DEF D2FLL=DRG_PWGPR14L|DRG_PWGPR14,                                                                    \
 973      12*((DRG_2_GLLH_DNB2|DRG_GLLMHS37B|DRG_GLLH24BH|DRG_2_GLLH_DNB1|DRG_GLLH12B|DRG_GLLH_PW3PR|         \
 974      DRG_GLLH_PWGPR)(|L))
 975
 976  # EP 2c (1938-44) Passenger regional
 977  $DEF D2PR2=DRG_2C_PWI30L,5*(DRG_2C_MCI43L|DRG_2C_MCI43)
 978
 979  # EP 2c (1938-44) Passenger long distance
 980  $DEF Z_D_E2_PC=0-1*DRG_POST4A21_2C(|L)~JMU,DRG_PW4U37_2CL|DRG_PW4U37_2C,                                \
 981      (<2*DRG_C4U38_2C,DRG_AB4U38_2C,DRG_WR4UE39_1148(|L),DRGC_BC4U_39,DRG_C4U38_2C)|                     \
 982      (<DRG_C4U38_2CL,DRGC_BC4U_39L,DRG_WR4UE39_1148(|L),DRG_AB4U38_2CL,2*DRG_C4U38_2CL)|                 \
 983      (<2*DRG_2C_AB4U28,DRG_C4U28_2C,DRG_WR4U28_1001A(|L),DRG_C4U28_2C,2*DRG_2C_AB4U28)|                  \
 984      (<2*DRG_2C_AB4U28L,2*DRG_C4U28_2CL,DRG_WR4U28_1001A(|L),2*DRG_C4U28_2CL,2*DRG_2C_AB4U28L)
 985
 986  # EP 2c (1938-44) Freight shunting
 987  $DEF D2FSCR=(4-5*(DRG_2C_GMHS_BREL|DRG_2C_GMHS_BRE|DRG_2C_GMHS_BRE_BL|DRG_2C_GMHS_BRE_B|DRG_GLMHS36BR|  \
 988      DRG_GLMHS36BL|DRG_GLMHS36O|DRG_GLMHS36L|DRG_GGTHS43AL|DRG_GGTHS43A))|                               \
 989      (4-5*(DRG_O_LINZBL|DRG_O_LINZB|DRG_O_VILLACH(|L)|DRG_O_VILLACHHL|DRG_O_VILLACHH|DRG_O_KLAGENFURT|   \
 990      DRG_O_KLAGENFURTL|DRG_OMM34HT|DRG_O_LINZ|DRG_OMM34HTL))|(4-5*(DRG_RMMS33A))|                        \
 991      (4-5*(DRG_SSY45|DRG_SSY45L|DRG_SSYM46|DRG_SSYM46L)[OB:WH_JAGDP,,12])|                               \
 992      (4-5*((DRG_O_VILLACH(|H)(|L)[OB:FR_KO(51|47|52|44)(|[M]),,29])|                                     \
 993      (DRG_O_KLAGENFURT(|L)[OB:FR_KO(51|47|52|44)(|[M]),,28])))|                                          \
 994      (4-5*((DRG_O_LINZ(|L)[OB:BARREL14,,19]|DRG_O_LINZB[OB:BARREL14,7,19]|                               \
 995      DRG_O_LINZBL[OB:BARREL14,14,19])))|                                                                 \
 996      (4-5*(DRG_THS42S(|L)|DRB_THS42(|L)|DRG_GKHSB(|L)|DRG_TKO02_61(|L)))
 997
 998  # EP 2c (1938-44) Freight short
 999  $DEF D2FSCS=DRG_PWGS_44|DRG_PWGS_44L,2*D2FSCR
1000
1001  # EP 2c (1938-44) Freight long
1002  $DEF Z_D_E2_GC=DRG_PWGS_44|DRG_PWGS_44L,4*D2FSCR
1003
1004  # EP 3a 1950-1956 DB West Germany Long Distance train pre war coaches
1005  $DEF D3PDAL=(<DBP_3A_POST4U20B(|L),DB_3A_PW4UEPR16(|L)|DB_3A_PW4U28(|L),DB_3A_C4UPR08,DB_3A_C4UPR20,    \
1006      DB_3A_C4U28,DB_3A_AB4U(|E)26(|A)|DB_3A_AB4U(23|WE23A),DSG_3A_(758|WR1001),                          \
1007      DB_3A_A4U(|E)23|DB_3A_A4U(26A|E26),DB_3A_B4U(|E)22,DB_3A_C4U(|E)26A,DB_3A_C4U(|E)26,DB_3A_BC4UE29)| \
1008      (<DBP_3A_POST4U17A(|L),DB_3A_PW4UEPR16(|L)|DB_3A_PW4U28(|L),DB_3A_C4UPR08L,DB_3A_C4UPR20L,          \
1009      DB_3A_C4U28L,DB_3A_AB4U(|E)26(|A)L|DB_3A_AB4U(23|WE23A)L,DSG_3A_(758|WR1001)L,                      \
1010      DB_3A_A4U(|E)23L|DB_3A_A4U(26A|E26)L,DB_3A_B4U(|E)22L,DB_3A_C4U(|E)26AL,DB_3A_C4U(|E)26L,           \
1011      DB_3A_BC4UE29L)|                                                                                    \
1012      (>DBP_3A_POST4U17B(|L),DB_3A_PW4UEPR16(|L),DBP_3A_P4UEA216,4*DB_3A_C4UPR(08|09A),DB_3A_ABC4UPR08L,  \
1013      2*DB_3A_AB4U26A,DB_3A_C4UPR12,2*DB_3A_C4U21)|                                                       \
1014      (<4*DB_3A_C4UPR(08|09A)L,DB_3A_ABC4UPR08L,DB_3A_AB4U26AL,DB_3A_C4U21L,DB_3A_C4U21L,                 \
1015      DBP_3A_P4UEA216L)|                                                                                  \
1016      (<(2*DB_3A_C4U36L),3*(DB_3A_A(|B)4U26AL),DSG_WR4UR1236L,3*DB_3A_C4U(26|26A|28)L,DB_3A_PW4U36(|L))|  \
1017      (<(2*DB_3A_C4U36),3*(DB_3A_A(|B)4U26A),DSG_WR4UR1236,3*DB_3A_C4U(26|26A|28),DB_3A_PW4U36(|L))|      \
1018      (DB_3A_PW4U3(6|7)(|L)|DB_3A_PW4UEPR16(|L)|DB_3A_PW4U28(|L),                                         \
1019      (<DB_3A_C4UPR12,DB_3A_C4U35L,DB_3A_AB4U28G,DSG_3A_WR1041(|L),DB_3A_AB4U35L,DB_3A_C4U35L,            \
1020      DB_3A_C4U23))|                                                                                      \
1021      (<(2*DB_3A_C4U28L,DB_3A_AB4UE38(|L)),DSG_3A_758(|L),3*DB_3A_C4U28,DB_3A_PW4U28(|L),                 \
1022      0-1*DBP_3A_POST4U20A(|L))|                                                                          \
1023      (<DB_3A_AB4UEL,DB_3A_AB4UE38L,DB_3A_ABC4UEL|DB_3A_BC4U36L,DB_3A_C4UE22L|DB_3A_C4U22AL,DB_3A_B4UEL,  \
1024      DB_3A_A4UEL,DSG_3A_WR1076L,DB_3A_A4UEL,DB_3A_C4UE22L,DB_3A_B4UEL,DB_3A_PW4U37L|DB_3A_PW4U30(|L))|   \
1025      (>DB_3A_AB4UE,DB_3A_AB4UE38,DB_3A_ABC4UE|DB_3A_BC4U36,DB_3A_C4UE22A|DB_3A_C4U22A,DB_3A_B4UE,        \
1026      DB_3A_A4UE,DSG_3A_WR1076,DB_3A_A4UE,DB_3A_C4U22,DB_3A_B4UE,DB_3A_PW4U37(|L)|DB_3A_PW4U30(|L))|      \
1027      (<DB_3A_PWPOST4U34,DB_3A_C4U21L,DB_3A_C4UE38,DB_3A_ABC4UE39|DB_3A_BC4UE39,DSG_3A_WR1001,            \
1028      DB_3A_B4UE30A,DB_3A_AB4UE38,2*DB_3A_C4U28,DB_3A_C4U36)|                                             \
1029      (>DB_3A_PWPOST4U34L,DB_3A_C4U21,DB_3A_C4UE38L,DB_3A_ABC4UE39L|DB_3A_BC4UE39L,DSG_3A_WR1001L,        \
1030      DB_3A_B4UE30AL,DB_3A_AB4UE38L,2*DB_3A_C4U28L,DB_3A_C4U36L)
1031
1032  # EP 3a 1950-1956 DB West Germany Long Distance train post war coaches
1033  $DEF D3PDA=(<0-1*DBP_3A_P(OST4UA216_40|4UEA216)(|L),DB_3A_PW4U37,(2*DB_3A_C4UMG54HL),3*DB_3A_BUM54GL,   \
1034      DSG_3A_WR1001L,3*DB_3A_C4UMG54HL)|                                                                  \
1035      (<3*DB_3A_C4UMG54H,DSG_3A_WR1001,3*DB_3A_BUM54G,2*DB_3A_C4UMG54H,DB_3A_PW4U37L,                     \
1036      0-1*DBP_3A_P(OST4UA216_40|4UEA216)(|L))|                                                            \
1037      (<(3*DB_3A_C4UMG54H),3*DB_3A_BUM54G,DB_3A_BR4UM(G54B|54E2|54E1),2*DB_3A_C4UMG54H,DB_3A_PW4U37(|L))| \
1038      (<DB_3A_PW4U37(|L),2*DB_3A_C4UMG54HL,DB_3A_BR4UM(G54B|54E2|54E1)L,3*DB_3A_BUM54GL,                  \
1039      3*DB_3A_C4UMG54HL)|                                                                                 \
1040      (<(2*DB_3A_AB4UM54A),DSG_WR4UE39(|L),3*DB_3A_AB4UM54B,DB_3A_PW4U36(|L),                             \
1041      0-1*DBP_3A_P(OST4UA216_40|4UEA216)(|L))|                                                            \
1042      (<0-1*DBP_3A_POST4U21A59(33|42|58|72)(|L),DB_3A_PW4U37(|L),2*DB_3A_C4UMG54HL,DB_3A_AB4UM54A,        \
1043      3*DB_3A_BUM54GL,DB_3A_BR4UMG54BL,3*DB_3A_C4UMG54HL)|                                                \
1044      (<(3*DB_3A_C4UMG54H),DB_3A_BR4UMG54B,3*DB_3A_BUM54G,DB_3A_AB4UM54AL,2*DB_3A_C4UMG54H,               \
1045      DB_3A_PW4U37(|L),0-1*DBP_3A_POST4U21A59(33|42|58|72)(|L))|                                          \
1046      (<DB_3A_PW4U3(6|7)(|L),5*DB_3A_C4UM52(G|H),DSG_3A_WR10(01|89)L,3*DB_3A_AB4UM5(2B|4A|4B),            \
1047      DB_3A_ABC4UM52_(1|3)|DB_3A_BC4UM52|DB_3A_BC4UMG55(O|D))|                                            \
1048      (<DB_3A_BC4UMG55(O|D)L|DB_3A_ABC4UM52_(1|3)L|DB_3A_BC4UM52L,3*DB_3A_AB4UM5(2B|4A|4B)L,              \
1049      DSG_3A_WR10(01|89),5*DB_3A_C4UM52(G|H)L,DB_3A_PW4U3(6|7)(|L))
1050
1051  # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DRG coaches
1052  $DEF D3PERA=(<(2*(DB_3A_C4Y42_50L|DB_3A_C4Y42_50|DB_3A_C4Y42_50A|DB_3A_C4Y42_50AL)),                    \
1053      2*(DB_3A_BC4UEP42_50|DB_3A_BC4UEP42_50A|DB_3A_BC4UEP42_50AL|DB_3A_BC4UEP42_50L),                    \
1054      (DB_3A_C4Y42_50L|DB_3A_C4Y42_50|DB_3A_C4Y42_50A|DB_3A_C4Y42_50AL),                                  \
1055      DB_3B_PW4I31L|DB_3A_PW4I31|DB_3A_PW4I32|DB_3A_PW4I32L|DB_3A_PW4I33|DB_3A_PW4I33L)|                  \
1056      (<DB_3A_PW4I31L,DB_3A_B4I30,2*(DB_3A_C4I34|DB_3A_CUP36),2*DB_3A_C4UP30SL)|                          \
1057      (<2*DB_3A_C4UP30SL,2*(DB_3A_C4UP34(|L)|DB_3A_CUP36),DB_3A_B4I30L,DB_3A_PW4I31)|                     \
1058      (<DB_3A_PW4UPR04,DB_3A_C4U26,DB_3A_BC4UIP30BL|DB_3A_B4UP30L|DB_3A_BC4UP34SL,3*DB_3A_C4UP30BL)|      \
1059      (<DB_3A_C4U26,DB_3A_BC4UP30B|DB_3A_B4UP30,3*DB_3A_C4UP30B,DB_3A_PW4I31L)|                           \
1060      (<DB_3A_B4I(|E)30(|L),3*DB_3A_C4I34(|L),DB_3A_PW4I32(|L)|DB_3A_PW4I33(|L))|                         \
1061      (<DB_3A_C4I29(|L),(DB_3A_B4I(|E)30(|L)|DB_3A_BC4I30(|L)|DB_3A_BC4I33(|L)),DB_3A_C4I31(|L),          \
1062      2*DB_3A_C4I30H(|L),DB_3A_PW4I3(2|1)(|L))|                                                           \
1063      (<DB_3A_C4U2950(|L),(DB_3A_BC4U31(|L)|DB_3A_BC4I33(|L)|DB_3A_BC4U3355(|L)),DB_3A_C4UP30B,           \
1064      2*(DB_3A_C4U(33|31)50(|L)),DB_3A_PW4I3(2|1)(|L),DB_3_MD4I50)|                                       \
1065      (<DB_3A_PW4I3(2|1)(|L),2*DB_3A_C4I36(|L),DB_3A_BC4I37(|L),DB_3A_C4I36(|L))|                         \
1066      (<DB_3A_PW4I3(2|1)(|L),DB_3A_C4Y42_50(|L),2*DB_3A_C4I36(|L),DB_3A_BC4U37(|L),DB_3A_C4I36(|L))
1067
1068  # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DB coaches
1069  $DEF D3PEDAN=DB_3A_PW4I3(2|1)(|L),DB_3_C4YMG51(|L),DB_3_CR4YMGB51(|L),                                  \
1070      2*(DB_3_BC4YMG51(|L)|DB_3_B4YMG54(|L)),2*DB_3_C4YMG51(|L)
1071
1072  # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DB coaches push and pull left
1073  $DEF D3PEDAL=(<(DB_3_C4YMGF51L|DB_3_CPW4YMGF51L|DB_3_CPW4YMGF54L),2*DB_3_C4YMG51(|L),                   \
1074      (DB_3_BC4YMG51(|L)|DB_3_B4YMG54(|L)),DB_3_C4YMG51(|L))
1075
1076  # EP 3a 1950-1956 DB West Germany Passenger semi-fast train DB coaches push and pull right
1077  $DEF D3PEDAR=(<(2*DB_3_C4YMG51(|L)),(DB_3_BC4YMG51(|L)|DB_3_B4YMG54(|L)),DB_3_C4YMG51(|L),              \
1078      (DB_3_C4YMGF51|DB_3_CPW4YMGF51|DB_3_CPW4YMGF54))
1079
1080  # EP 3a 1950-1956 DB West Germany Passenger Regional rebuild coaches 3x
1081  $DEF D3PNRA1=(<DB_3A_C3YG56,DB_3A_C3YG56L,DB_3A_BC3YG56,DB_3A_C3YG56L,DB_3A_BC3YG56,DB_3A_BPW3YG56L)|   \
1082      (<DB_3A_BPW3YG56,DB_3A_BC3YG56,DB_3A_C3YG56L,DB_3A_BC3YG56,DB_3A_C3YG56L,DB_3A_C3YG56,DB_3A_C3YG56L)
1083
1084
1085  # EP 3a 1950-1954 DB West Germany Passenger Prusian Cars 3x
1086  $DEF D3PANPA=<(DB_3A_PW3PR11FG|DB_3A_PW3PR11)(|L),                                                      \
1087      5-7*((DB_3A_C3PR91UG|DB_3A_C3PR91HG|DB_3A_C3PR11BH|DB_3A_C3PR11BU|DB_3A_C3PR11FHG|DB_3A_C3PR11FUG|  \
1088      DB_3A_C3PR11FHE|DB_3A_CD21|DB_3A_CD21TR|DB_3A_CD21A|DB_3A_CD21A_TR|DB_3A_CD21B|DB_3A_CD21BTR|       \
1089      DB_3A_CD27|DB_3A_CDTR27|DB_3A_C3PR11|DB_3A_C3DPR04HE|DB_3A_C3TRPR04|DB_3A_C3DPR04|DB_3A_C3DPR04WE)  \
1090      (|L)),                                                                                              \
1091      (2*DB_3A_BC3PR11FHG(|L))|(2*DB_3A_BC3PR11FUG(|L))|(2*DB_3A_BC3PR11FHE(|L))|                         \
1092      (2*DB_3A_BC3PR11FUE(|L))|DB_3A_B3PR10FHG(|L)|DB_3A_B3PR10FUG(|L)|DB_3A_B3PR10FHE(|L)|               \
1093      DB_3A_B3PR10UD(|L),                                                                                 \
1094      6-8*((DB_3A_C3PR91UG|DB_3A_C3PR91HG|DB_3A_C3PR11BH|DB_3A_C3PR11BU|DB_3A_C3PR11FHG|DB_3A_C3PR11FUG|  \
1095      DB_3A_C3PR11FHE|DB_3A_CD21|DB_3A_CD21TR|DB_3A_CD21A|DB_3A_CD21A_TR|DB_3A_CD21B|DB_3A_CD21BTR|       \
1096      DB_3A_CD27|DB_3A_CDTR27|DB_3A_C3PR11|DB_3A_C3DPR04HE|DB_3A_C3TRPR04|DB_3A_C3DPR04|DB_3A_C3DPR04WE)  \
1097      (|L));
1098
1099  # EP 3a 1950-1956 DB West Germany Passenger Regional DRG coaches
1100  $DEF D3PNRA2=(<DB_3A_CID27,DB_3A_BCIE29AL,DB_3A_CID27L,DB_3A_CI29BF,DB_3A_PWI31AL)|                     \
1101      (<DB_3A_PWI23(|L)|DB_3A_PWI27(|L)|DB_3A_PWI28(|L)|DB_3A_PWI30(|L)|DB_3A_PWI31(|L)|DB_3A_PWI31,      \
1102      DB_3A_CI29BFL,DB_3A_CI29|DB_3A_CI29L,DB_3A_BCI28L,                                                  \
1103      DB_3A_BCI29AL|DB_3A_BCI29A|DB_3A_BCI29L~JUH|DB_3A_BCI29L|DB_3A_BCI29~JUH,                           \
1104      DB_3A_BI29L~JUH|DB_3A_BI29|DB_3A_BI29~JUH,DB_3A_CI29BFL|DB_3A_CI29,DB_3A_CI29L)
1105
1106  # EP 3a 1950-1956 DB West Germany Passenger Regional Bavaria
1107  $DEF D3PNBA=(<2*DB_3A_CID27(|L),3*DB_3A_C3IBAY(99A|13|21)(|L),DB_3A_(BC3IBAY07|BCI29|BCI28|BI29)(|L),   \
1108      2*DB_3A_CI28(|L),DB_3A_CIBAY25(|L),2*DB_3A_MCI43(N|R)(|L),DB_3A_PWIBAY10(|L)|DB_3A_PWI28(|L))
1109
1110  # EP 3a 1950-1959 DB West Germany Freigt short
1111  $DEF D3GK1=(2-3*(DB_3A_GMHS30(|H|L)|DB_3A_GHS31B(|L)|DB_3A_GMH35N(|L)|DB_3A_GMHS35N(|L)|                \
1112      DB_3A_GLMGHS36(|L)))|                                                                               \
1113      (2-3*(DB_3A_G10(|D|H4|DL|L4H4L|L|H5|H5L|L4)|DB_3A_G19(|HL|BL|B)|DB_3A_GR20HL|DB_3A_G29M))|          \
1114      (2-3*(DB_ELU61[OB:WOOD3(6|8),,26]))|                                                                \
1115      (2-3*(DB_3A_RMMS31R(|L)[OB:WOOD(95|94|93|92|91|90|96|89),7,13]                                      \
1116      [OB:WOOD(95|94|93|92|91|90|96|89),35,13][OB:WOOD(95|94|93|92|91|90|96|89),62,13]                    \
1117      [OB:WOOD(95|94|93|92|91|90|96|89),88,13]))|                                                         \
1118      (2-3*((DB_3A_OM32L~JUH|DB_3A_OM32|DB_3A_OM32BL|DB_3A_OM32B)[OB:BARREL1,,19]))|                      \
1119      (2-3*((DB_3A_OMM37(|H)(|L)|DB_3A_OMM33(O|H)(|L)|DB_3A_OMM34(|L|HL|B|BL))                            \
1120      [OB:(FR_PISEK|SOIL8|SOIL7)(|[M]),,25]))|(2-3*(THORL_BUZ_3A_525010(|L)))|                            \
1121      (2-3*(DB_3A_G10_DARBOVEN|DB_3A_G10_KOFF|DB_3A_G10_MUNSTERLAND|DB_3A_G10_PELIKAN|DB_3A_GRS30_ALAK|   \
1122      DB_3A_G10_STRICKER)(|L))|                                                                           \
1123      (2-3*((DB_3A_O10(|L)[O:SAND16(|[M]),,22])|(DB_3A_OMM39[OB:SAND16(|[M]),,25])))|                     \
1124      (2-3*(DB_3B_OM12N52F|DB_3A_OM12HL|DB_3A_OM12H|DB_3A_OM12N23L|DB_3A_OM12N23H|DB_3B_OM12UL|           \
1125      DB_3A_OM19N28UL|DB_3A_OM19N28HL|DB_3A_OM19N28BL|DB_3A_OM21U|DB_3A_OM21HL|DB_3A_OM21B))|             \
1126      (2-3*(DB_SSKM49L|DB_SSKM49|DB_SSKM49RL))|(2-3*(DB_3A_R10(OR|H)(|L)[OB:BOILER(5|4|1)([|M]),,12]))|   \
1127      (2-3*(DB_3A_GR20L|DB_3A_GR20|DB_3A_GR20H|DB_3A_GR20VH|DB_3A_GMEHS30H|DB_3A_GMEHS30B|                \
1128      DB_3A_GMHS35NL|DB_3A_GMH35N|DB_3A_GMHS53SL|DB_3A_GMHS53S))|                                         \
1129      (2-3*(DB_3A_V90(|H|B|V|VH|VB|G|GH|GB|A)(|L)|DB_3A_VWH03(|H)(|L)|DB_3A_VWH04(|K|KV|V|TV)(|H|HL)|     \
1130      DB_3_V14(|H|V1|V1H4|V2|V2H|V2H4)(|L)|                                                               \
1131      DB_3_V23(A|AB|B|B|BH|BB|BS|BSH|BSB|BD|CDH|C|CH|CB|CD|CDB)(|L)|DB_3_V33(|S)(|L)|                     \
1132      DB_3A_VH04(|K|KH|KVH|KHL|KVHL|KV|U|UH|UHL|UV|UVH|UVHL|L|TUVH|TUVHL|TUV|H|HL|V|VL|VH|VHL|TV|TVL|     \
1133      TVH|TVHL)|DB_3A_VH04(|K|KV|U|UV|V|TV|V)))|(2-3*(HENKEL02|THORL_BUZ_3A_525010(|L)|CSD_R5D|CSD_R8A))
1134
1135  $DEF Z_D_E3_GAK=2*D3GK1
1136
1137  # EP 3a 1950-1959 DB West Germany Freigt long
1138  $DEF D3FASE=4-5*D3GK1
1139
1140  # EP 3a 1950-1959 DB West Germany Freigt long
1141  $DEF Z_D_E3_GA=8-10*D3GK1
1142
1143
1144  # EP 3a 1950-1959 DB West Germany Freigt short steam
1145  $DEF D3FAS=DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L),4-5*D3GK1
1146
1147  # EP 3a 1950-1959 DB West Germany Freigt long steam
1148  $DEF D3FAL=DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L),         \
1149      8-10*D3GK1
1150
1151  # EP 3A Freight long Leig steam
1152  $DEF D3FLLS=DB_3A_PWGPR14L|DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3B_PWGHS41OK|                  \
1153      DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L),                                                           \
1154      10*((DB_3A_GLLH12|DB_3A_GLLH12V1|DB_3A_GLLEH12|DB_3A_GLLEH12D1|DR_3_GGLL20|DB_3A_GLLEH12V1|         \
1155      DB_3A_GLLH12B1|DB_3A_GLLH12B2|DB_3A_GLLEH12A2)(|L))
1156
1157  # EP 3A 1950-1960 DB West Germany Freigt long Tank
1158  $DEF D3FBLZ=24*(DB_3_24LBEB_VTG(|L)|DB_3_24SBKW_KONTI(|L)|DB_3_24LBEB_VTG(|L)|DB_3_22KWG_ESSO(|L)|      \
1159      DB_3_33LBU_EVA(|L)|DB_3_40LHB_VTG(|L)|DB_3_33LBU_EVA(|L)|DB_3_22MKW_SHELL(|L)|DB_3_30LBUB_VTG(|L)|  \
1160      DB_3_40LHB_VTG(|L)|DB_3_22KWG_VTG(|L)|DB_3_17BW_SHELL(|L)|DB_3_630DB_SHELL(|L)|                     \
1161      DB_3_30LBUB_SHELL(|L)|DB_3_17BWBH_SHELL(|L)|DB_3_24KWAB_SHELL(|L)|DB_3_17BW_SHELL(|L)|              \
1162      DB_3_22ABG_SHELL(|L)|DB_3_30LBUB_BP(|L)|DB_3_630DB_VTG(|L)|DB_3B_G10(|L)|DB_3_30LBEB_BV(|L)|        \
1163      DB_3_22ABG_SHELL(|L)|DB_3_Z2B_DE(|L)|DB_3_Z2B_AR(|L)|DB_3_Z2B_BP(|L)|DB_3_Z2B_MI(|L)|               \
1164      DB_3_Z2B_ES(|L)|DB_3_Z2H_SH(|L)|DB_3_Z2B_SH(|L)|DB_Z_BP(|L)|DB_Z_ESSO(|L)|DB_3B_Z4USTAC(|L)|        \
1165      DB_ZAD_VTG(|L)|DB_ZAU_VTG(|L))
1166
1167  # EP 3A 1950-1960 DB West Germany Freigt long Tank steam
1168  $DEF D3FBLZS=DB_3A_PWGPR14L|DB_3A_PWGS44B(|L)|DB_3A_PWGS44(|D)(|A)(|L)|DB_3B_PWGHS41OK|                 \
1169      DB_3A_PWGHS36(|L)|DB_3A_PWGHS41(|MK)(|L),D3FBLZ
1170
1171  # EP 3b DB West Germany Passenger shunting
1172  $DEF D3PBS=(DB_POST2A14,DB_3WR4UM64_1RL,DB_ABUM63BL)|                                                   \
1173      (DB_3C_WR4UM39L,DB_3WLB4Y36,DSG_WLAS4UE50MD,DSG_3C_WL20310(|L))|                                    \
1174      (DB_3B_PW4UE30L,DB_3C_MD4I50L,DB_3C_AB4U29)
1175
1176  # EP 3b 1962-1968 DB West Germany Passenger long distance TEE
1177  $DEF D3PT=(<DB_AP4UM63L,2*DB_AV4UM63L,DB_3WR4UM64_(1|2)TL,DB_AP4UM63L,DB_AV4UM63L)
1178
1179  # EP 3b 1956-1962 DB West Germany Passenger long distance DRG coaches
1180  $DEF D3PDBR5=(<DBP_3B_POST4U17(B|A)(|L),DB_3B_PW4U37(|L)|DB_3B_PW4UE30(|L),DB_3B_B4UE26A_58,            \
1181      2*DB_3B_B4UE26(|A)53,DB_3B_A4UE22|DB_3B_A4UE26(_56B|A_56),DSG_3A_WR1076,                            \
1182      DB_3B_A4UE23|DB_3B_A4UE26_56|DB_3B_A4UWE23(|A)56,DB_3B_B4UE21,DB_3B_B4UPR20D,DB_3B_B4UPR20)|        \
1183      (>DBP_3B_POST4U17(B|A)(|L),DB_3B_PW4U37(|L)|DB_3B_PW4UE30(|L),DB_3B_B4UE26A_58L,                    \
1184      2*DB_3B_B4UE26(|A)53L,DB_3B_A4UE22L|DB_3B_A4UE26(_56B|A_56)L,DSG_3A_WR1076L,                        \
1185      DB_3B_A4UE23L|DB_3B_A4UE26_56L|DB_3B_A4UWE23(|A)56L,DB_3B_B4UE21L,DB_3B_B4UPR20DL,DB_3B_B4UPR20L)|  \
1186      (<DBP_3B_POST4U20(B|A)(|L),DB_3B_D4U30U(|L)|DB_3B_PW4U36(|L),DB_3B_B4UWE23A58|DB_3B_B4UWE2358_2,    \
1187      DB_3B_B4UWE22_58,DB_3B_A4UE23_58|DB_3B_A4UE26B,DSG_3C_WR4U_1029,DB_3B_A4UE38_51G,DB_3B_B4UE38_53G,  \
1188      DB_3B_B4UE26A53|DB_3B_B4UE26_58,DB_3B_AB4UM55(|L))|                                                 \
1189      (>DBP_3B_POST4U20(B|A)(|L),DB_3B_D4U30U(|L)|DB_3B_PW4U36(|L),DB_3B_B4UWE23A58L|DB_3B_B4UWE2358_2L,  \
1190      DB_3B_B4UWE22_58L,DB_3B_A4UE23_58L|DB_3B_A4UE26BL,DSG_3C_WR4U_1029L,DB_3B_A4UE38_51GL,              \
1191      DB_3B_B4UE38_53GL,DB_3B_B4UE26A53L|DB_3B_B4UE26_58L,DB_3B_AB4UM55(|L))|                             \
1192      (<DB_3B_POST4UB21(|L),DB_3B_PW4U3(6|7)(|L),4*DB_3B_B4U3(6|5)_51,DSG_3A_WR1(128|089),                \
1193      3*DB_3B_A4U35_54O,DB_3B_AB4U(35_54|36_52)O)|                                                        \
1194      (<DB_3B_AB4U(35_54|36_52)OL,3*DB_3B_A4U35_54OL,DSG_3A_WR1(128|089)L,4*DB_3B_B4U3(6|5)_51L,          \
1195      DB_3B_PW4U3(6|7)(|L),DB_3B_POST4UB21(|L))|                                                          \
1196      (<DB_3B_PW4UE30L,3*DB_3B_A4UE28F,DSG_3A_WR10(01|76|41)L,                                            \
1197      5*(DB_3B_B4UE21L|DB_3A_C4U22L|DB_3B_B4U28BL))|                                                      \
1198      (<(5*(DB_3A_C4U22|DB_3B_B4U28B|DB_3B_B4UE21)),DSG_3A_WR10(01|76|41),3*DB_3B_A4U35_54OL,             \
1199      DB_3B_PW4UE30L)
1200
1201  # EP 3b 1962-1968 DB West Germany Passenger long distance DRG coaches
1202  $DEF D3PDBR6=(DB_3B_POST4A15L|DB_3B_POST4UB21(|L),                                                      \
1203      (<DB_3B_PW4UE30(|L)|DB_3C_D4U30(|L)|DB_3(B|C)_D4U28(|L),DB_3C_A4U28JL,DB_3B_A4UE38_51DL,            \
1204      DB_ABR4U3452_3ABL,DB_3B_A4U2852B,DB_3B_A4U28S,DB_3A_BC4UE29))|                                      \
1205      (<DB_3B_MD4YG57D,DB_3B_A4U35_54O,DB_3B_B4U36_51L,DB_3B_B4U35_51L,DB_3B_B4UE38_53G,DSG_3A_WR1234)|   \
1206      (<5*DB_3B_B4U28B,DSG_3A_WR123(0|4),3*DB_3B_A4U28S,DB_3B_PW4UE30(|L),                                \
1207      0-1*(DBP_3(B_POST4UA216_40U|C_POST4UA216_40)(|L)))|                                                 \
1208      (<0-1*(DBP_3(B_POST4UA216_40U|C_POST4UA216_40)(|L)),DB_3B_PW4UE30L,3*DB_3B_A4U28S,DSG_3A_WR1234,    \
1209      5*DB_3B_B4U28B)|                                                                                    \
1210      (<DB_3B_PW4UE30L,3*DB_3B_A4UE28F,DSG_3A_WR10(01|76|41)L,                                            \
1211      5*(DB_3B_B4UE21L|DB_3A_C4U22L|DB_3B_B4U28BL))|                                                      \
1212      (<5*(DB_3B_B4U28B|DB_3B_B4UE21),DSG_3A_WR10(01|76|41),3*DB_3B_A4U35_54OL,                           \
1213      DB_3B_PW4UE30(|L)|DB_3C_D4U30(|L)|DB_3(B|C)_D4U28(|L))|                                             \
1214      (<DB_3B_D4U28,(5*(DB_3B_B4UE28EXA|DB_3C_B4UE28B|DB_3B_B4UE28B|DB_3C_B4UE38_53|DB_3B_B4UE38_53G)),   \
1215      DB_3B_AB4UE29|DB_3C_AB4UE29B|DB_3B_AB4UE39_51GD|DB_3B_AB4UE39_51G|DB_3C_AB4UE39_51G,                \
1216      DB_3C_AR4U3452,DB_3B_A4UE26B|DB_3B_A4UE28S2|DB_3C_A4UE28B,                                          \
1217      (DB_3C_A4UE30K|DB_3B_A4UE30|DB_3B_A4UE38_51GD|DB_3B_A4UE38_51G|DB_3C_A4UE38_51))|                   \
1218      (>DB_3B_D4U28L,                                                                                     \
1219      (5*(DB_3B_B4UE28EXAL|DB_3C_B4UE28BL|DB_3B_B4UE28BL|DB_3C_B4UE38_53L|DB_3B_B4UE38_53GL)),            \
1220      DB_3B_AB4UE29L|DB_3C_AB4UE29BL|DB_3B_AB4UE39_51GDL|DB_3B_AB4UE39_51GL|DB_3C_AB4UE39_51GL,           \
1221      DB_3C_AR4U3452L,DB_3B_A4UE26BL|DB_3B_A4UE28S2L|DB_3C_A4UE28BL,                                      \
1222      (DB_3C_A4UE30KL|DB_3B_A4UE30L|DB_3B_A4UE38_51GDL|DB_3B_A4UE38_51GL|DB_3C_A4UE38_51L))
1223
1224
1225
1226  # EP 3b 1956-1962 DB West Germany Passenger long distance new cars
1227  $DEF D3PDN5=(<DB_3B_POST4UB21(|L),DB_3B_PW4U3(6|7)(|L),4*DB_3B_B4U3(6|5)_51,DSG_3A_WR1(128|089),        \
1228      3*DB_3B_A4UM54A|DB_3B_A4UM54G1|DB_3B_A4UM52B,DB_3B_AB4U(35_54|36_52)O)|                             \
1229      (<DB_3B_AB4U(35_54|36_52)OL,3*DB_3B_A4UM54G1L|DB_3B_A4UM52BL|DB_3B_A4UM54AL,DSG_3A_WR1(128|089)L,   \
1230      4*DB_3B_B4U3(6|5)_51L,DB_3B_PW4U3(6|7)(|L)|DB_3B_BD4UM5(8|9),DB_3B_POST4UB21(|L))|                  \
1231      (<DBP_3B_POST4U21A59(33|42|58|72)(|L),DB_3B_PW4U3(6|7)(|L)|DB_3B_BD4UM5(8|9)L,4*DB_3B_B4UM52(G|H),  \
1232      DSG_3A_WR1(128|089),3*DB_3B_A4UM54A|DB_3B_A4UM54G1|DB_3B_A4UM52B,DB_3B_AB4UM52(|_1|_3))|            \
1233      (<DB_3B_AB4UM52(|_1|_3)L,3*DB_3B_A4UM54G1L|DB_3B_A4UM52BL|DB_3B_A4UM54AL,DSG_3A_WR1(128|089)L,      \
1234      4*DB_3B_B4UM52(G|H)L,DB_3B_PW4U3(6|7)(|L),DBP_3B_POST4U21A59(33|42|58|72)(|L))|                     \
1235      (<DB_3B_PW4U37O(|L),DB_3B_MD4YG57D,4*DB_3B_B4UM54,DB_3B_AR4UM(G54B2|54B2|54B3),DB_3B_A4UM54G,       \
1236      DB_3B_AB4UM52(|_1|_3)S)|                                                                            \
1237      (<DB_3B_PW4U37O(|L),DB_3B_MD4YG57D,DB_3C_AB4UM52_(1|3)L,DB_3B_AR4UM(G54B2|54B2|54B3)L,              \
1238      DB_3B_A4UM54GL,4*DB_3B_B4UM54L)
1239
1240  # EP 3b 1962-1968 DB West Germany Passenger long distance new cars
1241  $DEF D3PDN=0-1*(DB_POST4MG(AP|B|BL)26(|L)),                                                             \
1242      (<DB_3B_D4UM60(|L),2*DB_B4UM63,2*DB_A4UM54,DB_3WR4UM64_2R(|L),3*DB_B4UM63)|                         \
1243      (<2*DB_3B_BUM54,2*DB_A4UM54,DB_3C_AR4UM(G54B|54B2|54BR1)L,3*DB_3B_BUM54L,DB_3B_D4UM60L,             \
1244      DB_3C_MD4I50(|T)(|L))|                                                                              \
1245      (<DB_BD4UM59L|DB_3B_BDUMS273L,2*DB_B4UM63,2*DB_A4UM54,DB_3WR4UM64_2R(|L),3*DB_B4UM63)|              \
1246      (<2*DB_3B_BUM54,2*DB_A4UM54,DB_3C_AR4UM(G54B|54B2|54BR1),3*DB_3B_BUM54L,DB_BD4UM(59|61),            \
1247      DB_3C_MD4YG57(|L))|                                                                                 \
1248      (<DB_3C_D4U37(|O)(|L),DB_3B_MD4YG57D,4*DB_3B_B4UM54,DB_3C_WR4UM39,DB_3C_A4UM54B(|L),                \
1249      DB_3B_AB4UM52(|_1|_3)SL)|                                                                           \
1250      (<DB_3C_AB4UM52_(1|3),DB_3C_A4UM54BL,DB_3C_WR4UM39L,4*DB_3B_B4UM54L,DB_3C_D4U37(|O),                \
1251      DB_3B_MD4YG57DL)|                                                                                   \
1252      (3-4*(DB_3A_GL11(|L|U|H|HL|UV|V|VL|V1|V1L|VH|VHL|VB|VBL)|DB_3A_GLR22(|U|H|B)(|L)))|                 \
1253      (<(5*(DB_3C_B4UM54(A|C)|DB_3B_BUM54A|DB_3B_B4UM54(B|C)|DB_3C_B4UM51G|DB_3C_B4UM5261H)),             \
1254      DB_3C_WR4UM39|DSG_3A_WR123(4|0)L,DB_3(C|B)_AB4UM55|DB_3B_AB4UM55(A|C|D)|DB_3C_AB4UM5261,            \
1255      3*(DB_3C_A4UM54A|DB_3B_A4UM52B(|S)|DB_3C_A4UM5261|DB_3C_A4UM54S),DB_3C_D4U37(|OM|O)(|L))|           \
1256      (<DB_3C_D4U37(|OM|O)(|L),                                                                           \
1257      3*(DB_3C_A4UM5261L|DB_3B_A4UM52B(|S)L|DB_3C_A4UM54SL|DB_3C_A4UM54AL|DB_3C_A4UM54SL),                \
1258      DSG_3A_WR123(4|0)|DB_3C_WR4UM39L,DB_3C_AB4UM5261L|DB_3B_AB4UM55(A|C|D)L|DB_3(C|B)_AB4UM55L,         \
1259      5*(DB_3C_B4UM54(A|C)L|DB_3B_BUM54AL|DB_3B_B4UM54(B|C)L|DB_3C_B4UM5261(G|H)L))|                      \
1260      (<(5*(DB_3D_BUM63|DB_B4UM63|DB_3C_B4UM61G)),DB_3D_BUM54|DB_3D_AB4UM63|DB_3C_AB4UM61G,               \
1261      DB_BRBU4UM61L,3*(DB_3C_A4UM62B|DB_3D_A4UM61|DB_A4UM61),                                             \
1262      DB_3B_D4UM60L|DB_3C_BD4UM58|DB_BD4UM59~TDBW|DB_3B_BD4UM61)|                                         \
1263      (<DB_3B_BD4UM61L|DB_3C_BD4UM58L|DB_BD4UM59L~TDBW|DB_3B_D4UM60,                                      \
1264      3*(DB_A4UM61L|DB_3D_A4UM61L|DB_3C_A4UM62BL),DB_3D_AB4UM63L|DB_3C_AB4UM61GL|DB_3D_BUM54L,            \
1265      DB_3WR4UM64_1R,5*(DB_B4UM63L|DB_3D_BUM63L|DB_3C_B4UM61GL))|                                         \
1266      (<DB_3B_D4UM60,3*((DSG_3B_WLAB4UMG59_332(01|41|56)L)|(DSG_3B_WLAB4UMG59_332(01|41|56))),            \
1267      DB_3C_WR4UM39(|L),5@NS_N_BC(|L),DB_3C_AB4U35_54)
1268
1269  # EP 3b 1956-1958 DB West Germany Passenger semi-fast train DRG coaches
1270  $DEF D3PERB=(<DB_3B_B4Y3150L,DB_3B_B4Y2950L,DB_3B_AB4Y(30|33)55L|DB_3B_A4Y3055L,DB_3B_B4Y3350L,         \
1271      DB_3B_PW4I31)|                                                                                      \
1272      (<DB_3B_PW4I31L,DB_3B_B4Y3350,DB_3B_AB4Y(30|33)55|DB_3B_A4Y3055,DB_3B_B4Y2950,DB_3B_B4Y3150)|       \
1273      (<DB_3B_PW4I32(|L),DB_3B_AB4Y3755(|L),2*DB_3B_B4Y3650(|L),2*DB_3B_B4Y3050(|L))
1274
1275  # EP 3b 1961-1968 DB West Germany Passenger regional push and pull left
1276  $DEF D3PBNPL=(<DB_3B_BPW4YMGF54L|DB_3_BPW4YMGF54L|DB_3A_BPW4YMGF51L|DB_3B_B4YMGF51L|DB_3A_B4YMGF51L|    \
1277      DB_3B_B4YMGF51L,(DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L),(DB_3B_AB4YMG51|DB_3C_ABYMG51)(|L),              \
1278      (DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L))
1279
1280  # EP 3b 1961-1968 DB West Germany Passenger regional push and pull right
1281  $DEF D3PBNPR=(<(DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L),(DB_3B_AB4YMG51|DB_3C_ABYMG51)(|L),                   \
1282      (DB_3A_B4YMG51|DB_3B_B4YMG51A)(|L),                                                                 \
1283      DB_3B_BPW4YMGF54|DB_3_BPW4YMGF54|DB_3A_BPW4YMGF51|DB_3B_B4YMGF51|DB_3B_B4YMGF51|DB_3A_B4YMGF51)
1284
1285
1286  # EP 3b 1958-1968 DB West Germany Passenger semi-fast train DRG coaches
1287  $DEF D3PERC=(<DB_3B_PW4I31,DB_3C_B4Y3050L,                                                              \
1288      DB_3C_AB4Y3155|DB_3C_AB4Y3355|DB_3C_AB4Y3755A|DB_3C_AB4Y3055A,DB_3C_A4Y3055A|DB_3D_A4Y3055,         \
1289      DB_3C_B4Y3650|DB_3C_B4Y3150,DB_3C_B4Y3450)|                                                         \
1290      (<DB_3C_B4Y3450L,DB_3C_B4Y3650L|DB_3C_B4Y3050,DB_3C_A4Y3055AL|DB_3D_A4Y3055L,                       \
1291      DB_3C_AB4Y3055AL|DB_3C_AB4Y3755AL|DB_3C_AB4Y3155L|DB_3C_AB4Y3355L,DB_3C_B4Y3150L,DB_3B_PW4I31L)|    \
1292      (<DB_3C_B4UE26A53(|L)|DB_3C_B4UE2653(|L),DB_3C_B4UE22(|L)|DB_3C_B4UE26(|A)_58(|L),                  \
1293      DB_3C_B4Y3(350|150)(|L),DB_3C_D4Y3157U(|L)|DB_3C_MD4YG57(|L))
1294
1295  # EP 3b 1958-1968 DB West Germany Passenger regional DRG-cars
1296  $DEF Z_D_E3_PDB=(<DB_PWI23(|L),DB_BI27(|L),2*(DB_BI21(|L)~JUH,DB_BI21A(|L)|DB_BI21B(|L)),               \
1297      (DB_B27(|L)|DB_BD21B(|L)),(DB_AB21_1956(|L)|DB_AB21_1958(|L)),                                      \
1298      3*(DB_B21(A|ADTR)(|L)|DB_B21(C|D|E)(|L)|(DB_B21|DB_BD21B(|L)|DB_3B_B21BTRL|DB_3B_B21BDTR)))|        \
1299      (<(3*(DB_3B_BI21(C|D)(|L)|DB_3B_BI28(A|B)(|L))),DB_AI29_1956(|L),                                   \
1300      3*(DB_3B_BI21(C|D)(|L)|DB_3B_BI28(A|B)(|L)),DB_PWI23(|L))|                                          \
1301      (DB_3A_PWI31A,DB_ABI34,DB_BI29,DB_BI29L,DB_3C_ABI29AL,DB_BIW29,DB_3B_BI27FL,DB_3B_BI27FL,           \
1302      DB_3B_BI29FL,DB_3B_BI29F)
1303
1304  # EP 3b 1958-1968 DB West Germany Passenger regional rebuild cars 4x
1305  $DEF D3PDU=(<DB_33BDYG56|DB_33BDYG56R|DB_33BDYG56S,DB_33BYG56RL|DB_33BYG56SL|DB_33BYG58L,               \
1306      DB_33ABYG57(|L)|DB_33ABYG58(|L),DB_33BYG56R|DB_33BYG56S|DB_33BYG58)
1307
1308  # EP 3b 1957-1961 DB West Germany Passenger Prusian Cars 3x
1309  $DEF D3PBNPA=((DB_PWI29|DB_PWI28)(|L),4-5*((DB_3B_B3PR11CSE|DB_3B_B3CDPR04S|DB_B27|DB_B21)(|L)),        \
1310      DB_AI29_1958(|L),                                                                                   \
1311      6-8*((DB_3B_B3PR04CDTR|DB_3B_B3PR04CDUE|DB_3B_B3PR11CSE|DB_3B_B3CDPR04S|DB_B27|DB_B21)(|L)))|       \
1312      (<DB_3B_D3PR11E(|L),                                                                                \
1313      5-7*((2:DB_3B_B3PR04CDW|2:DB_3B_B3PRCD04UD|DB_B21|DB_3B_B21DTR|4:DB_3B_B3PR11CDE|DB_3B_B3PR11CUE|   \
1314      DB_3B_B3PR11BCFUE|DB_3B_B3PR11BCUD|DB_3B_B3PR10BD|DB_3B_B3PR10BU)(|L)),DB_AI29_1958(|L),            \
1315      5-7*((2:DB_3B_B3PR04CDW|2:DB_3B_B3PRCD04UD|4:DB_3B_B3PR11CDE|DB_3B_B3PR11CUE|DB_B21|                \
1316      DB_3B_B3PR11BCFUE|DB_3B_B21DTR|DB_3B_B3PR11BCUD|DB_3B_B3PR10BD|DB_3B_B3PR10BU)(|L)))
1317
1318  # EP 3b 1960-1968 DB West Germany Freigt short
1319  $DEF D3FBK=(3-4*DB_3B_OM12(B|EL|EHL|EH|E)|DB_OMM51|DB_OMM56|DB_3B_OM21EHL|DB_3OMMI51L|DB_3B_OMM44U)|    \
1320      (3-4*DB_3B_OM32(|B)(|L)[OB:BARREL1,,22])|(3-4*DB_FCS(14|15|16|17|18|19|20|21|22|23|24|25))|         \
1321      (3-4*DB_3OMMI51M(|L))|(3-4*(DB_3B_GMEHS30MH|DB_GBKL236H|DB_3B_GMS44E)(|L))|(2-3*DB_3B_XLM57)|       \
1322      (3-4*(DB_3B_GMS54S|DB_3B_GMHS53ESL2|DB_3B_GMS54TB|G_46428|DB_GBKL238L|DB_GBKL238|DB_3B_G19HL))|     \
1323      (3-4*(DB_3B_KMMKS51B|DB_3B_KMMFKS52|DB_3B_KMMKS01|DB_3B_KMMKS51)(|L))|(2-3*(DB_3B_XLM57|DB_X05B))|  \
1324      (3-4*(DB_3B_GLMHS50A(|L)|DB_3B_GMMHS56A|DB_3B_GMMEHS56B(|L)|DB_3B_GMMHS56B(|L)|DB_3B_GMMHS56(|L)))| \
1325      (3-4*DB_3_VLMMHS63(|H)(|L))|(2-3*(DB_3B_R10(OR|H)(|L)[OB:(BOX_BBC|BOX22|BOX6),,12]))|               \
1326      (3-4*DB_3B_GL11(|L|U|H|HL|UV|V|VL|V1|V1L|VH|VHL|VB|VBL|MVB|MVBL|MV|MVL))|                           \
1327      (3-4*(DB_BT50DDZKR|DB_BT50DIKR_UNION|DB_BT50DIKR_KONIGSBACHER|DB_BT50EFKR_KNORR))|                  \
1328      (3-4*(DB_3B_GMHS35KEB|DB_GBKL236H|DB_3B_GMHS53ESL(1|2)|DB_3B_GMHS35KEB|DB_GBKL238|DB_3B_GMHS35KE|   \
1329      DB_GBKL238))|(2-3*DB_3_V14H(|L))|(3-4*(DB_RMS31B[OB:WHEEL1,,12]))|                                  \
1330      (3-4*(DB_3_OMM37H|DB_3_OMM37B|DB_3_OMM37U|DB_3_OMM37E|DB_3_OMM37EH|DB_3_OMM37EH1|DB_3_OMM37EB|      \
1331      DB_3_OMM37|DB_3B_OMM34)(|L)[OB:(FR_PISEK|SOIL8|SOIL7)(|[M]),,25])|                                  \
1332      (3-4*(DB_3B_OMM37(|E)(|H|F)(|L)|DB_3B_OM12N23H|DB_3B_OM12N23B|DB_3B_OM19N28H|                       \
1333      DB_3B_OMM33(|E)(H|O)(|L)))|(3-4*(DB_OTMM70VD))|(3-4*DB_3B_(RBMMS55(O|R)|GBMHS51(A|B))(|L))|         \
1334      (3*((<DB_K15BHL,DB_K15B)|(<DB_K15C,DB_K15BH)|(<DB_K15CHL,DB_K15C)|(<DB_K15D,DB_K15DH)|              \
1335      (<DB_K15CHL,DB_K15BNB)|DB_KK15L|(<DB_K15CNB,DB_K15BH)|(<DB_K15NB,DB_K15CH)|(<DB_K15D,DB_K15DH)))|   \
1336      (3-4*(DB_OMM46B|DB_3B_OMM49B|DB_OMM52H|DB_3B_OMM53S|DB_OMM54P|DB_OMM55B|DB_3B_OMM55|DB_OMM55P|      \
1337      DB_OMM55B|DB_3B_OMM51_131|DB_3B_OMM52_132|DB_3B_OM53|DB_3_OMM37EB|DB_3_OMM37EU)(|L)                 \
1338      [OB:COAL(40|20|42)(|[M]),,27])|(2-3*DB_TTKO49OB(|L))|(3-4*DB_3B_G(MMEHS56|MHS57|LMHS36)(|L))|       \
1339      (3-4*DB_3_Z2(B_DE|B_AR|B_BP|B_MI|B_ES|H_SH|H_SH)(|L))|(3-4*DB_3B_T(EHS42|MEHS50TRA2)(|L))|          \
1340      (2-3*((DB_3BTS30[O:WB3D1,*22,11][O:WB3D1,*45,11][O:WB3D1,*68,11])|                                  \
1341      (DB_3BTS30L[O:WB3D1,*23,11][O:WB3D1,*45,11][O:WB3D1,*69,11])|                                       \
1342      (DB_3_BT30A(|B)L[O:WB3D1,*21,12][O:WB3D1,*45,12][O:WB3D1,*69,12])|                                  \
1343      (DB_3_BT30A(|B)[O:WB3D1,*22,12][O:WB3D1,*46,12][O:WB3D1,*70,12])))|                                 \
1344      (2-3*(VTG_3_UHS597332|EVA_3_UHS539209|VTG_3_UBHS598702|VTG_3_UHS587854|DB_3_UHS509579_MG)(|L))|     \
1345      (2-3*(DR_ZH8020|EVA_3B_Z3KAS(|L)|DR_ZAEKK2))|(2-3*(DB_3KLMMGKS66)(|L))|                             \
1346      (3*(DB_3B_OMM52_0(1|2|3|4|5|6|7)[OB:COAL(56|50)(|[M]),,26]))|                                       \
1347      (2-3*(DB_3B_R10(OR|H)(|L)[OB:WOOD22(1|2|3|4|5|6),,12]))|                                            \
1348      (2-4*(DB_3B_GMS39H(1|2)|DB_3B_GLMMS61H)(|L))|                                                       \
1349      (2-4*(DB_3B_GBS252(|L)|DB_3B_GLMHS50B(|L)|DB_3B_GMS39A))|                                           \
1350      (2-3*(DB_3B_R(MMS31|10O)(|L)[OB:STEELCOIL1,,12]))|(2-3*(DB_3B_KKDS55(|L)|DB_3C_KDS54(|B)(|L)))|     \
1351      (2-3*((DB_3B_TMEHS50(|TRA)(|L))|DB_3B_OMM33H1))|                                                    \
1352      (2-3*((DB_3B_BTMS55(|L)[OB:TANK_41W,9,12][OB:TANK_41W,81,12][OB:TANK_41W,57,12][OB:TANK_41W,33,12])| \
1353      (DB_3B_TS50O(|L)[OT:FR_EKRT2,34,14][OT:FR_EKRT2,58,14][OT:FR_EKRT2,10,14])))|                       \
1354      (DB_3B_TS50B[OT:FR_EKRT2,34,14][OT:FR_EKRT2,58,14][OT:FR_EKRT2,10,14])|                             \
1355      (DB_3B_TS50BL[O:EOSKRT021[BC:-15,15],39,13][O:EOSKRT021[BC:-15,15],63,13]                           \
1356      [O:EOSKRT021[BC:-15,15],15,13])|(2-3*DB_3B_Z2UER(1|2)(|L))|(2-3*DB_BT10EOSKRT)|                     \
1357      (2-3*((DB_3B_RMMS33(|L)[OB:CABLE18,18,12][OB:CABLE18,50,12][OB:CABLE18,83,12])|                     \
1358      (DB_3B_RMMS31R[OB:BOX10,44,16][OB:BOX25,11,14][OB:#BOX10,77,16])))|                                 \
1359      (2-3*(FS_3(B_GMHS1|_F033)(|L)|OBB_3_GDS135H(|L)|SBB_3K3_42401[BC:-15,15](|L)))|                     \
1360      (2-3*(NS_3B_CHOP1460(|L)|NS_3B_SCHRKB(|L)|SNCB_3B_4427500(|L)))|                                    \
1361      (2-3*(DB_3B_RMMS31B[OB:WOOD17(1|6|7|8|3|9),22,15][OB:WOOD17(1|6|7|8|3|9),69,15]|                    \
1362      DB_3B_RMMS31BL[OB:WOOD1(58|61|62|59|63),20,15][OB:WOOD1(58|61|62|59|63),66,15]|                     \
1363      DB_3B_RMMSO33(|L)[OB:FR_TRACTOR2,13,12][OB:FR_TRACTOR2,62,12]))|                                    \
1364      (3*(DB_3B_OMM55_(01|02|03|04|05|06|07|08|09|10|11|12|13|14)[OB:COAL(56|50)(|[M]),,26]))
1365
1366  $DEF Z_D_E3_Gkurz=2*D3FBK
1367
1368  # EP 3b 1960-1968 DB West Germany Freigt long
1369  $DEF Z_D_E3_GB=8-10*D3FBK
1370
1371  # EP 3b 1960-1968 DB West Germany Freigt Caboose
1372  $DEF D3FBPWG=(DB_3B_PWGHS41OK|DB_3C_PWGHS41OK(|L))|DB_3B_PWGHS54(A|AL|B|BL|A3L)|                        \
1373      DB_3B_PWGS44(|D|B|A|DA)(|L)|DB_3C_PWGS44B(|L)|DB_PWGHS28A(|L)|DB_3B_PWG14BO(|L)|DB_3B_PWGPR14B(|L)
1374
1375  # EP 3b 1960-1968 DB West Germany Freigt short steam
1376  $DEF D3FBS2=D3FBPWG,4-5*D3FBK
1377
1378  # EP 3b 1960-1968 DB West Germany Freigt long steam
1379  $DEF D3FBL2=D3FBPWG,Z_D_E3_GB
1380
1381
1382  # EP 3b 1960-1968 DB West Germany Freigt shunting
1383  $DEF DEFSB=2-4*(DB_3_V14H(|L)|DB_3B_OM12B|DB_3B_KMMFKS52(|L)|DB_RMS31B(|L)|DB_TTKO49OB(|L)|             \
1384      DB_3B_GMHS53ESL2(|L)|DB_3B_GMHS35KE(|L)|DB_3B_OM19N28H|DB_3B_OM21EH(|L))
1385
1386  # EP 3b 1960-1968 DB West Germany Freigt Fals ore
1387  $DEF D3FLF=(24*(DB_OOT(24X|23E|23|24|41_73|41_77|41_81|Z41|Z41_73|Z41_77|Z41_81|Z44|Z48|53V|53|Z43|     \
1388      Z43H)(|L)[O:FR_ERZ(09|01|02|06|21|22|20|19|17|18|04|05)(|[M])]))|                                   \
1389      (24*(DB_OOT(42_73ML|42_73M|42_77M|42_77ML|42_81ML|42_81M|42_89M|42_89ML|50M|Z50B|Z50D|Z50F)         \
1390      [O:FR_ERZ(09|01|02|06|21|22|20|19|17|18|04|05)(|[M])]))
1391
1392  # EP 3b 1960-1968 DB West Germany Freigt Fals coal
1393  $DEF D3FLCO=26*(DB_OOT(42_73ML|42_73M|42_77M|42_77ML|42_81ML|42_81M|42_89M|42_89ML|Z43ZL|Z43Z|50M|      \
1394      Z50A|Z50C|Z50E)[O:(OMM_KOHLE_0(1|2|3)|COAL(9|23))(|[M])])
1395
1396  # EP 4 DB West Germany Passenger long distance 26,4 m cars  1970-1975
1397  $DEF Z_D_E4_PDG=(<(0-1*DB_POSTMRAP26_(55|63|65)(|L)),DB_4A_DMS905L,2*DB_4A_BUM232BL,                    \
1398      2*DB_B(UM233|M234)~HEN,2*(DB_4_AM20(3|2)BL|DB_4A_AM20(3|2)PL),                                      \
1399      DB_4A_WRUMH132_(1|2)RL|DB_4D_WRUMH132_2PL,DB_4_AM203BL,2*DB_4A_BUM234C)|                            \
1400      (<(2*DB_4A_BUM234C),DB_4_AM203B,DB_4A_WRUMH132_(1|2)R|DB_4D_WRUMH132_2P,                            \
1401      2*(DB_4_AM20(3|2)B|DB_4A_AM20(3|2)P),2*DB_B(UM233|M234)~HEN,2*DB_4A_BUM232BL,DB_4A_DMS905,          \
1402      0-1*DB_POSTMRAP26_(55|63|65))|                                                                      \
1403      (<(2*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK)),DB_4A_(ABUM221_1|ABUM221_3|BUM222|ABUM223G),               \
1404      DB_4A_AUM20(1|2|2B|2C|2D),DB_4A_WRUE35_15(1|2),2*DB_4A_AUM20(2|2B|2C|2D),                           \
1405      3*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK|9K|9N),DB_BDUMS271~TDBW|DB_BDUMS272)|                           \
1406      (<DB_4A_DUM902,2*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S),                                                 \
1407      DB_4A_(BUM226|ABUM224|ABUM224G|ABUM225A|ABUM225B|ABUM225GK),DB_4A_AUM20(3C|3D|3K|4B),               \
1408      (DB_4A_ARMH217KL|DB_ARUM216BAL|DB_ARUM216BRA(1|2)L),2*DB_4A_AUM20(3C|3D|3K),                        \
1409      3*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S))|                                                               \
1410      (<(2*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S)L),DB_4A_AUM20(3C|3D|3K|4B)L,                                 \
1411      (DB_4A_ARMH217K|DB_ARUM216BA|DB_ARUM216BRA(1|2)),2*DB_4A_AUM20(3C|3D|3K)L,                          \
1412      DB_4A_(BUM226|ABUM224|ABUM224G|ABUM225A|ABUM225B|ABUM225GK)L,2*DB_4A_BUM23(3A|3C|4A|4B|4C|4K|4S)L,  \
1413      DB_4A_DUM902L)|                                                                                     \
1414      (<DBP_4A_POSTU21A59(33|42|58|72)(|L),DB_BDUMS272L|DB_BDUMS271L~TDBW,                                \
1415      (3*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK|9K|9N)L),2*DB_4A_AUM20(2|2B|2C|2D)L,DB_4B_WRTUM_133(|L),       \
1416      DB_4A_AUM20(1|2|2B|2C|2D)L,DB_4A_(ABUM221_1|ABUM221_3|BUM222|ABUM223G)L,DB_4A_AUM20(2|2B|2C|2D)L,   \
1417      (2*DB_4A_BUM23(1G|1H|2|2A|2B|2BK|2AK)L))|                                                           \
1418      (<DB_BDUMS271L~TDBW,DB_4A_BUM232B,DB_4_AM202B,DB_ARUM216BRA2,DB_4_AM202BL,DB_BUM233~HEN,            \
1419      DB_4A_BUM234C,DB_4A_ABUM223G)
1420
1421  # EP 4 DB West Germany Passenger long distance 26,4 m cars  1975-1980
1422  $DEF D4PDMO=(<DB_4(A|B|C)_DMS905(|L)|DB_4(A|B)_DMS902BB(|L)|DB_4A_DM902P(|L)|DB_4A_DUM902(|L),          \
1423      3-4*(DB_4BM234|DB_BM234P|DB_BM234|DB_4B_BUM234OB|DB_BUM233L|DB_4A_BUM232L|DB_4C_BM232OBL|DB_BM232P), \
1424      DB_4B_ABUM225OB|DB_4ABM225BB|DB_ABUM225G|DB_ABUM225G|DB_4B_ABUM224G|DB_4C_ABUM223GA|DB_ABUM223G,    \
1425      DB_4_AM202B|DB_4B_AM202OB|DB_4_AM203B|DB_AUM203P|DB_4AM203|DB_4A_AUM203OB,                          \
1426      DB_4B_WRUE35_152L|DB_4C_WRUGH152R|DB_4C_WRUGH152P|DB_4C_WRUGH152PE|DB_4C_WRUEGH152OB|               \
1427      DB_4D_WRUMH132_2PL|DB_4C_WRUMH132_(2|1)RL|DB_WRTM134ML,                                             \
1428      DB_4_AM202B|DB_4B_AM202OB|DB_4_AM203B|DB_AUM203P|DB_4AM203|DB_4C_AM202OB,                           \
1429      3*(DB_4BM234|DB_BM234P|DB_BM234|DB_4B_BUM234OB|DB_BUM233L|DB_4A_BUM232L|DB_4C_BM232OBL|DB_BM232P),  \
1430      DB_4B_ABUE332G(|L)|DB_4C_AUE309)|                                                                   \
1431      (<DB_4C_AUE309L|DB_4B_ABUE332G(|L),                                                                 \
1432      3*(DB_4BM234L|DB_BM234PL|DB_BM234L|DB_4B_BUM234OBL|DB_BUM233|DB_4A_BUM232|DB_4C_BM232OB|DB_BM232PL), \
1433      DB_4_AM202BL|DB_4B_AM202OBL|DB_4_AM203BL|DB_AUM203PL|DB_4AM203L|DB_4C_AM202OB,                      \
1434      DB_4B_WRUE35_152|DB_4C_WRUGH152RL|DB_4C_WRUGH152PL|DB_4C_WRUGH152PEL|DB_4C_WRUEGH152OBL|            \
1435      DB_4D_WRUMH132_2PL|DB_4C_WRUMH132_(2|1)RL|DB_WRTM134ML,                                             \
1436      DB_4_AM202BL|DB_4B_AM202OBL|DB_4_AM203BL|DB_AUM203PL|DB_4AM203L|DB_4A_AM203OBL,                     \
1437      DB_ABUM223GL|DB_4B_ABUM224GL|DB_ABM223PL|DB_ABUM225GL|DB_ABUM225GL|DB_4ABM225BBL|DB_4B_ABUM225OBL,  \
1438      3-4*(DB_4BM234L|DB_BM234PL|DB_BM234L|DB_4B_BUM234OBL|DB_BUM233|DB_4A_BUM232|DB_4C_BM232OB|          \
1439      DB_BM232PL),DB_4(A|B|C)_DMS905(|L)|DB_4(A|B)_DMS902BB(|L)|DB_4A_DM902P(|L)|DB_4A_DUM902(|L))|       \
1440      (<DB_4C_BDM272OBL|DB_BDUMS272L~HEN|DB_4C_BDM271OBL|DB_BDUMS271L~TDBW,                               \
1441      3*(DB_4B_BUM23(2A|2B)|DB_4C_BM232OB|DB_4B_BUM232OBL|DB_4B_BUM232(A|B)),DB_4A_BUM222,                \
1442      2*DB_4B_AUM202(A|O|B),DB_WRMZ135OB|DB_4D_WRUMH132_2P|DB_4C_WRUMH132_(2|1)R|DB_WRTM134M,             \
1443      DB_4B_AUM202(A|O|B),3*(DB_4C_BM232OB|DB_4B_BUM232OBL|DB_4B_BUM232(A|B)))|                           \
1444      (<(2*(DB_4B_BUM23(2A|2B)L|DB_4C_BM232OBL|DB_4B_BUM232OB|DB_4B_BUM232(A|B)L|DB_4B_BUM23(2A|2B)L)),   \
1445      2*DB_4B_AUM202(A|O|B)L,DB_WRMZ135OBL|DB_4D_WRUMH132_2PL|DB_4C_WRUMH132_(2|1)RL|DB_WRTM134ML,        \
1446      DB_4B_AUM202(A|O|B)L,DB_4A_BUM222L,                                                                 \
1447      3*(DB_4B_BUM23(2A|2B)|DB_4C_BM232OBL|DB_4B_BUM232OB|DB_4B_BUM232(A|B)L)|DB_WRTM134M,                \
1448      DB_4C_BDM272OB|DB_BDUMS272~HEN|DB_4C_BDM271OB|DB_BDUMS271~TDBW)|                                    \
1449      (<(DB_4(B|A)_DMS902BBL|DB_4(B|C|A)_DMS905L),                                                        \
1450      3*(DB_4B_BUM233G|DB_BM233P|DB_BM234PL|DB_4BM234|DB_4B_BM234S),                                      \
1451      (2:DB_4C_ABUM223(GB|GA)|1:DB_4B_BUM226|5:DB_4B_ABUM22(5OK|5GK|5G|4O|4G)),                           \
1452      2*(DB_4B_AUM203(OK|GK|G|M)|DB_4A_AM203OBL),                                                         \
1453      DB_4A_ARMZ211K|DB_4B_ARMZ211SPE|DB_ARUM216BRA(1|2)|DB_ARUM216BRB|DB_ARUM216OB(R|S),                 \
1454      (DB_4B_AUM203(OK|GK|G|M)|DB_4A_AM203OBL|DB_4A_AM203P),                                              \
1455      2*(DB_4B_BUM233G|DB_BM233P|DB_BM234PL|DB_4BM234|DB_4B_BM234S))|                                     \
1456      (<(2*(DB_4B_BUM233GL|DB_BM233PL|DB_BM234P|DB_4BM234L|DB_4B_BM234SL)),                               \
1457      2*(DB_4B_AUM203(OK|GK|G|M)L|DB_4A_AUM203OB),                                                        \
1458      DB_4B_ARMZ211KL|DB_4B_ARMZ211SPEL|DB_ARUM216BRA(1|2)L|DB_ARUM216BRBL|DB_ARUM216OB(R|S)L,            \
1459      (DB_4B_AUM203(OK|GK|G|M)L|DB_4A_AUM203OB|DB_4A_AM203PL),                                            \
1460      (2:DB_4C_ABUM223(GB|GA)L|1:DB_4B_BUM226L|5:DB_4B_ABUM22(5OK|5GK|5G|4O|4G)L),                        \
1461      3*(DB_4B_BUM233GL|DB_4B_BUM23(2A|2B)L|DB_BM233PL|DB_BM234P|DB_4BM234L|DB_4B_BM234SL),               \
1462      DB_4(B|A)_DMS902BB|DB_4(B|C|A)_DMS905)
1463
1464  # EP 4 DB West Germany Passenger long distance old cars 1968-1970
1465  $DEF D4PDAA=(<DB_4A_DUE932KL|DB_4B_DUE932(|L)|DB_4A_DUESE947(|L)|DB_4B_DUE941(|L)|DB_4A_DUE941M(|L)|    \
1466      DB_4B_DYE927(|L),                                                                                   \
1467      3*(DB_4A_BUE354K|DB_4A_BUE363K|DB_4B_BYE363|DB_4B_BUE364|DB_4A_BUE350|DB_4B_BUE354),                \
1468      DB_4A_WRUGH152R(|L)|DB_4A_WRUE152_140(|L)|DB_4A_ARUE316L,                                           \
1469      DB_4A_AUE310EL|DB_4B_AUE309L|DB_4B_AUE308GL|DB_4A_AUE302L|DB_4A_AUE302GL|DB_4A_AUE301L,             \
1470      DB_4B_ABUE321GL|DB_4A_AB4UE323GL|DB_4_AB4UE323L|DB_4A_ABUE322L|DB_4A_ABUE324GL|DB_4B_ABUE325GL|     \
1471      DB_4B_ABUE329GL|DB_4A_ABUE332L|DB_4A_ABUE334GL|DB_4A_ABUE334L,                                      \
1472      3*(DB_4A_BUE350,DB_4A_BUE354K|DB_4A_BUE363K|DB_4B_BYE363|DB_4B_BUE364|DB_4B_BUE363|DB_4B_BUE354))|  \
1473      (<(3*(DB_4A_BUE354KL|DB_4A_BUE363KL|DB_4A_BUE350L|DB_4B_BUE364L|DB_4B_BUE363L|DB_4B_BUE354L)),      \
1474      DB_4B_ABUE321G|DB_4A_AB4UE323G|DB_4_AB4UE323|DB_4A_ABUE322|DB_4A_ABUE324G|DB_4B_ABUE325G|           \
1475      DB_4B_ABUE329G|DB_4A_ABUE332|DB_4A_ABUE334G|DB_4A_ABUE334,                                          \
1476      DB_4A_AUE310E|DB_4B_AUE309|DB_4B_AUE308G|DB_4A_AUE302(|K)|DB_4A_AUE302GK|DB_4A_AUE301,              \
1477      DB_4A_WRUGH152R(|L)|DB_4A_WRUE152_140(|L)|DB_4A_ARUE316,                                            \
1478      3*(DB_4A_BUE354KL|DB_4A_BUE363KL|DB_4B_BYE363L|DB_4B_BUE364L|DB_4A_BUE350L|DB_4B_BUE354L),          \
1479      DB_4A_DUE932KL|DB_4B_DUE932(|L)|DB_4A_DUESE947(|L)|DB_4B_DUE941(|L)|DB_4A_DUE941M(|L)|              \
1480      DB_4B_DYE927(|L))
1481
1482  # EP 4 DB West Germany Passenger long distance old cars 1970-1975
1483  $DEF D4PDAB=(<DB_4B_ABUE32(1|5|9)L|DB_4_AB4UE323L|DB_4_ABUE324L,                                        \
1484      2*(DB_4B_BUE354|DB_4B_BUE356L|DB_4B_BUE357L|DB_4_BUE367L|DB_4_B4UE368L|DB_4B_BUE371L|               \
1485      DB_4B_BUE372_(28|34)L),2*(DB_4B_AUE302(|G)L|DB_4B_AUE306(|N)L|DB_4B_AUE307(|G)L),                   \
1486      2*(DB_4B_BUE354|DB_4B_BUE356L|DB_4B_BUE357L|DB_4_BUE367L|DB_4_B4UE368L|DB_4B_BUE371L|               \
1487      DB_4B_BUE372_(28|34)L),                                                                             \
1488      DB_4B_DPOSTUE956(|U)(|L)|DB_4B_DUE932(KL|UL|OL|U|O)|DB_4B_DYE927(|U)(|L)|DB_4B_DUE924(|L))|         \
1489      (<DB_4B_DPOSTUE956(|U)(|L)|DB_4B_DUE932(KL|UL|OL|U|O)|DB_4B_DYE927(|U)(|L)|DB_4B_DUE924(|L),        \
1490      2*(DB_4B_BUE354(|K)L|DB_4B_BUE356|DB_4B_BUE357|DB_4_BUE367|DB_4_B4UE368|DB_4B_BUE371|               \
1491      DB_4B_BUE372_(28|34)),2*(DB_4B_AUE302(|GK|G)|DB_4B_AUE306(|N)|DB_4B_AUE307(|G)),                    \
1492      2*(DB_4B_BUE354(|K)L|DB_4B_BUE356|DB_4B_BUE357|DB_4_BUE367|DB_4_B4UE368|DB_4B_BUE371|               \
1493      DB_4B_BUE372_(28|34)),DB_4B_ABUE32(1|5|9)|DB_4_AB4UE323L|DB_4_ABUE324)|                             \
1494      (<DB_4B_ABUE332,(2*DB_4B_BUE36(2|3)),1-2*DB_4B_AUE308,2*DB_4B_BUE36(2|3),                           \
1495      DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L))|                                                          \
1496      (<DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L),(2*DB_4B_BUE36(2|3)L),1-2*DB_4B_AUE308L,                 \
1497      2*DB_4B_BUE36(2|3)L,DB_4B_ABUE332L)|                                                                \
1498      (<(DB_4B_DUESE947(|L)|DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L)),0-1*DB_4B_AUE309,DB_4B_AUE310(|E),  \
1499      0-1*DB_4A_BUE370,4*DB_4B_BUE366(|E),DB_4B_ABUE334(|G))|                                             \
1500      (<DB_4B_ABUE334(|G)L,0-1*DB_4A_BUE370L,4*DB_4B_BUE366(|E)L,0-1*DB_4B_AUE309,DB_4B_AUE310(|E)L,      \
1501      (DB_4B_DUESE947(|L)|DB_4B_DUE941(|K|M)(|L)|DB_4B_DUE938M(|L)))
1502
1503  # EP 4 DB West Germany Passenger regional 3x cars
1504  $DEF D4PPN3=(<DB_4A_D2IE876(|L)|DB_4A_D2IE879(|L)|DB_4A_D2IE881(|U)(|L)|DB_4A_D2IE883(|L),              \
1505      (DB_4U_B3YG761,DB_4AB3YG756L)|(DB_4AB3YG756,DB_4B3YG761L),                                          \
1506      (DB_4U_B3YG761,DB_4U_B3YG761L)|(DB_4B3YG761,DB_4B3YG761L))|                                         \
1507      (<(DB_4BD3YG766L,DB_4U_B3YG761),(DB_4B3YG761,DB_4AB3YG756L)|(DB_4AB3YG756,DB_4U_B3YG761L),          \
1508      (DB_4U_B3YG761,DB_4U_B3YG761L)|(DB_4B3YG761,DB_4B3YG761L))|                                         \
1509      (<(DB_4U_B3YG761,DB_4U_B3YG761L)|(DB_4B3YG761,DB_4B3YG761L),                                        \
1510      (DB_4B3YG761,DB_4AB3YG756L)|(DB_4AB3YG756,DB_4U_B3YG761L),(DB_4B3YG761L,DB_4BD3YG766))
1511
1512  # EP 4 DB West Germany Passenger regional rebuild 4x cars 80s
1513  $DEF D4PPNUC=(<DB_4C_BYG514(R|S)(|L)|DB_43BYG514(R|S)(|L)|DB_4C_BYG515M(|L)|DB_43BYG515(|L),            \
1514      DB_43ABYG503(|N)(|L),DB_4C_BYG531ML|DB_4C_BYG532(R|S)L)|                                            \
1515      (<DB_4C_BYG531M|DB_4C_BYG532(R|S),DB_43ABYG503(|N)(|L),                                             \
1516      DB_4C_BYG514(R|S)(|L)|DB_43BYG514(R|S)(|L)|DB_4C_BYG515M(|L)|DB_43BYG515(|L))
1517
1518  # EP 4 DB West Germany Passenger regional silver cars 70s
1519  $DEF Z_D_E4_PES=(<DB_4A_BN719L,2*DB_4A_ABNB703L,2*DB_4A_BN719,DB_4A_MDYG986M2)
1520
1521  # EP 4 DB West Germany Passenger regional silver cars 70s push and pull left
1522  $DEF D4PSWAL=(<DB_4A_BDNF738BL|DB_4A_BDNRZF740OL,DB_4A_BN724B(|L)|DB_4A_BN719(|L),DB_4A_ABNB703(|L),    \
1523      DB_4A_BN719(|L))
1524
1525  # EP 4 DB West Germany Passenger regional silver cars 70s push and pull right
1526  $DEF D4PSWAR=(DB_4A_BN724B(|L)|DB_4A_BN719(|L),DB_4A_ABNB703(|L),DB_4A_BN719(|L),                       \
1527      DB_4A_BDNRZF740O|DB_4A_BDNF738B)
1528
1529  # EP 4 DB West Germany Passenger regional silver cars 80s
1530  $DEF D4PRS8=1-2*(DB_4C_BN(724|B719DH)(|L)),1-2*DB_(ABN703|4C_ABNB703)(|L),1-2*(DB_4C_BN(724|B719DH)(|L))
1531
1532  # EP 4 DB West Germany Passenger regional yl-cars (middle doors) 80s push and pull left
1533  $DEF D4PEML=(<DB_4C_BDYLB45(8|9)L|DB_4D_BDYMF456L|DB_4D_BYMF436L|DB_4C_457L|DB_4C_457UL,                \
1534      DB_4D_BYM421(|L),DB_4D_ABYM411(|L)|DB_4C_422(|L))
1535
1536  # EP 4 DB West Germany Passenger regional yl-cars (middle doors) 80s push and pull right
1537  $DEF D4PEMR=(<DB_4C_422(|L)|DB_4D_ABYM411(|L),DB_4D_BYM421(|L),                                         \
1538      DB_4C_BDYLB45(8|9)|DB_4C_457|DB_4D_BDYMF456|DB_4D_BYMF436|DB_4C_457U)
1539
1540
1541  # EP 4 DB West Germany Passenger regional silver cars 80s push and pull left
1542  $DEF D4PSWCL=(<DB_4C_BDNRZF740(|O)L|DB_4B_BDNRZF740OL|DB_4BDNRZF740HL|DB_4C_BDNRZF740OL,                \
1543      DB_4(B|C)_BN724(|L)|(DB_4_BNRZB719|DB_4C_BNB719DH)(|L),DB_4C_ABNB703(|L),                           \
1544      (DB_4_BNRZB719|DB_4C_BNB719DH)(|L))
1545
1546  # EP 4 DB West Germany Passenger regional silver cars 80s push and pull right
1547  $DEF D4PSWCR=(DB_4(B|C)_BN724(|L)|((DB_4_BNRZB719|DB_4C_BNB719DH)(|L)),DB_4C_ABNB703(|L),               \
1548      ((DB_4_BNRZB719|DB_4C_BNB719DH)(|L)),                                                               \
1549      DB_4C_BDNRZF740O|DB_4BDNRZF740H|DB_4C_BDNRZF740(|O)|DB_4B_BDNRZF740O)
1550
1551  # EP 4 DB West Germany Passenger semi fast train DRG cars 1968-1974
1552  $DEF D4PEA1=(<(DB_4A_DYE973(|U)(|L)|DB_4A_DYE974(|U)(|L)|DB_4A_DYE975(|U)(|L)|DB_4A_ADYSE641(|G)(|L)|   \
1553      DB_4A_DIE992(|L)),                                                                                  \
1554      DB_4A_ABYSE634(|G)(|L)|DB_4A_ABYSE633(|A)(|G)(|L)|DB_4A_ABYSE630A(|G)(|L)|DB_4A_ABYSE627(|G)(|L)|   \
1555      DB_4B_ABYSE619G|DB_4A_ABYSE619GL|DB_4A_ABYSE619(|L)|DB_4A_ABYSE618(|W)(|L),                         \
1556      DB_4A_ABYSE617A(|G)(|L)|DB_4A_AYSE604(A|B|AG)(|L),                                                  \
1557      (0-1*DB_4A_BYE654(|L)~LB|(DB_4A_BRYE693(|G)(|L))),                                                  \
1558      (3-4*DB_4A_BYE673(|L)|DB_4A_BYE669(|A)(|L)|DB_4A_BYE667(B|A)(|L)|DB_4A_BYE663(|L)|                  \
1559      DB_4A_BYE662(|L)|DB_4A_BYE656(|L)|DB_4A_BYE655A(|L)|DB_4A_BYE653(|L)))
1560
1561  # EP 4 DB West Germany Passenger semi fast train DRG cars 1975-1982
1562  $DEF D4PEA2=(<(4*(DB_4C_BYE667B(|L)|DB_4C_BYE655(|L)|DB_4B_BYE673(|L)|DB_4B_BYE669(|A)(|L)|             \
1563      DB_4B_BYE667(B|A)(|L)|DB_4B_BYE663(|L)|DB_4B_BYE662(|L)|DB_4B_BYE656(|L)|DB_4B_BYE655A(|L)|         \
1564      DB_4B_BYE653(|L))),                                                                                 \
1565      DB_4B_ABYSE634(|L)|DB_4B_ABYSE633(|A)(|L)|DB_4B_ABYSE630A(|L)|DB_4(B|C)_ABYSE627(|L)|               \
1566      DB_4B_ABYSE619(|W)(|L)|DB_4(B|C)_ABYSE618(|L)|DB_4B_ABYSE617(A|B)(|L)|DB_4C_AYSE604(A|B)(|L)),      \
1567      DB_4B_DYE973(|U)(|L)|DB_4B_DYE974(|U)(|L)|DB_4B_DYE975(|U)(|L)|DB_4B_DYE971(|U)(|L)|                \
1568      DB_4(B|C)_ADYSE641(|L)|DB_4B_DYE973B(|L)
1569
1570  # EP 4A DB West Germany Germany Freight shunting
1571  $DEF D4FK1S=(2-3*((DB_5OMM55(|E|B|D)(|L)|DB_OMM52(A|C|D)(|L))[OB:COAL(56|50)(|[M]),,26]))|              \
1572      (2-3*(DB_4A_E016UL|DB_4A_E016U|DB_4A_E016|DB_4A_E016BL|DB_4A_E016N23UL|DB_4A_E016N23|               \
1573      DB_4A_E016N23BL|DB_4A_E016N23SL|DB_4A_E016N52F|DB_4A_E019U|DB_4A_E019BL|DB_4A_E021FL|               \
1574      DB_4A_E021FTL|DB_4A_E021|DB_4A_E021F|DB_4A_E021FTL|DB_4A_E021FT|DB_4A_E016N23S|DB_4A_E019L|         \
1575      DB_4A_E021FT(|L)[OB:SCRAP1(3|5|4|2)(|[M]),,27]))|(2-3*DB_4A_I(BS394|CH377)(|L))|                    \
1576      (2-3*(DB_4A_E(016U(|L)|016|016B(|L)|016N23UL|016N23|016N23BL|016N23S(|L)|016N52F(|L)|019U|019L|     \
1577      019BL|021F(|L)|021T(|L)|021FT(|L))[OB:(FR_KO12|COAL41)(|[M]),,28]))|                                \
1578      (2-3*(DB_4A_GRSV212B|DB_GBS254A|DB_4A_GRS212EB(|L)|DB_4A_GLS203))|                                  \
1579      (2-3*(DB_4A_GRS204E(|L)|DB_4A_GRSV212B(|L)|DB_4A_GRSV212B|DB_4A_GS211E(|L)))|                       \
1580      (2-3*(DB_4A_GBS254(|A)(|L)|DB_4A_GBS252(|L)|DB_4A_GOS253(|B)(|L)))|                                 \
1581      (2-3*(DB_4A_GOS245(|A)(|L)|DB_4A_GLMS207L|DB_4A_GLS205T|DB_4A_GRS204EL))|                           \
1582      (2-3*DB_4A_(HFRS312|LFST569R|HABFIS0299000)(|L))|                                                   \
1583      (2-3*(DB_4A_TS852(|L)|DB_4A_TCS850|DB_TD928(|L)|DB_4A_TCEFS845))|                                   \
1584      (2-3*(DB_4A_UAHS0778654_EVA(|L)|EVA_4A_UHS0738922(|L)|HOECHST_4A_UHS0736598|                        \
1585      HOECHST_4A_UHS0736602 (|L)|DB_4A_UHS0723217_DOW|VTG_4A_UHS0723205(|L)))|                            \
1586      (2-3*(DB_4A_UHS0022027_HOBUM|DB_4A_UHS0022027_HOBUM|KNZ_4A_UHS0727901|SCHRAUBE_4A_UHS0025276|       \
1587      SCHERING_4A_UHS0006651|KOAG_4A_UHS0736784|DB_4A_UHS0025281|DB_4A_UHS0025282))|                      \
1588      (2-3*(VTG_4A_UHS0723203|DB_4A_UHS0033369_VALENTIN|BUSE_4A_UHS0037939L|VTG_4A_UHS0723201(|L)|        \
1589      KNZ_4A_UHS0727901|SCHRAUBE_4A_UHS0025276|SCHERING_4A_UHS0006651))
1590
1591  # EP 4A DB West Germany Germany Freight short
1592  $DEF D4FK1A=2*D4FK1S
1593
1594  # EP 4A DB West Germany Germany Freight long
1595  $DEF D4FLA=7-8*D4FK1A
1596
1597  # EP 4A DB West Germany Germany Freight long steam
1598  $DEF D4FLSA=DB_4_PWGHS054(A|A3BL|D|C|B|AL|A3AL|DL|CL|BL),7-8*D4FK1A
1599
1600  # EP 4B DB West Germany Germany Freight shunting
1601  $DEF D4FK1=(2-3*((DB_4_E037_01|DB_4_E040_2(1|2|3|4|5)|DB_5OMM55(D|E)(|L))                               \
1602      [OB:COAL(43|45|44|40|57)(|[M]),,27]))|(2-3*DB_(EANOS052AM|EAOS051_Y25M|EAOS051_Y25FM(|L)))|         \
1603      (2-3*(DB_4_EAOS051|DB_EAOS051L|DB_4_EANOS052L|DB_4_EANOS052BL|DB_4_EANOS052V|DB_4_EANOS052VBL|      \
1604      DB_EANOS052|DB_4_EAOS106AB|DB_4_EAOS106BBL|DB_4_EAOS106AE|DB_4_EAOS106BEL|DB_4_EAOS106BE|           \
1605      DB_EAOS106L|DB_EAOS106|DB_EAOS106B1|DB_4_EAOS106AL))|(2-3*(DB_FCS(3|4|5|6|7|8|9|10|11|12)(|L)))|    \
1606      (2-3*(DB_4_GOS245C(|L)|DB_4B_GSUV212B|DB_GS213BM(|L)))|                                             \
1607      (2-3*(DB_4B_GLS205EFT|DB_4B_GS211E(|L)|DB_4B_GLS205FTB(|L)|DB_4B_GLS205EFT))|                       \
1608      (2-3*(G_4440|G_46421|G_4644|G_4442))|                                                               \
1609      (2-3*(DB_4(B_GBS252(|L)|B_GOS253B(|L)|_GOS253(|L)|GBS254(|L)~JUH)))|                                \
1610      (2-3*(DB_4B_GLS203|DB_4B_GS(212E|212EB|UV212B)(|L)))|                                               \
1611      (2-3*DB_HBBI(S306(A|B|C|D)(|L)|NS246(|L)|S306M|S306EM|LLS308M|LLS311M))|                            \
1612      (2-3*DB_(HBIS_RIEGELSBERGER|HBIS_SCHLOSS|4B_HABFIS0299015)(|L))|                                    \
1613      (2-3*(DB_HBIS_T297(A|B|C|D)(|L)|DB_HBIS299G(|L)))|                                                  \
1614      (2-3*(DB_4IBBHS396(|L)|BASF_TROCKENEIS|DB_4IBBHS396E(|L)|DB_IBBHS399M|DB_IBBHLPS401M))|             \
1615      (2-3*(DB_KBS442N|DB_HABBIS345AM))|(2-3*DB_LGJS598(|L)[O:C60_E4,14,12][O:C60_E4,75,12])|             \
1616      (2-3*(DB_LGJS598[O:C2_SEALAND,13,12][O:C2R22,74,12]))|                                              \
1617      (2-3*DB_LAAEKS553[OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),6,10]                                         \
1618      [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),6,29][OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),142,10]              \
1619      [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),62,10][OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),62,29]              \
1620      [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),144,29][OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),204,29]            \
1621      [OB:ESCORT(WY|WG|WW|WR|WB|Y|G|W|B|R),192,10])|(2-3*(DB_RES686|DB_4GBS254(|L)|DB_GBS254A))|          \
1622      (2-3*(DB_LBKKMMS578M[O:TANK_25(N|K),11,12][O:TANK_25(N|K),36,12][O:TANK_25(N|K),60,12]))|           \
1623      (2-3*(DB_RES686MM|DB_RES687M))|(2-3*DB_RLMMPS651M[O:PIPE(31|62|60)])|                               \
1624      (2-3*(RAILS_SHIMMNS708|DB_SHIMMS708M)(|L))|(2-4*DB_SGMMS697M[OB:STEEL(28|29|30|31|41),,12])|        \
1625      (2-3*(DB_SGMMNS738M(|L)[OB:STEEL(28|29|30|31|41),,12]))|                                            \
1626      (2-3*((DB_SAHMMS709M|DB_SAHMMS709NM|DB_SAHMMS711ASM)[OB:COIL20H,32,13][OB:COIL23H,70,13]            \
1627      [OB:COIL23H,112,13]))|(2-3*(DB_SPS719MM[OB:WOOD(129|46|128|130)(|[M]),,12]))|                       \
1628      (2-3*((DB_SGNS696M|DB_SGNS694M(|L))[O:C6(10|0)_E4,7,12][O:C6(10|0)_E4,68,12][O:C6(10|0)_E4,129,12]))| \
1629      (2-3*DB_TA(EMS887M|EMS888M|MNS886M(|L)|EMS892M(|L)|MNS893M(|L)))|(2-3*DB_TD(S930QWM|925QWM)(|L))|   \
1630      (2-3*(DB_4B_TCMS850|DB_TADS960A|DB_TBIS869AEM|DB_TBIS875EM))|                                       \
1631      (2-3*(DB_TBIS870BEM|DB_TBIS871EM|DB_TBIS874M|DB_TBIS870AEM))|                                       \
1632      (2-3*((DB_UAC946M|VTG_4_UHS0728261)(|L)))|                                                          \
1633      (2-3*((DB_UCS908_25M|DB_UCS908_25FM|DB_UCS908AM|DB_UCS908QWM|DB_UCS908FM|DB_UCS909AM|DB_UCS909FM|   \
1634      EVA_UCS908M|EVA_UCS909M)(|L)))|(2-3*(HENKEL01|BAYER_4_ZCEKKS7435722|DB_Z5CHLOR1))|                  \
1635      (2-3*(VTG_4_ZACS7868089|VTG_4_ZAFS7899001)(|L)|DB_4_ZGS7318045_ITG)|                                \
1636      (2-3*BAYER_4_ZCEKKS7435722|DB_4_ZACES0077931_SOGEFA(|L))
1637
1638  # EP 4B DB West Germany Germany Freight short
1639  $DEF Z_D_E4_Gkurz=2*D4FK1
1640
1641  # EP 4B DB West Germany Germany Freight long
1642  $DEF D4FL=7-8*D4FK1
1643
1644  # EP 4B DB West Germany Germany Freight long steam
1645  $DEF D4FLS=DB_4_PWGHS054(A|A3BL|D|C|B|AL|A3AL|DL|CL|BL),7-8*D4FK1
1646
1647  # EP 4 DB West Germany Germany Freight container
1648  $DEF Z_D_E4_Gcon=7*(DB_LGJS598|DB_LGJS573|DB_LGJS598|DB_LBGJS598A|DB_LGJS598B|DB_LGJS573CL|DB_LGJS573C) \
1649      [O:C60_E4,14,12][O:C60_E4,75,12],                                                                   \
1650      2*(DB_LGJS598|DB_LGJS573|DB_LGJS598|DB_LBGJS598A|DB_LGJS598B|DB_LGJS573CL|DB_LGJS573C)              \
1651      [O:C120_E4,,12],(3-4*DB_LGJNS576M[O:C6(0|10)_E4,11,12][O:C6(0|10)_E4,73,12])
1652
1653  # EP 4 DB West Germany Freigt Fad ore
1654  $DEF D4FFO=35*(DB_4FAD1(67F|67A|67B|67C|67D|67E|67F|67G|67H|67I|67J|67K|67L|67M|67N|67O|67P|67Q|68F|    \
1655      68A|68B|68C|68D|68E|68F|68G|68H|68I|68J|68K)[O:(FR_DRG_RUB|FR_ERZ22|FR_ERZ17|FR_ERZ05)(|[M])])
1656
1657  # EP 5  Passenger IC push and pull
1658  $DEF DB_ICL1996=(<DB_BimdzfL1996,(0-2)*DBAG_BM235OR(|L),2*DB_Bpmz1996,DB_Bpmbz1996,2*DBAG_BM235OR(|L),  \
1659      DB_ARmz1996,DB_Avmz1996,19:DB_Apmz1996|1:DB_Avmz1996)
1660  $DEF DB_ICR1996=(<19:DB_Apmz1996|1:DB_Avmz1996,DB_Avmz1996,DB_ARmz1996,2*DBAG_BM235OR(|L),              \
1661      DB_Bpmbz1996,2*DB_Bpmz1996,(0-2)*DBAG_BM235OR(|L),DB_BimdzfR1996)
1662
1663  # EP 5  Passenger IC not push and pull
1664  $DEF D5PIC=(<(3*(DBAG_BM235VRL~HEN|BM235RL~HEN|DB_BOMZ236L|DBAG_BOMZ236_3VRL)),                         \
1665      (3*(DB_BPMZ293RKL|DB_BPMZ293RWL|DB_BPMZ293RSL|DB_BPMZ292_0RL,                                       \
1666      DB_5BPMZ293_2DL|DB_BPMZ291_2RWL|DB_BPMZ291_3RL)),(DB_BVMZ185RKL|DB_5BVMZ185DHL),                    \
1667      (DB_5B_WRMH132_1L|DB_5B_WRMH132_2L|DB_WRMZ135RL~HEN|DB_WRMZ137RWL|DB_WRMZ137RKL|DB_5ARMH217RL|      \
1668      DB_5ARMZ218L|DB_5ARMZ211L|DB_8895002L),(0-1*DBAG_ABVMZ227_4RL),                                     \
1669      (2*(DB_APMZ121_0RWL|DB_APMZ121RWL|DB_APMZ121_0RKL|DB_APMZ121RKL|DB_APMZ123RHL|DB_APMZ117RWL|        \
1670      DB_APMZ117RKL|DBAG_APMZ123RHL)),                                                                    \
1671      (2*(DB_AVMZ111_2RWL|DB_AVMZ207RWL|DB_AVMZ107RWL|DB_AVMZ107RKL|DB_AVMZ111_0RKL|DB_5AVMZ111BL|        \
1672      DB_5AVMZ111CL|DB_AVMZ111_1RKL|DB_AVMZ111_2RKL|DB_5AVMZ111AL|DB_AVMZ107RK)))|                        \
1673      (<(2*(DB_AVMZ111_2RW|DB_AVMZ207RW|DB_AVMZ207RK|DB_AVMZ107RK|DB_AVMZ111_0RK|DB_AVMZ111_1RK|          \
1674      DB_AVMZ111_2RK|DB_5AVMZ111C)),                                                                      \
1675      (2*(DB_APMZ121_0RW|DB_APMZ121RW|DBAG_APMZ123RH|DB_APMZ121_0RK|DB_APMZ117RK|DB_APMZ121RK|            \
1676      DB_APMZ123RH|DB_APMZ117RW)),(0-1*(DB_ABVMZ227_4RH|DB_ABVMZ227_4R)),                                 \
1677      (DB_5B_WRMH132_1|DB_5B_WRMH132_2|DB_WRMZ135R~HEN|DB_WRMZ137RW|DB_WRMZ137RK|DB_5ARMH217R|            \
1678      DB_5ARMZ218|DB_5ARMZ211|DB_8895002),(DB_BVMZ185RK|DBAG_BVMZ185VRH),                                 \
1679      (3*(DB_BPMZ292_0R|DB_BPMZ293RK|DB_BPMZ293RW|DB_5BPMZ293_2D|DBAG_BPMZ291_2RK   |DB_BPMZ291_2RW|      \
1680      DB_BPMZ291_3R)),(3*(DBAG_BM235VR~HEN|BM235R~HEN|DB_BOMZ236|DBAG_BOMZ236_3VR)))|                     \
1681      (<DBAG_AVMZ207VRHL,                                                                                 \
1682      DBAG_APMZ121_0VRL|DBAG_APMZ121_0VR|DBAG_APMZ121VR|DBAG_APMZ117VRHL|DBAG_APMZ117VRH,                 \
1683      DBAG_AVMZ111_0VRL|DBAG_AVMZ111_0VR,                                                                 \
1684      DBAG_WRMZ133VRHL|DBAG_WRMZ133VRH|DBAG_6ARMZ218L|DBAG_6ARMZ218|DBAG_WRMH132_1VRHL|                   \
1685      DBAG_WRMH132_2VRH|DBAG_6ARMH217L|DBAG_6ARMH217|DBAG_6ARMZ211L|DBAG_6ARMZ211|DBAG_WRMZ135VRL~HEN|    \
1686      DBAG_WRMZ135VR~HEN|DBAG_WRMZ137VRHL|DBAG_WRMZ137VRH,DBAG_BPMZ291_2VRL,DBAG_BPMZ291_2VR,             \
1687      DBAG_BPMBKZ291_8VRH,DBAG_BPMBKZ291_8VRHL,DBAG_BVMZ185VRHL,DBAG_BM235VR~HEN,DB_BDMS273_VR1ML~KMN)
1688
1689  # EP 5  Passenger regional DB Cars short
1690  $DEF Z_D_E5_PWR=(DB_BN454_4GL,DBAG_5_ABNRZ417,DB_BNDZF481GKM   )|                                       \
1691      ((DB_5A_BN433DH|DBAG_5_BNRZB719)(|L),DBAG_5_ABN(RZ417|703)(|L)|DBAG_ABN(RZ403G|402G)(|L)),          \
1692      DBAG_5_BN724(|L)
1693
1694  # EP 5  Passenger regional DB Cars long
1695  $DEF D5PRL=(2*(DBAG_5_BN724|DB_BN454_4G)(|L),2*DB_ABN417G(|L)~KMN,(2*DB_5BN440)|DB_BNDZF481GKM   )|     \
1696      (2*(DB_5A_BN433DH|DBAG_5_BNRZB719)(|L),2*(DBAG_5_ABN(RZ417|703)(|L)|DBAG_ABN(RZ403G|402G)(|L)),     \
1697      DBAG_5_BN724(|L))
1698
1699  # EP 5  Passenger regional DR Cars
1700  $DEF Z_D_E5_POR=(<DBAG_5BYU439M,DBAG_5ABYU408PL,DBAG_5BYU439M,                                          \
1701      DBAG_5D_BDGHWS534L|DBAG_5BDGHWS534L|DBAG_5_BDWSB270L)|                                              \
1702      (<DBAG_5BYU439ML,DBAG_5ABYU408P,DBAG_5BYU439ML,DBAG_5BDGHWS534)
1703
1704  # EP 5  Germany DB Freigt shunting
1705  $DEF D5FR=(2-4*(DB_FCS30(|L)|DB_HBIS_T297A(|L)|DBAG_5_ES025(|L)|DB_HBIS295L2KM|DBC_HBILLNS303M))|       \
1706      (2-3*DBAG_SAMMSU454M[O:GROUND1(|[M])])|(2-3*DB_RLMMPS651KM[O:PIPE(31|62|60)])|                      \
1707      (2-3*(DB_5HABFIS2796119(|L)|DBC_HIRRSTT325M))|(2-3*DB_TIMS858(A|B)KM)|                              \
1708      (2-4*DB_(E025KM|ES045KM|5OMM55D(|L)|5OMM55E(|L))[OB:(FR_KO12|COAL41)(|[M]),,27])|                   \
1709      (3-4*DBAG_5_EAS(067|070(|F)|071|072)(|L)[OB:SCRAP(4|6|5)(|[M]),,33])|                               \
1710      (2-4*(ERR_HB6M|TWAG_HB6M|TWAG_HB9M|DB_HABBIS345KM))|(3-4*(DB_TADS960A|DB_TBIS|DBAG_5_TMS851))|      \
1711      (3-4*(DB_RILS652KM|DB_RILNS654BM|TWAG_RVM))|(2-3*DB_RLMMPS651KM[O:PIPE(31|62|60)])|                 \
1712      (2-4*DBAG_5_ES027(E|F)(|L)[O:(BALLAST48|BALLAST50|BALLAST20)(|[M])])|(2-3*DBAG_5_TMS851(|B)(|L))|   \
1713      (2-4*DBAG_5_EANOSX052(B|V|VB|_1|_1B)(|L)[O:(GROUND1|SAND4|BALLAST_OLD1|SAND3|BALLAST08)(|[M])])|    \
1714      (2-4*(DB_EANOS2|DB_EANOSB1L|DB_EANOSB2L|DBC_EANOS2|DBC_EANOS1|DB_EANOS1|DB_EANOSB1|                 \
1715      DBAG_5_EALOST058VL|DBAG_5_EALOST058FL|DBAG_5_EALSX063EF))|(2-4*DB_TAD(|G)S95(8|7)KM)|               \
1716      (2-4*DB_SGJKKMMS3[O:(BOX745_BAHNTRANS|BOX745_CARGOFITTT3|BOX745_02),10,12]                          \
1717      [O:(BOX745_ARMBRUSTER1|BOX745_CARGOFITTT7|BOX745_04),84,12])|                                       \
1718      (2-4*DB_TA(EMS892KM(|L)|MNS886KM(|L)|EMS889KM(|L)|MNS893KM(|L)|EMS889KM|EMS890KM|EMS890Y25KM|       \
1719      EMS891KM))|(2-4*(DB_SGMMS697KM|DB_SAMMNPS_V)[OB:STEEL(28|29|30|31|41),,12])|                        \
1720      (2-4*((DB_UCS908_25KM|DB_UCS908_25FKM|DB_UCS908KM|DB_UCS908FKM|DB_UCS909KM|DB_UCS909FKM|            \
1721      MEG_UCS908M|MEG_UCS908_FM|MEG_UCS909M|MEG_UCS909_FM)(|L)))|(2-4*DB_UAOOS948KM(|L))|                 \
1722      (2-3*DB_(RMMS663KM|RMMS663Y25KM|RS680KM|SGJS716KM)[OB:PIPE7(|[M]),,12])|                            \
1723      (3-4*(DB_RS689KM[OB:PIPE(54|58|40|63|59|55|45|47),,11]))|(3-4*DB_REMMS665(KM|Y25KM))|               \
1724      (2-4*DB_EA(OS051_Y25KM|OS051_1Y25KM|OS051_Y25FKM|OS051_650KM|NOS052KM|NOS052_Y25KM|LOS053KM|        \
1725      LOS053_Y25KM|LOS053D1Y25KM))|(2-4*(DB_RES676|DB_RES676DS)[OB:FER1(2|3)(|[M])])|                     \
1726      (2-3*(DB_SGMMNS738KM(|L)[OB:STEEL(28|29|30|31|41),,12]))|(2-3*DB_TD(925KM|925QWKM|S930QWKM)(|L))|   \
1727      (2-3*(DB_TBIS871EKM|DB_TBIS869AEKM|DB_TBIS875EKM|DB_TBIS870BEKM))|(2-4*DBC_TAMNS89(3|5)M(|L))
1728
1729  # EP 5  Germany DB Freigt long
1730  $DEF D5FL=7*D5FR
1731
1732  # EP 5  Germany DB Freigt steel long
1733  $DEF D5FSL=15*((RAILS_SHIMMNS708KM|DBAG_SHIMMNS730M|DB_SHIMMS708KM)(|L))
1734
1735
1736  # EP 6  Passenger IC 2010 push-pull train right
1737  $DEF D6PI2R=(<2*DBAG_AVMZ109B,DBAG_APMZ125WBL,DBAG_WRMZ134B(|2),DBAG_BVMZ186B,DBAG_BPMZ294B,            \
1738      5*DBAG_BPMZ295B,DBAG_BPMBDZF296_1B)
1739
1740  # EP 6  Passenger IC 2010 push-pull train left
1741  $DEF D6PI2L=(<DBAG_BPMBDZF296_1BL,5*DBAG_BPMZ295BL,DBAG_BPMZ294BL,DBAG_BVMZ186BL,DBAG_WRMZ134BL,        \
1742      DBAG_APMZ125WB,2*DBAG_AVMZ109BL)
1743
1744  # EP 6  Passenger regional 2000 n-cars
1745  $DEF Z_D_E6_PR=(<DBAG_BDUU497_3,DBAG_ABN416L,DBAG_ABN416,DBAG_BND447_9,DBAG_6BN448,DBAG_BND447_9L)
1746
1747  # EP 6  Passenger regional 2000 push-pull train n-cars left
1748  $DEF D6PNWDL=(<DBAG_BNRDZF463_1VRL|DBAG_BDNF464HHL|DBAG_BNDZF479L|DBAG_BDNZF479_2L|DBAG_BNDZFB479_2L|   \
1749      DBAG_BNRBDKZF479L|DBAG_BNRDZF480VRL|DBAG_BNRBDZF480L|DBAG_BDNZF481L|DBAG_BNRBDKZF481L|              \
1750      DBAG_BYBDZF482_1L,DBAG_6BN448(|L)|DBAG_6BN448(|L),DBAG_ABN416(|L)|DBAG_ABNRZ417(|L),                \
1751      DBAG_ABN417_5(|L)|DBAG_ABNRZ417_6(|L),DBAG_BND447_9(|L)|DBAG_BN447(|L))
1752
1753  # EP 6  Passenger regional 2010 push-pull train n-cars left
1754  $DEF D6PNWRL=(<DBAG_BNRDZF463_1VRRL|DBAG_BDNF464HHRL|DBAG_BNDZF479RL|DBAG_BDNZF479_2RL|                 \
1755      DBAG_BNDZFB479_2RL|DBAG_BNRBDKZF479RL|DBAG_BNRDZF480VRRL|DBAG_BNRBDZF480RL|DBAG_BDNZF481RL|         \
1756      DBAG_BNRBDKZF481RL|DBAG_BYBDZF482_1RL,DBAG_6BN448R(|L)|DBAG_6BN448R(|L),                            \
1757      DBAG_ABN416R(|L)|DBAG_ABNRZ417R(|L),DBAG_ABN417_5R(|L)|DBAG_ABNRZ417_6R(|L),                        \
1758      DBAG_BND447_9R(|L)|DBAG_BN447R(|L))
1759
1760  # EP 6  Passenger regional 2010 push-pull train n-cars right
1761  $DEF D6PNWRR=(DBAG_6BN448R(|L)|DBAG_6BN448R(|L),DBAG_ABN416R(|L)|DBAG_ABNRZ417R(|L),                    \
1762      DBAG_ABN417_5R(|L)|DBAG_ABNRZ417_6R(|L),DBAG_BND447_9R(|L)|DBAG_BN447R(|L),                         \
1763      DBAG_BNRDZF463_1VRR|DBAG_BDNF464HHR|DBAG_BNDZF479R|DBAG_BDNZF479_2R|DBAG_BNDZFB479_2R|              \
1764      DBAG_BNRBDKZF479R|DBAG_BNRDZF480_1VRR|DBAG_BNRBDZF480R|DBAG_BDNZF481R|DBAG_BNRBDKZF481R|            \
1765      DBAG_BYBDZF482_1R)
1766
1767  # EP 6  Freight mixed
1768
1769  # DB short
1770  $DEF D6FD1K=(3-4*(RAI_SNPS719_HOESCH|DB_RNSZ_T|DB_RNSZ_W1|DB_RNSZ_W2))|                                 \
1771      (3-4*(DB_EALOSX1|DBAG_5_EAOS106BE|DBAG_5_EAOS106BB|DBAG_5_EANS069F|DBAG_5_EAS066E))|                \
1772      (3-4*(DB_HBIS_T299B|DB_HBBILLNS305DL|DB_HBBILLNS305SL|DB_HBBINS309AL|DB_HBBINS309BL|                \
1773      DB_HBBINS309BPL|DB_HBBINS309BP|DB_HBBINS309CL|DB_HBBINS309CPL|DB_HBBINS309CP|DB_HBBINS309DL|        \
1774      DB_HBBINS309EL|DB_HABIS6RS2|DB_HABIS7TW2|DB_HBBILLNS305_2458247(|L)|DBC_HBBILLNS305_2457900(|L)|    \
1775      DBC_HBBILLNS305_2458247(|L)|DBC_HBBINS2460364(|L)|DBC_HBBINS306_2469830(|L)|DB_HBBINS2464088(|L)|   \
1776      DB_HBBINS2469687(|L)|DB_HBBINS2469826(|L)|DB_HBBINS2470038(|L)|DBC_HBBINS306_2470026(|L)|           \
1777      DBC_HBBINS306_2470048(|L)|DBC_HBBINS306_2470339(|L)))|(3-4*(DBC_UACS))|                             \
1778      (2-3*(DB_RNSZ_S2|DB_RNSZ_S1|DB_RNSZ_P|DB_RBNS641P|DB_RBNS641[OB:PIPE4,13,13][OB:PIPE52,141,13]|     \
1779      DB_RBNS646[OB:PIPE48,,13]|DB_RNSZ3991206[OB:WOOD128(|[M]),,12]))|                                   \
1780      (3-4*(RAI_AUTOTEILE7|DB_HBIS293A|DB_HBIS293B|DB_HBIS293C|DB_HBIS293D|DB_HBIS293E|DB_HBIS293F))|     \
1781      (2-3*(DB_SHIMM(SU1|NS718E|NS718D|NS718C|NS718B)(|L)))|(3-4*(RAI_HIIRRSTT324DLM|RAI_HIRRSTT325AM))|  \
1782      (2-3*(DBC_RILS652MM|RAI_RILS652M2M|RAI_RILS652M1M|DBS_RILS652MM|DB_RILS652VRM))|                    \
1783      (2-3*(TWAG_HABIS802753499|TWAG_HABIS802753499L|DB_HABIS2|TWAG_HABIS2|TWAG_HABIS3L|TWAG_HABIS3))|    \
1784      (3-4*(GERS_RBS8035(09051|09049|09059)[OB:PIPE(54|58|40|63|59|55|45|47),,12]))|                      \
1785      (2-3*(RAI_RILS652_1A|RAI_RILS652_1B|DBC_RILS3|DBC_RILS4|RAI_RILNS654C|RAI_RILNS654D|DBS_RINS655A|   \
1786      DBS_RILS652A|DBS_RILS652B|DBS_RILS652C|DBS_RILS652D|DBS_RINS655B|DBS_RINS655C|DBS_RILNS654A))|      \
1787      (2-3*(AAE_RES686(A|B)(|L)|G_RES3(|L))[OB:TARP21(|[M]),,16])|(2-3*DBAG_HBBINS306(F|G|H|I|J|K)(|L))|  \
1788      (2-3*DB_REMMS39482(20|77)(|L)[OB:TARP(8|14|20|19)(|[M]),,10])|                                      \
1789      (2-3*DB_RMMS664_3961(378|212|604)(|L)[OB:GRANIT(1|2|3),18,12][OB:GRANIT(1|2|3)(|[M]),79,12])|       \
1790      (2-3*(DB_SNPS719B(|L)|DB_SNPS719(|L)[OB:WOOD46(|[M]),,12]|G_01(5|6)|DBC_ROO5639A(|L)))|             \
1791      (2-3*(DB_HBBINS306_24(59954|59994|69637|70516|70586|70771|70826|70858|70866)(|L)|                   \
1792      DB_HBBILLNS306_24(58315|59453|69429)(|L)))|(2-3*DB_RIJMMNS660VRM)|                                  \
1793      (3-4*((ITL_EAOSM|ONRAIL_EANOS157M|HGK_EAOS(1|2))[OB:SCRAP(5|6|4)(|[M]),,33]))|                      \
1794      (2-3*DBAG_6_EAOS106(BL|CL|D|B|C|L)[OB:COAL5(4|1|2|3|5)(|[M]),,16])|                                 \
1795      (2-3*(DBAG_RES686(A|B)(|L)[OB:PIPE(54|58|40|63|61|59|55|56|57|39),,12]))|                           \
1796      (2-3*((DBAG_5_EAS066(E|EFL)|DBAG_5_EANS069TL|DBAG_5_EAS073EF|DBAG_5_EAOS106(A|BB|BEBL)|DB_EAOS106J) \
1797      [OB:TIRES1,27]))|(2-3*DB_SNS727(C|A)(|L))|(2-3*(DBC|DBS)_HABBIS345M)|                               \
1798      (2-3*(DB_HBBILLNS304_246(4063|4187|9051)(|L)|DB_HBBILLNS2457219(|L)))|                              \
1799      (DB_HBILLNS302A(|L)|DB_HBILLNS303(B|A|C)|DB_HBILLNS303D(|L)|DB_HBILLNS303E(|L)|DBC_HBILLNS302(B|A))| \
1800      (2-3*(G_LADDS[OB:MB_VITO1W,36,9][OB:MB_VITO1W,95,9][OB:#MB_SPRINTER1,161,9][OB:MB_VITO1W,215,9]))|  \
1801      (2-3*((DB_RES686|DB_RGS3910A|DBAG_5ROOS639B|DBC_6ROOS639(|L)|DBAG_RILS669(|L))[OB:STEEL24,,12]))|   \
1802      (2-3*(DB_FACS123(A|B|C)))|(2-3*(DB_FACNS141(|A|B)(|L)))|(2-3*(DBAG_HBIS_WW299(F|E|EL|C|BL|A)))|     \
1803      (2-3*DBAG_EALOST058B(1|2|3)(|L))|(2-3*(DB_SAMMS489F|DB_RMMS664A)(|L))|                              \
1804      (2-3*DB_HBBILLNS305_24(57245|57498|57546|57750|57835|58132|58284|58533|58620|58674|59054|59064|     \
1805      59399|59484|59528|59568|59868|62131|62400|62473|62509|69406|69860|70651|70692)(|L))|                \
1806      (2-3*(DB_SAMMS489(|B)[B:82,8,1,1,#202020][OB:PIPE(49|50|51),15,13][OB:PIPE(49|50|51),64,13]         \
1807      [OB:PIPE(49|50|51),111,13]|DB_SAMMS489H(|L)))|(2-4*DB_TAD(S958VR|S958K|GS958K|S957K|GS957K)M)|      \
1808      (2-3*(DBAG_(EAOSX054|5_EASX063A)(|L)[OB:COAL5(4|1|2|3|5)(|[M]),,16]))|                              \
1809      (3-4*(DBC_6ROOS639|DBAG_5ROOS639B))|                                                                \
1810      (3-4*(DB_HBISWW2257094(|L)|(DB_HBISWW299_22(54629(|L)|97711(|L)|54629|56488(|L)|56603))|            \
1811      (DB_HBILLSX299_22(76825|76754(|L)))))|                                                              \
1812      (3-4*(DB_RILNS654M|DBC_RILNS654M|RAI_RILNS654AM|RAI_RILNS654BM|RAI_RILNS654EM|DBS_RILNS654MM|       \
1813      DB_RINS655M|DBC_RINS655M))|                                                                         \
1814      (3-4*(DB_HABIS6RS(1|2|3)|DB_HABIS7TW(1|2|3|4|5)|DB_HABFIS1CW(3|2|1)|DB_HABIS8RS(1|2|3)))|           \
1815      (2-3*((ERMEWA_4_ZAGKKS7919|MILLET_4_ZAGKKS7915|NACCO_4_ZAGKKS7915|SIMOTRA_4_ZAGKKS7915)(|L)))|      \
1816      (2-3*(DB_HBBINS309E|DB_HBBINS309D|DB_HBIS293C|DB_HBIS293B|DB_HBIS293A|DB_HBINS292A|DB_HBIS293K|     \
1817      DB_HABBIINS352_2740514L|DB_HABBIINS352_2740514|DB_HBIS293H|DB_HBIS293F|DB_HBIS293G|DB_HBIS293E|     \
1818      DB_HBIS293B|DB_HBILLSX299_2276754|DB_HBIS293G|DB_HBIS293H|DB_HBBINS1|DB_HBBINS2|DB_HBIS293K|        \
1819      DB_HBIS293L|DB_HBIS293M|DB_HBIS293N|DB_HBIS293O|DB_HBIS293P|DB_HBIS293Q|DB_HBIS293R|DB_HBIS293S|    \
1820      DB_HBIS293T|DB_HBIS293A1|DB_HBINS292BPL|DB_HBINS292BP|DB_HBINS292BGL|DB_HBINS292BG|DB_HBINS292CL|   \
1821      DB_HBINS292EL|DB_HBINS292EP(|L)|DB_HBINS292DL))
1822
1823  # EP 6 Freight short
1824  $DEF Z_D_E6_G_kurz=2*D6FD1K
1825
1826  # DB long
1827  $DEF Z_D_E6_G1=6-7*D6FD1K
1828
1829  # EP 6  Freight long Coal transport DB cars
1830  $DEF Z_D_E6_G_Fals2=15*((DB_FALNS183(A|B|C|D|E|F|G|H|I|J|K|M|N|O|P|Q)|                                  \
1831      DB_FALS(01|02|03|06|07|08|09|10|11|12|13|14|15|17|19)|DB_FALNS2(|L))                                \
1832      [OB:FR_KO37|FR_COAL1|FR_COAL2|COAL33|COAL34|COAL35|COAL3(|[M]),,41])
1833
1834  # private
1835
1836
1837  # EP 6  Freight long lime transport
1838  $DEF D6FPK1=(12*GATX_(UACS809319244(|L)|UACS809319314(|L)|KALK1|KALK2|KALK3|KALK4|KALK5|KALK7|KALK6|    \
1839      KALK8|KALK9))|(12*(KVG_KALK1|KVG_KALK2|KVG_KALKSILO(|L)|DB_UAPPS0658036(|L)))
1840
1841  # EP 6  Freight long Coal transport private cars
1842  $DEF Z_D_E6_G_FalsP=(15*((DE_FALS_G1|DE_FALS_G2|DE_FALS_G3L|DE_FALS_G4L|NIAG_FALNS1L|NIAG_FALNS1|       \
1843      NIAG_FALNS3|NIAG_FALNS4L|NIAG_FALNS4|NIAG_FALNS5L|VEO_FALNS2L|VEO_FALNS4|VTG_FALNS183N1L|           \
1844      VTG_FALNS183N1|VTG_FALNS183N2L|VTG_FALNS183N2|VTG_HGK_FALNS2L|VTG_HGK_FALNS3L|ONRAIL_FALS18|        \
1845      ONRAIL_FALS21|ONRAIL_FALS22|RBH_FALNS183VTGM)                                                       \
1846      [OB:FR_KO37|FR_COAL1|FR_COAL2|COAL33|COAL34|COAL35|COAL3(|[M]),,40]))|                              \
1847      (15*((ONRAIL_FALS_(V2A|V1B|V2B|V3A|V3B|V3C|V1A|HHPI_V3C|HHPI_V3B|HHPI_V2A|HHPI_V2B|HHPI_V3A|        \
1848      HHPI_V2A|HHPI_V1A|HHPI_V1B)(|L)|KVG_FALS6666_(1|2|3|4)(|L)|GATX_FALS6654_(1|2|3|4|5)(|L))           \
1849      [OB:KOKS0(1|2|3|4)(|[M]),,40]))|(13*(ERR_FALNS(1|2|3|4)(|L)[O:COAL(46|49|47|48)(|[M])]))
1850
1851
1852  # EP 6  Freight short Steel transport
1853  $DEF Z_D_E6_G_Stahku=4*((DBAG_5RMMS663L[O:STEEL5,15,12][O:STEEL5,50,12])|                               \
1854      ((DB_RNSZ_B1|DB_REMMS2(|L)|DB_RMMS664C(|L)|DB_RMMS664B(|L)|DB_SNPS719A(|L)|VTG_RBS2(|L)|            \
1855      VTG_RBS4(|L)|DB_REMMS1(|L)|DB_SAMMS489G(|L)|DB_SNS727(B|D|E)|DB_SNPS719C(|L))|                      \
1856      DB_SAMMS489(C|D|E)(|L)|(DBS_RGLNS673M|DBAG_SAMMNPS_V)[OB:STEEL(28|29|30|31|41)(|[M]),,12]))|        \
1857      (DB_SGMMNS738KM(|L)[OB:STEEL(28|29|30|31|41)(|[M]),,12])|                                           \
1858      (DBS_SAMMS489M(|L)[OB:STEEL(28|29|30|31|41)(|[M]),,12])
1859
1860
1861  # EP 6  Freight Steel transport
1862
1863  $DEF Z_D_E6_G_COIL1=(10-12*(DB_SHIMMSU708AL|DB_SHIMMSU708A|DB_SHIMMSU708BL|DB_SHIMMSU708C|              \
1864      G_SHIMMNSP_Y25BL|G_SHIMMNSP_Y25DL|G_SHIMMNSP_Y25D|DB_SHIMMNS_TU718_3L|DB_SHIMMNS_TU718_3|           \
1865      DB_SHIMMNS_TU718_6|DB_SHIMMNS_TU718B6L|DB_SHIMMNS_TU718B6|DB_SHIMMNS_TU720_3|DB_SHIMMNS_TU720_4|    \
1866      DB_SHIMMNS_TTU722_12|DB_SHIMMNS_TTU722_5L|DB_SHIMMNS_TTU722_5|DB_SHIMMNS_TTU722_7|                  \
1867      DB_SHIMMNS_TTU722_8|DB_SHIMMNS_TTU722_10|DB_SHIMMNS_TTU722_1L|DB_SHIMMNS_TTU722_1|                  \
1868      DB_SHIMMNS_TTU722_2|DB_SHIMMNS_TTU722_4L|DB_SHIMMNS_TTU722C|DB_SHIMMNS_TTU723_2L|                   \
1869      DB_SHIMMNS_TTU723_3L|DB_SHIMMNS_TTU723_5L|DB_SHIMMNS_TTU723_6L|DB_SHIMMNS_TTU723_6|                 \
1870      DB_SHIMMNS_TTU723G1L|DB_SHIMMNS_TTU723G1|DB_SHIMMNS_TTU723B2L|DB_SHIMMNS_TTU723B3|                  \
1871      DB_SHIMMNS_TTU723B4L),4*(DBAG_5RMMS663L[O:STEEL5,15,12][O:STEEL5,50,12]))
1872  $DEF Z_D_E6_G_COIL2=10-12*(DB_SAHMMS(_T710_1|_T710_2|_T710_3|_T710_4|711_1|711_1B|711_2|711_4|711_3|    \
1873      711_5|711_5B|711_6|711_6B)(|L)[OB:COIL(9|10|11|12|13|14|15),10,11]                                  \
1874      [OB:COIL(9|10|11|12|13|14|15),32,11][OB:COIL(9|10|11|12|13|14|15),53,11]                            \
1875      [OB:COIL(9|10|11|12|13|14|15),74,11][OB:COIL(9|10|11|12|13|14|15),95,11]                            \
1876      [OB:COIL(9|10|11|12|13|14|15),116,11][OB:COIL(9|10|11|12|13|14|15),138,11]),                        \
1877      3-4*DB_SAHLMMPS706_(1|2|3|4|5)[OB:COIL(9|10|11|12|13|14),106,13]                                    \
1878      [OB:COIL(9|10|11|12|13|14|15),83,13][OB:COIL(9|10|11|12|13|14|15),58,13]                            \
1879      [OB:COIL(9|10|11|12|13|14|15),35,13][OB:COIL(9|10|11|12|13|14|15),10,13]
1880  $DEF Z_D_E6_G_COIL3=(14*(G_SHIMMNST_Y25_1L|G_SHIMMNST_Y25_1|G_SHIMMNST_Y25_2L|G_SHIMMNST_Y25_2|         \
1881      G_SHIMMNST_Y25_3L|G_SHIMMNST_Y25_3|G_SHIMMNST_Y25_4L|G_SHIMMNST_Y25_4|DB_SHIMMNSU708L|              \
1882      DB_SHIMMNSU708|G_SHIMMNSP_Y25AL|G_SHIMMNSP_Y25A|G_SHIMMNSP_Y25BL|G_SHIMMNSP_Y25B|G_SHIMMNSP_Y25CL|  \
1883      G_SHIMMNSP_Y25C|G_SHIMMNSP_Y25DL|G_SHIMMNSP_Y25D))
1884  $DEF Z_D_E6_G_COIL4=4*Z_D_E6_G_Stahku
1885  $DEF Z_D_E6_G_COIL5=(10*DB_SAHIMMSU900(|A|B|BL|C|CL|D|DL|E|EL),4*RAI_SAHIMMSU901(D|C|CL))
1886  $DEF Z_D_E6_G_COIL6=15*(LOGSERV_SHIMMNS718_ONRAIL1M|LOGSERV_SHIMMNS718_ONRAIL2M|LOGSERV_SHIMMNS_VTGM|   \
1887      NACCO_SHIMMS1L|NACCO_SHIMMNS1|ERR_SHIMMNSM|VTG_SHIMMNSM|SOGE_SHIMMNS2)
1888  $DEF Z_D_E6_G_COIL7=13*((DB_SAHMMS709KM|DB_SAHMMS709NKM)[OB:COIL20H,32,13][OB:COIL23H,70,13]            \
1889      [OB:COIL23H,112,13])
1890
1891  $DEF Z_D_E6_G_COIL=Z_D_E6_G_COIL(1|2|3|4|5|6|7)
1892
1893  # EP 6  Freight GRAVEL transport
1894  $DEF Z_D_E6_G_FCS=(12*(DB_FCS((3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|  \
1895      29|30)(|L)[O:(FR_GRAVEL1|FR_BRAM|FER(3|4))(|[M]),,40])))|                                           \
1896      DBAG_FACS124(A|B|BC)(|L)[O:(FR_GRAVEL1|FR_BRAM|FER(3|4))(|[M]),,41]
1897
1898  # EP 6  Freight CAR transport
1899  $DEF D6FCA1=(6*ATG_LAAES556M[OB:VW_GOLF7(|B|E|K|W|H),3,27][OB:VW_GOLF7(|B|E|K|W|H),47,27]               \
1900      [OB:VW_GOLF7(|B|E|K|W|H),3,9][OB:VW_GOLF7(|B|E|K|W|H),47,9][OB:VW_GOLF7(|B|E|K|W|H),91,27]          \
1901      [OB:VW_GOLF7(|B|E|K|W|H),136,27][OB:VW_GOLF7(|B|E|K|W|H),91,9][OB:VW_GOLF7(|B|E|K|W|H),136,9]       \
1902      [OB:VW_GOLF7(|B|E|K|W|H),179,27][OB:VW_GOLF7(|B|E|K|W|H),224,27][OB:VW_GOLF7(|B|E|K|W|H),180,9]     \
1903      [OB:VW_GOLF7(|B|E|K|W|H),224,9],                                                                    \
1904      6*SITFA_TA381_OM[OB:VW_GOLF7(|B|E|K|W|H),3,27][OB:VW_GOLF7(|B|E|K|W|H),47,28]                       \
1905      [OB:VW_GOLF7(|B|E|K|W|H),3,10][OB:VW_GOLF7(|B|E|K|W|H),47,9][OB:VW_GOLF7(|B|E|K|W|H),91,28]         \
1906      [OB:VW_GOLF7(|B|E|K|W|H),135,28][OB:VW_GOLF7(|B|E|K|W|H),91,9][OB:VW_GOLF7(|B|E|K|W|H),135,9]       \
1907      [OB:VW_GOLF7(|B|E|K|W|H),179,28][OB:VW_GOLF7(|B|E|K|W|H),223,28][OB:VW_GOLF7(|B|E|K|W|H),179,9]     \
1908      [OB:VW_GOLF7(|B|E|K|W|H),223,11])|                                                                  \
1909      (4*ATG_LAADRS557M[OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),91,12]                                         \
1910      [OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),34,12][OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),169,12]               \
1911      [OT:(FD_PORSCHE_MACAN(1|2)[SM:0.5]),234,12],                                                        \
1912      4*STVA_TA379WRM[OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),12,28]                                        \
1913      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),62,28][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),159,28]         \
1914      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),210,28][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),110,28]        \
1915      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),8,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),64,10]           \
1916      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),161,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),212,10]        \
1917      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),112,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),14,28],        \
1918      4*STVA_TA364W_RM[OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),71,28]                                       \
1919      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),134,28][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),191,28]        \
1920      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),190,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),14,10]         \
1921      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),72,10][OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),134,10]         \
1922      [OT:(FD_AUDI_A(3|1)_SPORTBACK[SM:0.5]),14,28])
1923
1924  # EP 6 Maintenance 1
1925  $DEF Z_D_E6_Bauzug=(<2*DBAG_5RMMS663(|L),DBAG_5RMMS663L,DBC_FCS2,DBC_FCS5,DBC_FCS6,DB_FCS27,            \
1926      DB(C|AG)_SAMMSU454M[O:GROUND1])
1927
1928  # EP 6 Maintenance 2
1929  $DEF Z_D_E6_Bauzug2=10-12*(IWAG_FAKKS(_ELA1|_ELA2|_ELA3|_EILT1|_EILT2|_EILT3|4|2|3)                     \
1930      [OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31]|                          \
1931      (IWAG_FANS(2|3|1|_ABCBAU2|_ABCBAU1)                                                                 \
1932      [OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31])|                         \
1933      (SCHAU_FAKKS(2|3))[OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31])|       \
1934      (DB_FAS126(A|AP|B|BP|C|D|E|EP|FP|GP|BA|BAP|BP|BC|BD|BE|KA|KB|KC|KCP|KD|KE|KF|KG|KH|KI|KAP|KBP|KDP|  \
1935      KEP|KFP|KGP|KHP|KIP)[OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31]|      \
1936      (DBC_FAS126(A|B|C)[OB:(SAND15|FR_GRAVEL1|FR_RIZKY|BETTERAVES_2E1|BETTERAVES_2E2)(|[M]),,31]))
1937
1938  # EP 6 Maintenance 3
1939  $DEF Z_D_E6_Bauzug3=(<(3*(DBB_RES_RU(|L)[OB:(GRAVEL8(|[M])),,16])),                                     \
1940      2*(DBB_RGS_RU_BSG(|L)|DBB_RGS_RU_KT(|L)),                                                           \
1941      5*(DB_FACNS141(|L),DBC_FCS2|DBC_FCS3|DBC_FCS4|DBC_FCS5|DBC_FCS6|DB_FCS27|DB_FCS28L|DB_FCS28),       \
1942      DBB_RGS_SCH,DBB_RES_BA_CON|DBB_RES_BA_CONL,DBB_RES_RUL|DBB_RGS_RUL[OB:PYLON2,,12])
1943
1944  # EP 6 Maintenance 4
1945
1946  $DEF D6FM4=4*(ITL_RES5(|L)|ITL_ROSDSM)[O:PYLON3,15,12][O:PYLON3,100,12],                                \
1947      6*ITL_RES(2|4)(|L)[OB:RAIL6(|[M]),,13]
1948
1949  # EP 6 Maintenance mix
1950  $DEF D6FMM=Z_D_E6_Bauzug|Z_D_E6_Bauzug3|Z_D_E6_Bauzug2|D6FM4
1951
1952
1953  #----------------------------------------------------------------------------------------------------
1954  #
1955  # East Germany
1956
1957  # EP 3a DR East Germany Passenger long Distance
1958  $DEF DR3PD=(<DR_3POST_43524(|L),DR_3A_PW4U28(|L),DR_3A_C4U26,DR_3AB4U38,DR_3A_AB4U23,DR_3A_C4U22,       \
1959      DR_3A_C4U26,2*DR_3A_C4U28)|                                                                         \
1960      (>DR_3POST_43524(|L),DR_3A_PW4U28(|L),DR_3A_C4U26L,DR_3AB4U38,DR_3A_AB4U23L,DR_3A_C4U22L,           \
1961      DR_3A_C4U26L,2*DR_3A_C4U28L)|(DR_3A_PW4U28(|L),4*DR_C4UP54(|L)~JMU,2*DR_3AB4U38,2*DR_3A_C4U28)
1962
1963  # EP 3B DR East Germany Passenger long Distance
1964  $DEF DR3PDB=(<DR_3POST4|DR_3POST41,DR_3D4GE|DR_3D4GE1S,5*(DR_3B4GE1|DR_3B4GRE|DR_3B4GRE1|DR_3B4GE1S),   \
1965      2*(DR_3A4GE(|1|1S),DR_3B_MOD_A4GE3(8|5)A),DR_3B_MOD_AB4GE35|DR_3AB4GE,DR_3B_POST4U_B17(|L))|        \
1966      (>DR_3POST4L|DR_3POST41L,DR_3D4GEL|DR_3D4GE1SL,5*(DR_3B4GREL|DR_3B4GRE1L|DR_3B4GE1SL),              \
1967      2*(DR_3A4GE(|1|1S),DR_3B_MOD_A4GE3(8|5)A)L,DR_3B_MOD_AB4GE35L|DR_3AB4GEL)|                          \
1968      (<DR_3_B4UPEL,(2*DR_B4GE62),DR_B4GE68ZL|DR_B4GE68Z|DR_2040070L|DR_2040070,DR_A4GE64L,DR_A4GE64,     \
1969      2*DR_B4GE62L,DR_AB4GE63L|DR_AB4GE63,DR_3B_D4U37,DR_3POST4_21L)|                                     \
1970      (<DR_3B_POST4U_B17(|L),DR_3_BD4I_C8P,DR_3_B4I_C10,DR_3_B4I_B5C4,2*DR_3_B4I_B5C4L)|                  \
1971      (<DR_3B_POST15(|L),DR_3B_D4U37(|L),DR_3B_AB4U39L~JMU,(2*DR_3B_B4U38L),DR_3B_A4U38L,                 \
1972      MITR_3B_WR4UE35,DR_3B_A4U38L,2*DR_3B_B4U38L)|                                                       \
1973      (<(2*DR_3B_B4U38),DR_3B_A4U38,MITR_3B_WR4UE35,DR_3B_A4U38,2*DR_3B_B4U38,DR_3B_AB4U39~JMU,           \
1974      (DR_3B_POST15(|L),DR_3B_D4U37(|L))|                                                                 \
1975      (<(2*DR_3B_B4UE34BCL),DR_3B_A4U26A,MITR_3B_WR4UE35,DR_3B_A4U26A,2*DR_3B_B4UE30B,DR_3B_B4UE34BCL),   \
1976      DR_3B_POST15(|L),DR_3B_D4U37(|L))|                                                                  \
1977      (<DR_POSTMD,2*DR_B519BL,DR_B519B,DR_43BGEL,DR_43AGE1S,DR_44BGE1SL)|                                 \
1978      (<DR_BDS275BL,DR_BCME2BL,DR_BCME2B,DR_AB511A,(DR_WRMD|MITR_3B_WR4UEM(G|S)J(|L)),DR_WLABGEA,         \
1979      DR_WLABGEAL,DR_B516BL,DR_B518AL)|                                                                   \
1980      (<DR_3B_D4UE30U,2*DR_3B_B4UE28,DR_3B_B4UE22,MITR_3B_WR4UE35,DR_3B_A4UE23A58|DR_3B_A4UE23A,          \
1981      DR_3B_A4U38,DR_3B_B4UE26,DR_3B_B4UE28,DR_3B_B4UE30B)|                                               \
1982      (>DR_3B_D4U37(|L),2*DR_3B_B4UE28L,DR_3B_B4UE22L,MITR_3B_WR4UE35L,DR_3B_A4UE23A58L|DR_3B_A4UE23AL,   \
1983      DR_3B_A4U38L,DR_3B_B4UE26L,DR_3B_B4UE28L,DR_3B_B4UE34BCL)
1984
1985  # EP 3b DR East Germany Passenger semi-fast train
1986  $DEF DR3PE=(<DR_4B_POST15L|DR_4B_POST15,DR_B4UP57000|DR_B4UP57000L,DR_B4UP66500,                        \
1987      DR_PWI_DI90000L|DR_PWI_DI90000,DR_PWI_DI92000L|DR_PWI_DI92000)|                                     \
1988      (DR_3B_D4UME3(1|2)(|L),2*DR_3B_B4UME(|L),DR_3B_AB4UME(|L)|DR_3B_A4UME(|L),2*DR_3B_B4UME(|L))
1989
1990  # EP 3b DR East Germany Passenger regional Old cars
1991  $DEF DR3PRA1=(DR_PW3IWUE21_3,DR_3BI_BCI29,2*DR_CD27_3(|L))|                                             \
1992      (DR_BI31(|L)~JMU|DR_3B_ABI31(|L)|DR_ABI34(|L),3*(DR_CI31A(|L)~JMU|DR_CI33(|L)~TDBW),                \
1993      DR_PWI31A(|L)~JMU,DR_3A_POST3A_CI128)
1994
1995  # EP 3b DR East Germany Passenger regional Reko 4x
1996  $DEF DR3PRN=DR_3D4GE1(|L),6*(DR_3B4GWL(|S|R)(|L))
1997
1998  # EP 3b DR East Germany Passenger regional Reko 3x
1999  $DEF DR3PRR=(<DR_3A_POST3A_CI128L|DR_3A_POST3A_CI128|DR_3B_POST3A_CI128L|DR_3B_POST3A_CI128,            \
2000      DR_3A_PW3GEL|DR_3A_PW3GE|DR_3B_PW3GEL|DR_3B_PW3GE,DR_3B_B3G57L,DR_3B_B3G57,DR_3B_B3GTR57L,          \
2001      DR_3B_B3GTR57,DR_3A_B3G57L,DR_3A_B3G57,DR_3A_B3GTR57L,DR_3A_B3GTR57)
2002
2003  # EP 3b DR East Germany Passenger regional double deck
2004  $DEF DR3PRD=(2*DR_3B_DC7GZ)|DR_3B_DC13GZ(1|2)|DR_3B_DC1361GZ1
2005
2006  # EP 3b DR East Germany Freight shunting
2007  $DEF DR3FR=(2-3*(DR_3_OMU37VBHL|DR_3_OMU35BL|DR_3_OMU37VBHL|DR_3_OMMBU402S|DR_3_OMU36VBUL|DR_3_OMU35H|  \
2008      DR_3_OMU35BL|DR_3_OMU36VBUL))|(2-3*(DR_3_ZZ82402G(2|1)|DR_3_ZZ(RQ81022|8101)(|L)))|                 \
2009      (2-3*(DR_G1|DR_3_G04H|DR_3_GR04(|H)|DR_3_GHMS11BL|DR_3_G04VH4|DR_3_G04VB|DR_3_GR04H|DR_3_G05L|      \
2010      DR_3_GHMS11(|L)))|(2-3*(DR_3_MS06B|DR_3_MS06)(|L))|(2-3*(DR_TDGS1AL|DR_TDGS1CL))|                   \
2011      (2-3*(DR_3_GG15(|L)|DR_3_GGU73|DR_BROMBERG|DR_BROMBERG(|BL|SBL)))|                                  \
2012      (2-3*(DR_Z7004A|DR_ZE7098A|DR_ZE7098A(|L)|DR_Z7004AL|DR_Z7004A|DR_ZSW7361C|DR_ZH8020L))|            \
2013      (2-3*(DR_3_OMU36VBBL|DR_3_OMU36VB|DR_3_OMU35H(|L)[OB:FER1(|[M]),,26]))|(2-3*(DR_O10(|B|HL|L)))|     \
2014      (2-3*(DR_3_GHS07BL|DR_3_GGU73|DR_3_GHMS11(|B)(|L)|DR_GAGMSV4|DR_GLMS(1|2|3)(|B|BL)|DR_GG|           \
2015      DR_3_GHS07LHL|DR_GAGMSV2))|(2-3*(DR_UCXL))|(2-3*DR_3A_O10(|L)[OB:BARREL4,,21])|                     \
2016      (2-3*((DR_3_GLM04(|B|FV|FVB|FVB5))|(2-3*(DR_3_GM11(|O|OB))|DR_3_GMM(|S)14(|D))(|L)))|               \
2017      (2-3*(DR_KMM54A1B|DR_KMM54A1BL|DR_KMM54A2BL|DR_KMM54A4B))|(2-3*(DR_3_GGU73|DR_GAGMSV3))|            \
2018      (2-3*(DR_MS(2|3)|DR_MSB|DR_MS3B(|L)|DR_ICHQSSZ4))|(2-3*DR_LBK(5|1|2|3|4)(|L))|                      \
2019      (2-3*(DR_3_OMU41(|UL|U|L|H|HL|BL|B)[OB:(FR_SUTR|FR_KO34|FR_KO23|BALLAST43)(|[M]),,28]))|            \
2020      (2-3*(DR_3_GL(12|12L|12U|12H|12HL|12U|R12UL|R12|R12L|R12U|R12H|R12HL|R12U)))|                       \
2021      (2-3*(DR_3_OMU37(|VBUL|VBU|VB|VBH|VBBL|VBB|L)))|                                                    \
2022      (2-3*(DR_3_GU10(|L)|DR_3_GU02|DR_3_G04VB(|L)|DR_3_G05(|L)|DR_3_GHS07(|B|LH|H)(|L)))|                \
2023      (2-3*(DR_3_OMMBU402(|L|U|U1|S|S1|SL|S1L)[OB:(FR_SUTR|FR_KO34|FR_KO23|BALLAST43)(|[M]),,26]))|       \
2024      (2-3*(DR_3_OOR47_(56|56H|56O|56OH|58|58H|58O|58OH|63|63B|63O|63OB)(|L)[OB:WOOD1(38|37)(|[M]),,31]))| \
2025      (2-3*(DR_3_OORU47_(S154|S154H|S256|S1R60|S1R60H|S2R60)(|L)[OB:WOOD1(38|37)(|[M]),,33]))|            \
2026      (2-3*(DR_LBK2L|DR_LBK3|DR_Z7004AL|DR_O10L|DR_3_OMU35H(|L)|DR_GAGMSV2|DR_GLMS1B))|                   \
2027      (2-3*(DR_3_OMU35(H|U|B)(|L)|DR_4_SAUREL))|                                                          \
2028      (2-3*DR_3_ZZ(8104|82401G1H|82401G2B|82401G2H|82401G2B|R81021)(|L))
2029
2030  # EP 3 DR East Germany Freight short
2031  $DEF DR3FS=2-3*DR3FR
2032
2033  # EP 3b DR East Germany Freight long
2034  $DEF DR3FL=DR_3PWGPR14(|L),8-10*DR3FR
2035
2036  # EP 4 DR East Germany Passenger long distance 1970-1975
2037
2038  $DEF DR4PL1=(<DR_4(1|2)DGE(|1|1S),5*DR_4(1|2)BGE(|1|1S),DR_4(1|2)BGRE(|1),DR_WRMA(|L),                  \
2039      2*DR_4(1|2)AGE(|1|1S|35A|38A),DR_4(1|2)ABGE(|1S))|                                                  \
2040      (<DR_4(1|2)DGE(|1|1S)L,5*DR_4(1|2)BGE(|1|1S)L,DR_4(1|2)BGRE(|1)L,DR_WRMA(|L),                       \
2041      2*DR_4(1|2)AGE(|1|1S|35A|38A)L,DR_4(1|2)ABGE(|1S)L)|                                                \
2042      (<3*DR_B51(6|8)A,2*DR_A50(4|5)A,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG),2*DR_B51(6|8)A,            \
2043      DR_AB5(08|11)A,DR_4(1|2)DGE1(|L),DR_4(1|2)POST2(0|1)(|L))|                                          \
2044      (>3*DR_B51(6|8)AL,2*DR_A50(4|5)AL,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG)L,2*DR_B51(6|8)AL,        \
2045      DR_AB5(08|11)AL,DR_4(1|2)DGE1(|L),DR_4(1|2)POST2(0|1)(|L))
2046
2047  # EP 4 DR East Germany Passenger long distance 1975-1980
2048
2049  $DEF DR4PL3=(<DR_43DGE(|1|1S),5*DR_43BGE(|1|1S),DR_43BGRE(|1),DR_WRMA(|L),2*DR_43AGE(|1|1S),            \
2050      DR_43ABGE(|1|1S))|                                                                                  \
2051      (<DR_43DGE(|1|1S)L,5*DR_43BGE(|1|1S)L,DR_43BGRE(|1)L,DR_WRMA(|L),2*DR_43AGE(|1|1S)L,                \
2052      DR_43ABGE(|1|1S)L)|                                                                                 \
2053      (<3*DR_B51(6|8|9)B,2*DR_A50(4|5|7)B,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG),2*DR_B51(6|8|9)B,      \
2054      DR_AB5(08|11|12)B,DR_43DGE1(|L),DR_43POST2(0|1)(|L))|                                               \
2055      (>3*DR_B51(6|8|9)BL,2*DR_A50(4|5|7)BL,DR_4WRME8870G|MITR_4B_WR_RE(GB|SB|SG|GG)L,2*DR_B51(6|8|9)BL,  \
2056      DR_AB5(08|11|12)BL,DR_43DGE1(|L),DR_43POST2(0|1)(|L))|                                              \
2057      (<DR_4BME2080269L|DR_4BCME5940L,DR_4AME1980L,DR_4ABME3980L|DR_4ABME3980107L,                        \
2058      MITR_4B_WR_RE(GB|SB|SG|GG)L,3*DR_4BME2080L,DR_4BDMSE8240L|DR_4B_BDMSE8245003L)|                     \
2059      (<DR_4B_BDMSE8245003|DR_4_DUE30|DR_4BDMSE8240,3*DR_4BME2080,DR_4ABME3980|DR_4ABME3980107,           \
2060      DR_4AME1980,DR_4BCME5940|DR_4BME2080269)
2061
2062  # EP 4 DR East Germany Passenger long distance 1980s
2063  $DEF DR4PL2=(<DR_4BDME8280L,DR_AME1043IEL|DR_AME1043IE,                                                 \
2064      DR_4AME1043L|DR_4AME1043|DR_4AME1085L|DR_4AME1085,                                                  \
2065      DR_4BMKL|DR_4BMK|DR_4AME1085SXBL|DR_5WRME8870L|DR_5WRME8870,                                        \
2066      4*(DR_4BME2150L|DR_4BME2150|DR_4BME2185PL|DR_4BME2185P|DR_4BMH2115L|DR_4BMH2115),                   \
2067      DR_BME2150L|DR_BME2150,DR_4ABME3043|DR_4ABME3085L)|                                                 \
2068      (<(2*DR_BOM280(E|N)L),2*DR_4(A|B)_BME2940L,2*(DR_4(A|B)_AME1940L|DR_AM201NL),DR_4WRGE_EX(1|2|3)L,   \
2069      2*DR_4(A|B)_BME2940L)|                                                                              \
2070      (<(2*DR_4(A|B)_BME2940),DR_4WRGE_EX(1|2|3),2*(DR_4(A|B)_AME1940|DR_AM201N),2*DR_4(A|B)_BME2940,     \
2071      2*DR_BOM280(E|N))|                                                                                  \
2072      (<DR_DGE4(G|H)L,DR_4B_BCME5940L,2*DR_4B_BME2080AL,DR_4C_WRGEL|DR_4B_ABME3980L,                      \
2073      2*DR_4(B|C)_AME1940L,2*DR_4B_BME2080AL,DR_4B_BDMSE8245L)|                                           \
2074      (<DR_DGE4(G|H),DR_4B_BDMSE8245,2*DR_4(B|C)_AME1940,DR_4C_WRGE,DR_4B_ABME3980,2*DR_4B_BME2080A,      \
2075      2*DR_4C_AME1940,DR_4B_BCME5940)
2076
2077  # EP 4 DR East Germany Passenger regional Reko 3x
2078  $DEF DR4PR3=5*(DR_4BAGE(|L)|DR_4A_BAGE(|L)),DR_4BAGTRE(|L),DR_4PWI(23|27|28|29|30|31)(|L),DR_4POSTA(|L)
2079
2080  # EP 4 DR East Germany Passenger regional old/Reko 4x
2081  $DEF DR4PRM=(<DR_4B_POST15(|L),DR_4_DUE30|DR_4D4UME32(|L)|DR_4_PW4I33|DR_4D4UME31(|L),                  \
2082      3*DR_4BGHWER(|L),DR_4AB4UME(|L)|DR_4A4UME(|L),DR_4B4UME(|L))
2083
2084  # EP 4 DR East Germany Passenger regional Reko 4x
2085  $DEF DR4PRR=(<DR_4DAGEL|DR_4DAGE,DR_4A_BAGEL,DR_4BAGEL|DR_4BAGE,DR_4A_BAGE|DR_4A_BAGEL,                 \
2086      DR_4BAGTRE|DR_4BAGTREL,2*DR_4A_BAGE)
2087
2088  # EP 4 DR East Germany Freigt long Coal
2089  $DEF Z_DR_E4_FAL=15*(DR_FAL6556AL|DR_FAL6556A|DR_FAL6556BL|DR_FAL6556B|DR_FAL6556CL|DR_FAL6556C|        \
2090      DR_FAL6556DL|DR_FAL6556D|DR_FAL6556AHL|DR_FAL6556AH|DR_FAL6556BHL|DR_FAL6556BH|DR_FAL6556CHL|       \
2091      DR_FAL6556CH|DR_FAL6556DHL|DR_FAL6556DH|DR_FAL6556EHL|DR_FAL6556EH)|
2092
2093  # EP 4 DR East Germany shunting
2094  $DEF DR4FR=(3-4*(DR_LAAEKQZ[OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),20,28]                                \
2095      [OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),70,28][OB:TRABANT_(BL|CG|UBL|G|GY|WH|UCH),20,12]             \
2096      [OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),70,12][OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),130,28]         \
2097      [OB:TRABANT_(BL|CG|UBL|G|GY|WH|UCH),180,28][OB:TRABANT_(BL|CG|UBL|G|GY|WH|UCH),130,12]              \
2098      [OB:TRABANT_(CH|BL|CG|UBL|G|GY|WH|UCH),180,12]))|                                                   \
2099      (4*(DR_EKKL4[OB:SCRAP_14,,25]|DR_EKKL[OB:SCRAP_15,,25]))|                                           \
2100      (4*(DR_FCS1(A|B|D)(|L)[OB:FER(4|1)(|[M])]))|(3-4*(DR_4_U9083|DR_US9084))|                           \
2101      (3*(DR_4RES3936R(|L)[OB:SCRAP10(|[M]),,16])|(DR_4RES3936R|DR_4RES_K[OB:GRAVEL8(|[M]),,13]))|        \
2102      (3-4*DR_GBS1500(A|B|C|D|E|F|G|H|I|J|K|L))|(3-4*(DR_GAGMSV4|DR_GBS1507))|                            \
2103      (3-4*DR_4A_EAL5906(A_65|A_65B|N_65|N_65B)(|L)[OB:WOOD1(38|37)(|[M]),,33])|                          \
2104      (3-4*(DR_4_EAL5906(A_65|A_65B|N_63|N_63B|N_65|N_65B)(|L)[OB:WOOD1(38|37)(|[M]),,33]))|              \
2105      (3-4*DR_4_EAS(5968|5967|5966|5965(|F)|5952|5951)(|L)[OB:SCRAP(4|6|5)(|[M]),,33])|                   \
2106      (3-4*((DR_4_EAL(5918_58(|H)|5918_56(|H)|S5910|SX5909))|(DR_4A_EAL(5916_S2(|R)|5916_S1(|H))))(|L)    \
2107      [OB:SCRAP(4|6|5)(|[M]),,32])|(4*(DR_4B_TMS0757BL|DR_TDS1C|DR_TDS1FL))|                              \
2108      (3*(((DR_RGS3920R(|L)|DR_4RGS3910RAL|DR_RGS3917)[OB:BOX22,133,12][OB:BOX16,80,12][OB:BOX36,25,12])| \
2109      (DR_RGS3920(|L)[O:DR_RGS3920RU,67,12][O:DR_RGS3920RU,88,12][O:#DR_RGS3920RU,107,12]                 \
2110      [O:#DR_RGS3920RU,128,12][OB:TARP20,,12])|                                                           \
2111      (DR_4RGS2(|L)[OB:ADK_80(A|B|C|D),13,12][OB:ADK_80(A|B|C|D),102,12])))|                              \
2112      (4*(DR_EL_(3L|4L|1|2|3|4|5|6)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|                              \
2113      (4*(DR_ICHQSSZ5|DR_IBBLPS3|DR_IBHQSSZ2))|(2-3*DR_4_UAH82402(|G2)(|L))|                              \
2114      (4*((DR_4_EAS5969|DR_EAL4L|DR_ES6|DR_4_E037)[OB:COAL37(|[M]),,27]))|                                \
2115      (4*((DR_EAL5916C|DR_EAL5916A|DR_EL5569D)[OB:BALLAST18,,27]))|                                       \
2116      (4*(DR_RLMMP3863A[O:PIPE(31|62|60)]|DR_EKKL4L|DR_OOR2(|L)|DR_4RMMS3960[OB:PIPE(31|62|60),,12]))|    \
2117      (4*(DR_HBS|DR_4KS[OB:PYLON3,,12]|DR_SAMM))|(3-4*DR_4_UAH82411(|G2)(|L));
2118
2119  # EP 4 DR East Germany Freigt long
2120  $DEF DR4FL2=5-6*DR4FR
2121
2122  # EP 4 DR East Germany Freigt long tank cars
2123  $DEF Z_DR_E4_Kessel=15*(DR_ZSW7361A|DR_ZSW7361BL|DB_ZAD_VTG|DB_ZAU_VTGL|DR_ZAKKW4L|DR_ZAKKW4|           \
2124      DR_ZSW7361B|DR_ZSW7361CL|DR_ZSW7361C|DR_ZSW7361DL|DR_ZSW7361D|M_ZS2L|M_ZS2|DR_ZAKKW2L|DR_ZAKKW2|    \
2125      DR_ZAKKW3L|DR_ZAKKW3|(DR_EKKL4[OB:SCRAP_14,,25]|DR_EKKL[OB:SCRAP_15,,25])|                          \
2126      DR_FCS1(A|B|D)(|L)[OB:FER(4|1)(|[M]),,40]|DR_4RES3936RL[OB:SCRAP10,,16]|DR_4OMMU2[O:FR_KO47,,28])
2127
2128
2129  # EP 4-5 DR East Germany Passenger Inter Regio
2130  $DEF DR5PI=(<DR_5_1940110L|DR_5_1940110,DR_AMZ1095|DR_AMZ1095L|DR_AIMZ1094|DR_AIMZ1094L,                \
2131      DR_ARKIMBZ262_2L|DR_ARKIMBZ262_2,DR_BIMZ2295L|DR_BIMZ2295,DR_BMZ2190IR|DR_BMZ2190IRL,               \
2132      2*DR_BIMZ2295,DR_5BMZ2190L,DR_5BMZ2190|DR_BIMDZ8495|DR_BIMDZ8495L)
2133
2134  #----------------------------------------------------------------------------------------------------
2135  #
2136  # SWISS
2137
2138
2139  # EP 1 Gotthardbahn Freight short;
2140  $DEF CH1FGS=4-6*((GB_H1H|GB_6001W1|GB_6001W2|GB_6001H|GB_4001(|O)(|L)[OB:AG55,,20])|GB_3001G(|L)|       \
2141      GB_3001(|L)|GB_2001G(|L)|GB_3485H(|L)|GB_3501Z(|L)|GB_5001H|GB_K2BM|                                \
2142      GB_5001H[OB:BONBONNEGAZ1,15,15][OB:BONBONNEGAZ1,45,15])
2143
2144  # EP 2 Passenger regional short;
2145  $DEF CH2PRS=SBB_CF9793(|L)|SBB_F16801(|L)|SBB_F17401(|L),2-4*SBB_C6791(|L),2-4*SBB_B3451(|L),           \
2146      2-4*SBB_C6791(|L)
2147
2148  # EP 2 Passenger regional long;
2149  $DEF CH2PRL=SBB_DSW|SBB_FT16021(|L)|SBB_16001LNG|SBB_16001,1-2*SBB_CC5701GZ(|L),                        \
2150      (1-2*(SBB_BB4011GZ(|L)|SBB_BC4201GZ(|L)))|(2-3*SBB_CC5701GZ(|L),SBB_CF9793)
2151
2152
2153  # EP 2 Freight short
2154  $DEF CH2FS=(4-6*(SBB_59251(|L)[OB:AG65,20,28|29])|                                                      \
2155      (SBB_1K2_40101(|L)|SBB_2K2_32502L|SBB_2K2_32502|SBB_3K2_33045L|SBB_3K2_33045(|L)|SBB_60221(|L)|     \
2156      SBB_K1|SBB_60601(|L)[OB:TRAVERSES01,17,10][OB:TRAVERSES01,42,10]|SBB_2K2_30113(|L)|                 \
2157      SBB_M9H(|L)[OB:BOILER1,17,12][OB:BOILER(1|4),90,12])|SBB_P91733(|L))
2158
2159  # EP 2 Freight long;
2160  $DEF CH2FL=(10-15*(SBB_59251[O:#FR_KO13,20,29])|(SBB_59251L[O:FR_KO13,20,29])|                          \
2161      (SBB_59201[O:#OMM_KOHLE_01,8,28])|(SBB_57241[O:#FR_KO12,12,28])|(SBB_57241L[O:#FR_KO13,20,28])|     \
2162      (SBB_57186[O:FR_KO12,12,28])|(SBB_57186L[O:OMM_KOHLE_01,15,28])|(SBB_57001[O:OMM_KOHLE_01,9,28])|   \
2163      (SBB_57001L[O:OMM_KOHLE_01,15,28])|(SBB_55062[O:#COAL15,,24])|(SBB_55062L[O:COAL13,,24]))|          \
2164      ((<(SBB_1K2_40101(|L)|SBB_2K2_40101|SBB_1K2D_40201L|SBB_1K2D_40401),SBB_3K2_35901|SBB_3K2_35901L,   \
2165      (SBB_1K2_32501L|SBB_1K2_32501|SBB_2K2_32502L|SBB_2K2_32502|SBB_3K2_33045L|SBB_3K2_33045),           \
2166      3*(SBB_3K3_42001BL|SBB_3K3_42001B|SBB_3K3_42001HL|SBB_3K3_42001H|SBB_3K3_42401L|SBB_3K3D_46501L|    \
2167      SBB_3K3D_46501|SBB_3K3D_46631L|SBB_3K3D_46631),SNOB_J25001L|SNOB_J25001,,                           \
2168      BSBS_2481(|L)|BSB_2401(|L),BNB_K2_301|BNB_K2_301L,GB_3485HL|GB_3485H,                               \
2169      2*(BNB_K2_201L|BNB_K2_201,GB_1801Z|GB_1801ZL,GB_1901L|GB_1901),SBB_60221L|SBB_60221,SBB_60601,      \
2170      SBB_K1|SBB_60601L,UEBB_41L|UEBB_41,SBB_2K2_30113|SBB_2K2_30113L))|(3*CH2FS)
2171
2172  # EP 3 Passenger BLS long
2173  $DEF CH3PBL=3*(BLS_B4U_811(|L)),2*BLS_AB4U_181(|L),3*(BLS_B4U_811(|L))
2174
2175
2176  # EP 3B Passenger SBB local
2177  $DEF CH3PR1=(<SBB_1833006,SBB_17101,SBB_3B4U8754,SBB_3B4U8754L,SBB_3AB4U1,SBB_3A4U1,SBB_3GMS137_5H)
2178
2179  # EP 3 Passenger SBB long Distance
2180  $DEF CH3PD1=(<SBB_3_9133900L,2*SBB_3BEW1B,SBB_34EW2AB,SBB_3BEW1A,2*SBB_3BEW1B)
2181
2182  # EP 3 Freight shunting
2183  $DEF CH3FR=(1-2*(SBB_3GMS137_5B|SBB_3GMS137_5BL|SBB_GMS_K3FURGUTERH(|L)|SBB_GMS_K3POURVOSH(|L)|         \
2184      SBB_3GMS137_6|SBB_3GMS137_5HL|SBB_3GMRV105|SBB_3GMS137_6L))|                                        \
2185      (1-2*(SBB_K3_43001|SBB_K3NH|SBB_GMS_K3HL|SBB_GMS_K3H|SBB_HHV(|L)|SBB_2J3_23001|SBB_3J3_23001L|      \
2186      SBB_3J3_23001|SBB_3J3_23101L|SBB_3J3_23101))|                                                       \
2187      (2-3*(SBB_4GMS137_5BL|SBB_4GMS137_5B|SBB_4GMS137_5HL|SBB_4GMS137_5H|SBB_4GMRV105L|SBB_4GMRV105))|   \
2188      ((SBB_KLMS|SBB_KKKML)[OB:(BOX33|BOX_BMW),,13])|(SBB_M3EH|SBB_M3EBL)|                                \
2189      (2-3*(SBB_3HCQRSS212L|SBB_3HCQRSS212|SBB_3HHV2009000L|SBB_3HHV2009000|SBB_3HHV2009200L|             \
2190      SBB_3HHV2009200|SBB_3HV200L|SBB_3HV200|SBB_3J2D_22201L|SBB_3J2D_22201|SBB_3J2D_22501L|              \
2191      SBB_3J2D_22501|SBB_J2D_22601L|SBB_J2D_22601))|(1-2*SBB_(2O73601|3O70001|3O70101)(|L))|              \
2192      (2-3*(SBB_64001L|SBB_P516009L|SBB_KKKM|SBB_KKKM1L|SBB_KKKM1|SBB_68002L|SBB_68002|SBB_KKKMSWL|       \
2193      SBB_KKKMSW|SBB_68901L|SBB_68901|SBB_M6EL|SBB_M6E|SBB_M6E1L|SBB_M6E1|SBB_M6NL|SBB_M6N|SBB_M6N1L|     \
2194      SBB_M6N1|SBB_P516009|SBB_O74410SN(|L)))|                                                            \
2195      (1-2*(SBB_1200000|SBB_GS_K4A|SBB_GS_K4|SBB_46998|SBB_1700001|SBB_K2NBL|SBB_K2NB|SBB_K2NHL|SBB_K2NH))| \
2196      (2-3*(BLS_GKLML|BLS_GKLM|SBB_GKLM_K2L|SBB_GKLM_K2|SBB_GKLM_K2FURGUTERL|SBB_GKLM_K2FURGUTER|         \
2197      SBB_GKLM_K2POURVOSL|SBB_GKLM_K2POURVOS|SBB_GKLM_K2HL|SBB_GKLM_K2H|SBB_3GKLMV114L|SBB_3GKLMV114|     \
2198      SBB_G24|SBB_3GKLM111|SBB_GKLM_K2FURGUTERH(|L)|SBB_GKLMVHL|SBB_GKLMVH|SBB_HKVL|SBB_HKV))|            \
2199      (1-2*(SBB_ZK151|SBB_0003295|SBB_0003293(|L)|SBB_3O70001|SBB_53001))|                                \
2200      (1-2*(SBB_37001BL|SBB_37189|SBB_37189L|SBB_22179L|SBB_22179|SBB_22179AL|SBB_22179A))|               \
2201      (1-2*(SBB_58101L|SBB_58101|SBB_K2OBL|SBB_K2HOL))|                                                   \
2202      (1-2*(SBB_3HK205L|SBB_3HK205|SBB_4HK205L|SBB_4HK205|SBB_3HHK206L|SBB_3HHK206|SBB_HKHL|SBB_HKH|      \
2203      SBB_23001L|SBB_23001|SBB_23101L|SBB_23101|SBB_2J3_23001L))|(1-2*(SBB_M(3EH|6E)(|L)))|               \
2204      (1-2*(SBB_3GM(S137_5B|RV105)(|L)))|(1-2*(SBB_69701SULZER(|L)))|                                     \
2205      (1-2*(SBB_GMS_K3(FURGUTERH|POURVOSH)(|L)))|(1-2*(SBB_GKLM_K2(|POURVOS)(|L)))|                       \
2206      (1-2*((SBB_3J3_23001(|L)|SBB_J2D_22601(|L))))|(1-2*(SBB_HHV(|L)|SBB_HKH(|L)))
2207
2208  # EP 3 Freight short
2209  $DEF CH3FS=4-6*CH3FR
2210  # EP 3 Freight long
2211  $DEF CH3FL=12-15*CH3FR
2212
2213  # EP 4 Freight shunting
2214  $DEF CH4FR=(1-3*(SBB_4GMS137_5B(|L)|SBB_4GMS137_5H(|L)|SBB_4GMS137_6(|L)))|(1-3*(SBB_4GMRV105(|L)))|    \
2215      (1-3*(SBB_4GKLM(V114|111)(|L)))|(1-3*(SBB_4HK205(|L)|SBB_4HHK206(|L)))|(1-3*(SBB_4E505P))|          \
2216      (1-3*(SBB_64001SLM(|L)))|(1-3*(SBB_LKKM2(|L)))|(1-3*(SBB_KKKMSW(1|3)|SBB_M6E(2|3)|SBB_KKKM_SLM))|   \
2217      (1-3*(SBB_46998|SBB_1704122|SBB_GS_K4|SBB_1200000|SBB_47001))|(1-3*(SBB_G6|SBB_GBS_0(|L)))|         \
2218      (1-3*(SBB_HBILSVY237(|L)|SBB_HBBILLNS2457))|(1-3*(SBB_IBPSS1|SBB_IBPSS|DB_IBCS_INTERFRIGO))|        \
2219      (1-3*(SBB_SHIMMS07(|L)))|(1-3*(SBB_4TES0750000(|L)|SBB_4TES0750100(|L)))|                           \
2220      (1-3*(SBB_O76501(|L)|SBB_TPPS3(|L)|SBB_TPPS4(|L)))|                                                 \
2221      (1-3*SBB_(1202809|1200000_LINDT|HKKS_K4APROZ|P552101_APROZ1))|                                      \
2222      (1-3*(SBB_UACS932_1101S(|L)|SBB_UACS932_1101(|L)))|(1-3*(SBB_UCS_9121101(|L)))|                     \
2223      (1-3*(SBB_O74001RR|SBB_O74201SHL|SBB_O74001RRL|SBB_O74410SRL|SBB_O74410SR|SBB_O74201SR|             \
2224      SBB_O74201SRL|SBB_O74410GKL|SBB_O74001L|SBB_O74001))|                                               \
2225      (1-3*(SBB_LGMMSL|SBB_LGMMS|SBB_LKKML|SBB_LKKM|SBB_LGMMSWL|SBB_LGMMSW|SBB_LKKM1|SBB_LKKM1L|          \
2226      SBB_LLPSX4127L|SBB_LLPSX4127))|(1-3*(SBB_4_EOS(1|2|3|4)B(|L)))|(1-3*SBB_4_FBK1(|L))|                \
2227      (1-3*(SBB_4_(GKLM1|GMS1|GMS2|GSK4B)(|L)))|(1-3*(SBB_4_I1(|L)|GF_INTERFRIGO1|SBB_IBPSS(|1)))|        \
2228      (1-3*(SBB_4_Z1(|L)|SBB_GZ_3SR))|(1-3*(BLS_E1M|SBB_EM))
2229
2230  # EP 4 Freight short
2231  $DEF CH4FS=3-4*CH4FR
2232
2233  # EP 4 Freight long
2234  $DEF CH4FL=10-11*(CH4FR)
2235
2236  # EP 4 Passenger Long Distance
2237  $DEF CH4PD1=(<SBB_4_3070L|SBB_4_3070,SBB_3_2270L,SBB_3_2170L,SBB_4_1970L,SBB_8870HL|SBB_8870H,          \
2238      SBB_3_2270,SBB_3_2170,SBB_DMSL|SBB_DMS)|                                                            \
2239      (<SBB_EUR_BMO~TBR,SBB_EUR_BMOL~TBR,SBB_1971OL,SBB_4_8870OL|SBB_4_8870O,SBB_4_2170OL,                \
2240      SBB_4_2170O|SBB_4_5070_019L|SBB_4_5070L|SBB_4_5070|SBB_5071L|SBB_5071)|                             \
2241      (<2*SBB_4_AM51L,SBB_4_AB51L,SBB_4_8870F,4*SBB_4_BM51L)|                                             \
2242      (<4*SBB_4_BM51,SBB_4_8870FL,SBB_4_AB51,SBB_4_AM51)|                                                 \
2243      (<2*SBB_4_5070_019L,SBB_4_RIC2AL,SBB_L_R_WRML,4*SBB_4_BM51OL,SBB_4_DMS51L)|                         \
2244      (>2*SBB_4_5070,SBB_4_RIC2A,SBB_L_R_WRM,4*SBB_4_BM51O,SBB_4_DMS51)|                                  \
2245      (<SBB_4_DMS51,4*SBB_4_BM51O,SBB_4_RIC2A,2*SBB_4_5070L)|                                             \
2246      (<SBB_RICU_BL,SBB_UMBAU_GBML,SBB_RICU_AB2,SBB_5RICBLS_A7ML,SBB_L_RS_WRML,SBB_RICU_BL,SBB_B20430M,   \
2247      SBB_RICU_DL)|                                                                                       \
2248      (<SBB_RICU_D,SBB_B20430ML,SBB_RICU_B,SBB_L_RS_WRM,SBB_5RICBLS_A7M,SBB_RICU_AB2L,SBB_UMBAU_GBM,      \
2249      SBB_RICU_B)
2250
2251  # EP 4 Passenger BLS
2252  $DEF CH4PBL=2-3*(BLS_294005(4|0)(|L)),2*(BLS_1740040(|L)|BLS_1740030(|L)),                              \
2253      2-3*(BLS_294005(4|0)(|L))|(<(2-3*BLS_EW1BG),BLS_EW1ABG,BLS_EW1ABGL,2-3*BLS_EW1BGL)|                 \
2254      (<BLS_4EW1DM(|L),BLS_4EW1BM,(BLS_EW1GAB1M(|L)|BLS_4EW1AM),2*BLS_4EW1BM)
2255
2256  # EP 4 Passenger SBB semi fast train
2257  $DEF CH4PS=(<2*SBB_4BEW1B,2*SBB_4BEW1A,SBB_4_8833509(|L),2*SBB_4BEW1B,SBB_4B5EW2D)
2258
2259  # EP 4 maintenance
2260  $DEF CH4FM=SBB_XS57630D,SBB_XS57630U,6*((SBB_S6T_85501(|L)|SBB_XS9572100(|L))[O:FR_SCH06(|[M]),,16]),   \
2261      SBB_XS45419(|L),SBB_XS57120D[OB:FR17,,15],SBB_XS57120U[OB:FR17,,15]
2262
2263  # EP 5 Passenger Long Distance
2264  $DEF CH5PD1=(<SBB_1073,SBB_1075,SBB_1075P,SBB_1075B,SBB_EW3WR_IC|SBB_5_8833509,SBB_2175B,SBB_2175P,     \
2265      2*SBB_2175,2*SBB_2175O,SBB_2173,SBB_EW4D51)|                                                        \
2266      (>SBB_1073L,SBB_1075L,SBB_1075PL,SBB_1075BL,SBB_EW3WR_ICL|SBB_5_8833509L,SBB_2175BL,SBB_2175PL,     \
2267      2*SBB_2175L,2*SBB_2175OL,SBB_2173L,SBB_EW4D51L)|                                                    \
2268      (<2*SBB_5_AM51L,SBB_5_AB51L,                                                                        \
2269      (SBB_EW4WRL|SBB_EW3_WRBUFL|SBB_8833710L|SBB_EW3WR_MITROPAL|SBB_8833712BL|SBB_EW3WR_BSL|             \
2270      SBB_8833712L),4*SBB_5_BM51L)|                                                                       \
2271      (>2*SBB_5_AM51,SBB_5_AB51,                                                                          \
2272      (SBB_EW4WR|SBB_EW3_WRBUF|SBB_8833710|SBB_EW3WR_MITROPA|SBB_8833712B|SBB_EW3WR_BS|SBB_8833712),      \
2273      4*SBB_5_BM51)|                                                                                      \
2274      (<2*SBB_5_1970NL,2*SBB_5_BCML,(SBB_EW1_RS_MITM|SBB_8833712M|SBB_EW3_WRMIT)(|L),SBB_5_RIC2AL,        \
2275      2*SBB_5_RIC2BL,SBB_5_BPM51L)|                                                                       \
2276      (<SBB_5_BPM51,2*SBB_5_RIC2B,SBB_5_RIC2A,(SBB_EW1_RS_MITM|SBB_8833712M|SBB_EW3_WRMIT)(|L),           \
2277      2*SBB_5_BCM,2*SBB_5_1970N)
2278
2279  # EP 5-6 maintenance
2280  $DEF CH5FMA=(7-10*(SBB_XANS74(A|C)(|L)))|                                                               \
2281      (8-10*SBB_XAS73(A|B|C|D|E|F|G)(|L)[O:(FR_GRAVEL1|GRAVEL12)(|[M])])|                                 \
2282      (7-9*SBB_5RESM[OB:(SOIL23|GRAVEL8)(|[M]),,16])
2283
2284  # EP 5 Freight mixed short
2285  $DEF CH5FS2=(3-5*(SBB_HBILS_CDOM(I|1G|1F|1I|G|F)(|L)))|(3-5*(SBB_EANOS53761(59|85)T(|L)))|              \
2286      (3-5*(SBB_EAS(2|3|4|5|6|7|8|9|10|11|12)(|L)[OB:SCRAP(6|5|4)(|[M]),,32]))|                           \
2287      (3-5*(SBB_EAOS532(0607|0999|1002|0554|0928|0942|1061)(|L)[OB:SCRAP(6|5|4)(|[M]),,32]))|             \
2288      (3-5*(EVS_UACS(2|3)(|L)|SBB_UACS_JURA(2|3)(|L)))|(3-5*(SBB_UACNS_VIGIER(|L)))|                      \
2289      (3-5*(SBB_6KK|SBB_5HBIS_PLFM)(|L))|(3-5*(SBB_TAGNPPS008(|L)))|                                      \
2290      (3-5*(SBB_6HBIS225(A|AL|B|BL|C|CL|D|DL|E|EL|G|GL|F)))|                                              \
2291      (3-4*(SBB_RSW3900(|HL)(|L)[OB:PIPE(54|58|40|63|59|55|56|57|39),,13]))|                              \
2292      (3-5*(SBB_HBILLNS(12|13|14|15|16)(|L)))|(3-5*SBB_TAGNPPS0(09|10|11|12)(|L))|                        \
2293      (3-5*SBB_UAGNPPS(1|9347001|9347008|9347019|9347014|9347011(|L)|1L|9347000L|9347001L|9347008L|       \
2294      9347019L|9347011))|(3-5*(SBB_6FSU605(|L)|SBB_FACC_MAKIESS))|(3-5*SBB_5TBISM)|                       \
2295      (3-5*((SBB_ZS_ALTOLA|SBB_ZS_ASEOL|SBB_ZS_AARAU|SBB_ZS7357790|BAGL_ZS7351920|SBB_MOTOREX)(|L)))|     \
2296      (3-5*((SBB_RES1(|L)|SBB_RES3936291)[OB:TARP(15|21)(|[M]),,17]))|                                    \
2297      (3-5*(SBB_FANSU6770(2230|226|210)(|L)[O:GRAVEL(2|7|6)(|[M])]))|                                     \
2298      (3-4*(SBB_HABBIILLNS2891000|SBB_HABBIILLNSS2891004L|SBB_HABBIILLNSS2891004|                         \
2299      SBB_HABBIILLNSS2891011L|SBB_HABBIILLNSS2891011|SBB_HABBIILLNSS2891016|SBB_HABBIILLNSS2891024L|      \
2300      SBB_HABBIILLNSS2891024|SBB_HABBIILLNSS2891033L|SBB_HABBIILLNSS2891033|SBB_HABBIILLNSS2891040|       \
2301      SBB_HABBIILLNSS2891041|SBB_HABBIILLNSS2891043L|SBB_HABBIILLNSS2891043|SBB_HABBIILLNSS2891045L|      \
2302      SBB_HABBIILLNSS2891045|SBB_HBBILLNS2457341|SBB_HABBIILLNSS2891049L|SBB_HABBIILLNSS2891049|          \
2303      AAEC_HABBILLNS2780922))|(3-4*(SBB_5GSM|SBB_1704122|SBB_1200996))|                                   \
2304      (3-5*(SBB_HBBILLNS2461721(|L)|SBB_HBBILLNS2461830(|L)|SBB_HBBILLNS2461974|SBB_HBBILLNS2461788|      \
2305      SBB_HBBILLNS2461568|SBB_HBBILLNS2461540L|SBB_HBBILLNS2461540|SBB_HBBILLNS2461821|                   \
2306      SBB_HBBILLNS2461384|SBB_HBBILLNS2461543(|A)(|L)|SBB_HBBILLNSS2461_CARGO|SBB_HBBINSS2451097(|L)|     \
2307      SBB_HBBINSS2451180(|L)|SBB_HBBINSS2451106(|L)|SBB_HBBINSS2451193(|L)|SBB_HBBINSS2451022(|L)|        \
2308      SBB_HBBINSS2451149(|L)|SBB_HBBINSS2451148(|L)|SBB_HBBINSS2451133(|L)))
2309
2310
2311  $DEF CH5FS3=(3-5*(SBB_2750000A|SBB_2750500A|SBB_2850500A))|(3-4*SBB_EANOS8[OB:SCRAP(4|5)(|[M]),,33])|   \
2312      (3-4*(SBB_EANOS(6|5|4|3|2|1)(|L)[OB:SCRAP(4|5|9|10|8)(|[M]),,31]))|                                 \
2313      (3-4*(SBB_EAS(12|11|10|9|8|7|6|5|4|3)(|L)[OB:SCRAP_(13|12|14|15)(|[M]),,31]))|                      \
2314      (3-4*(SBB_HB(ILS2350587|ILSVY2370465|ILSVY2370404|ILLNS17|ILLNS18|ISWW2252205|ISWW2252281|          \
2315      ILSVY2370423|ISWW2252109|ISWW2252130|ILS2350608|ILS2350735)(|L)))|                                  \
2316      (3-4*(WASC_HABBIILLNSS_POST(1|2)(|L)|DB_HABIS7TW(3|1|2|5|5))|                                       \
2317      (TWAG_HABIIS802743354|TWAG_HABBIINS802846979|DB_HABINS2783076))|                                    \
2318      (3-4*(SBB_FACC_MAKIESS|SBB_47001|SBB_9321053))|(3-4*JURA_UACS0(4|5|6|7|8|9)(|L))|                   \
2319      (3-4*(SBB_HBISWW225_2200O|SBB_HBILSVY237(|L)|SBB_HBILSVY237T|SBB_HBILS_C2IL|SBB_H2|SBB_H1|          \
2320      SBB_HBILS_CDOMG(|L)|SBB_HBILS_C2F))|(2-3*SBB_HABIS_(CONTI|PANGAS))|                                 \
2321      (3-5*(SBB_2750000A|SBB_2750500A|SBB_2850500A))|(3-4*SBB_EANOS8[OB:SCRAP(4|5)(|[M]),,33])|           \
2322      (3-4*(SBB_TAGPPS0660G(|L)|SBB_TAGNPPS(|L)|SBB_TAGNPPS005|SBB_TAGNPPS186(|L)|SBB_TAGNPPS186))|       \
2323      (3-4*(SBB_5UACOS1(|L)|SBB_4UACOS(|L)|SBB_5UACOS(|L)|SBB_UCS_9121101L|SBB_UCS_9121101))|             \
2324      (3-4*(SBB_UCS(9105008|9108001|9104218|_9104244)(|L)))|(3-4*SBB_TPPS3(|L))|                          \
2325      (3-4*(SBB_EOS01|SBB_EOS02|SBB_EOS03))|(3-4*(SBB_UACS932_HOLCIM(|4|1L|2|3|5|L|2L|3L|4L|5L)))|        \
2326      (3-4*(SBB_UACS0(4|1|2|3|4|5)(|L)))|(3-4*SBB_RES(2|3|4)(|L))|(3-5*(SBB_TAGNPPS0(09|10|11|12)(|L)))|  \
2327      (3-4*(SBB_TDS0731004|SBB_HABILS2M))|(3-5*(SBB_2750000A|SBB_2750500A|SBB_2850500A))|                 \
2328      (3-4*SBB_EANOS8[OB:SCRAP(4|5)(|[M]),,33])|                                                          \
2329      (3-5*(SBB_SGSB(|L)[O:ROFF_(31L|32|33|33L|34|35L),8,14][O:ROFF_(31L|32|33|33L|34|35L),69,14]         \
2330      [O:ROFF_(31L|32|33|33L|34|35L),130,14]))
2331
2332  $DEF CH5FS4=(3-5*(SBB_HBIS_JUBI150|SBB_HBILS_CDOMIL|SBB_HBILSVY237|SBB_HBIS_BLUMCHENL|SBB_HBILS_CDOMI|  \
2333      SBB_HBILS_C2FL|SBB_HBILS_C2F|SBB_HBILS_C1FL|SBB_HBILS_C1IL|SBB_HBILS_C3OL|SBB_HBILS_APROZ1O|        \
2334      SBB_HBILS_GRAF15|SBB_HBILSVY2370423A|SBB_HBILS_GRAF22|SBB_HBILS2350566|SBB_2457421|                 \
2335      SBB_HBILS_GRAF41|SBB_HBBILLNS2457_CARGO1|SBB_HBILLNS2|SBB_HBBILLNS2457_OTTO|SBB_HBBILLNS2457601|    \
2336      SBB_HBBILLNS2457_SIHL|SBB_HBBILLNS2457_TELA|SBB_2457081|SBB_HBBILLNSS2461|SBB_HBIS_BLUMCHEN|        \
2337      SBB_HILRRS2|SBB_HILRRS4|SBB_HBBILLNS2457605AL|SBB_HBBILLNS2461109L|SBB_HBBILLNS2457_HOLZ|           \
2338      SBB_2457089|SBB_HBBILLNS2457_CARGO2|SBB_HBBILLNS2457_DATWYLER|SBB_HBBILLNS2457_EPA|SBB_2462007|     \
2339      SBB_HBILLNS6|SBB_HBBILLNS2457094|SBB_HBBILLNS2457202|SBB_HBBILLNS2457242|SBB_HBBILLNS2457257|       \
2340      SBB_HBBILLNS2457362|SBB_HILRRS6|SBB_HILRRS5L|SBB_HILRRS3L|SBB_HILRRS(|L)|SBB_HILRRS1L))|            \
2341      (3-4*SBB_HB(ILS2350587|ILSVY2370465|ILSVY2370404|ILLNS17|ILLNS18|ISWW2252205|ISWW2252281|           \
2342      ISWW2252303|IS225O|IS2250285|IS2250170|ILS2350552|ILS2350573|ILSVY2370227|ILSVY2370202|             \
2343      ILSVY2370204|ILSVY2370423|ISWW2252109|ISWW2252130|ILS2350608|ILS2350735|BILLNS2457016|              \
2344      BILLNS2457028|BILLNS2457124|BILLNS2457275|BILLNS2457335|BILLNS2457415|BILLNS2457446|BILLNS2457455|  \
2345      BILLNS2457507|BILLNS2457550|BILLNS2457595|BILLNS2457360|BILLNS2457609|BILLNS2457613|BILLNS2457080|  \
2346      BILLNS2457608|BILLNS2457605|BILLNS2459373|BILLNS2459|BILLNS2459408|BILLNS2459406|BILLNS2459380|     \
2347      BILLNS2459397|BILLNS2459330|BILLSUY2471024|BILLNS2457512A|BILLNS2457119|IS2250498|IS2250500|        \
2348      IS2250870|IS2251944)(|L))|                                                                          \
2349      (3-4*(SBB_HABBIILLNS2891000|SBB_HABBIILLNSS2891004L|SBB_HABBIILLNSS2891004|                         \
2350      SBB_HABBIILLNSS2891011L|SBB_HABBIILLNSS2891011|SBB_HABBIILLNSS2891016|SBB_HABBIILLNSS2891024L|      \
2351      SBB_HABBIILLNSS2891024|SBB_HABBIILLNSS2891033L|SBB_HABBIILLNSS2891033|SBB_HABBIILLNSS2891040|       \
2352      SBB_HABBIILLNSS2891041|SBB_HABBIILLNSS2891043L|SBB_HABBIILLNSS2891043|SBB_HABBIILLNSS2891045L|      \
2353      SBB_HABBIILLNSS2891045|SBB_HBBILLNS2457341|SBB_HABBIILLNSS2891049L|SBB_HABBIILLNSS2891049|          \
2354      AAEC_HABBILLNS2780922))|                                                                            \
2355      (3-5*(SBB_HBBILLNS2461721(|L)|SBB_HBBILLNS2461830(|L)|SBB_HBBILLNS2461974|SBB_HBBILLNS2461788|      \
2356      SBB_HBBILLNS2461568|SBB_HBBILLNS2461540L|SBB_HBBILLNS2461540|SBB_HBBILLNS2461821|                   \
2357      SBB_HBBILLNS2461384|SBB_HBBILLNS2461543(|A)(|L)|SBB_HBBILLNSS2461_CARGO|SBB_HBBINSS2451097(|L)|     \
2358      SBB_HBBINSS2451180(|L)|SBB_HBBINSS2451106(|L)|SBB_HBBINSS2451193(|L)|SBB_HBBINSS2451022(|L)|        \
2359      SBB_HBBINSS2451149(|L)|SBB_HBBINSS2451148(|L)|SBB_HBBINSS2451133(|L)))
2360
2361  $DEF CH5FS5=(4-5*SBB_UACS0(4|1|2|3|4|5|6|7|8)(|L))|(4-5*(SBB_EAOS5321061|SBB_EAOS12)(|L))|              \
2362      (4-5*SBB_TAGNPPS0664(025|038|115|109|166|178|198)(|L))|                                             \
2363      (4-5*SBB_SNPS(|L)[OB:WOOD(129|130|128|46)(|[M]),,13])
2364  $DEF CH5FS1=CH5FS(2|3|4|5)
2365
2366  # EP 5-6 Freight long
2367  $DEF CH5FL1=5-6*CH5FS1
2368
2369  # EP 5-6 Freight with advertising cars
2370  $DEF Z_CH_E5_GWerbe=15*(GB13POST~SBB|SBB_HBILS_GRAF1|SBB_HBILS_GRAF2|SBB_HBILS_GRAF3|SBB_HBILS_GRAF4|   \
2371      SBB_HBILS_GRAF5|SBB_HBILS_GRAF6|SBB_HBILS_GRAF7|SBB_HBILS_GRAF8|SBB_HBILS_GRAF9|SBB_HBILS_GRAF10|   \
2372      SBB_HBILS_GRAF11|SBB_HBILS_GRAF12|SBB_HBILS_GRAF13|SBB_HBILS_GRAF14|SBB_HBILS_GRAF16|               \
2373      SBB_HBILS_GRAF17|SBB_HBILS_GRAF18|SBB_HBILS_GRAF19|SBB_HBILS_GRAF20|SBB_HBILS_GRAF21|               \
2374      SBB_HBILS_GRAF23|SBB_HBILS_GRAF24|SBB_HBILS_GRAF25|SBB_HBILS_GRAF26|SBB_HBILS_GRAF27|               \
2375      SBB_HBILS_GRAF28|SBB_HBILS_GRAF29|SBB_HBILS_GRAF30|SBB_HBILS_GRAF31|SBB_HBILS_GRAF32|               \
2376      SBB_HBILS_GRAF33|SBB_HBILS_GRAF34|SBB_HBILS_GRAF35|SBB_HBILS_GRAF36|SBB_HBILS_GRAF37|               \
2377      SBB_HBILS_GRAF38|SBB_HBILS_GRAF39|SBB_HBILS_GRAF40|SBB_HBILS_GRAF42|SBB_HBILS_GRAF43|               \
2378      SBB_HBILS_GRAF44|SBB_HBILS_GRAF45|SBB_HBILS_GRAF46|SBB_HBILS_GRAF47|SBB_HBILS_GRAF48|               \
2379      SBB_HBILS_GRAF49|SBB_HBILS_GRAF50|SBB_HBILS_GRAF51|SBB_HBILS_GRAF52|SBB_HBILS_GRAF53|               \
2380      SBB_HBILS_GRAF54|SBB_HBILS_GRAF55|SBB_HBILS_GRAF56|SBB_HBILS_GRAF57|SBB_HBILS_GRAF58|               \
2381      SBB_HBILS_GRAF59|SBB_HBILS_AKISEG|SBB_HBILS_BAK|SBB_HBILS_DICK|SBB_HBILS_INU|SBB_HBILS_KMAL|        \
2382      SBB_HBILS_MOM|SBB_HBILS_NASK|SBB_HBILS_NOS|SBB_HBILS_STAR|SBB_HBIS_PHISIK|SBB_HBIS_OKAS|            \
2383      SBB_HBIS_CLOY|SBB_HBILS_UETIKER1O|SBB_HBILS_UETIKER2L|SBB_HBILS_UETIKER2|SBB_HBILS_UETIKER3L|       \
2384      SBB_HBILS_UETIKER3|SBB_HBILS_WIR_BEWEGENL|SBB_HBILS_WIR_BEWEGEN|SBB_HBINS5|SBB_HBILS_SIHLWL|        \
2385      SBB_HBILS_SIHLW|SBB_HBILS_SIHLRL|SBB_HBILS_SIHLR|SBB_HBILS_UETIKER1L|SBB_HBILS_UETIKER1|            \
2386      GB13SIE2~SA|SBB_HBILS_RICHINA1O|SBB_HBILS_RICHINA2L|SBB_HBILS_RICHINA2|SBB_HBINS_RICHINA|           \
2387      SBB_HBILS_ROLANDL|SBB_HBILS_ROLAND|SBB_HBILS_SCHINDLERL|SBB_HBILS_SCHINDLER|GB13SIE1~SA|            \
2388      SBB_HBILS_RICHINA1L|SBB_HBILS_RICHINA1|SBB_HBILS_PTTL|SBB_HBILS_PTT|SBB_HBILS_POSTL|                \
2389      SBB_HBILS_POST|SBB_HBILS_RAILBOUTIQUEL|SBB_HBILS_RAILBOUTIQUE|SBB_HBILS_RAILB|SBB_HBILS_PERLEN1O|   \
2390      SBB_HBILS_DENNER1L|SBB_HBILS_DENNER1|SBB_HBILS_DENNER2L|SBB_HBILS_DENNER2|SBB_HBILS_DENNER3L|       \
2391      SBB_HBILS_DENNER3|SBB_HBINS14|SBB_HBIS_HERO|SBB_HABIS_HERO|SBB_HBILS_KALKSAND1L|                    \
2392      SBB_HBILS_KALKSAND1|SBB_HBILS_KALKSAND2L|SBB_HBILS_KALKSAND2|SBB_HBIS2|SBB_HBIS_LISTAL|             \
2393      SBB_HBIS_LISTA|SBB_HBILS_PERLEN1L|SBB_HBILS_PERLEN1|SBB_HBILS_DELACHERL|SBB_HBILS_BGUSSEL|          \
2394      SBB_HBILS_BGUSSE|GB13CRES~SBB|SBB_HBIS_AJAX|SBB_HBILS_AJAXL|SBB_HBILS_AJAX|                         \
2395      SBB_HBILS_BAHNFRUHLINGL|SBB_HBILS_BAHNFRUHLING|SBB_HBILS_BGUSSBL|SBB_HBILS_BGUSSB|                  \
2396      SBB_HBILS_BGUSSSL|SBB_HBILS_BGUSSS|SBB_HBILS_BGUSSAL|SBB_HBILS_AARGL|SBB_HBILS_AARG|                \
2397      SBB_HBILS_AARGAU200|SBB_HBILS_KNORR1L|SBB_HBILS_KNORR1|SBB_HBIS3|SBB_HBILS_KNORR2L|                 \
2398      SBB_HBILS_KNORR2|SBB_HBILS_KNORR3L|SBB_HBILS_KNORR3|SBB_HBILS_KNORR|SBB_HBILS_MAGGI1L|              \
2399      SBB_HBILS_MAGGI1|SBB_HBINS4|SBB_HBILS_MAGGI2L|SBB_HBILS_MAGGI2|SBB_HBILS_LINDT1L|SBB_HBILS_LINDT1|  \
2400      SBB_HBILS_LINDT2L|SBB_HBILS_LINDT2|SBB_HBILS_OVA_URHELL|SBB_HBILS_OVA_URHEL|                        \
2401      SBB_HBILS_OVA_URTRUB_LI|SBB_HBILS_OVA_URTRUB|SBB_HBILS_ROLAND1L|SBB_HBILS_ROLAND1|                  \
2402      SBB_HBILS_ROLAND2L|SBB_HBILS_ROLAND2|SBB_HBILS_USEGOFL|SBB_HBILS_USEGOF|SBB_HBILS_USEGOGL|          \
2403      SBB_HBILS_USEGOG|SBB_HBINS_USEGO|SBB_HBILS_VOLGL|SBB_HBILS_VOLG|SBB_HBILS_COOPDL|SBB_HBILS_COOPD|   \
2404      SBB_HBILS_COOPDOL|SBB_HBILS_COOPDO|SBB_HBILS_COOPFL|SBB_HBILS_COOPF|SBB_HBILS_COOPFOL|              \
2405      SBB_HBILS_COOPFO|SBB_HBILS_COOP1L|SBB_HBILS_COOP|SBB_HBINS_COOP|SBB_HBINS11|SBB_HBILS_FRISCHL|      \
2406      SBB_HBILS_FRISCH|SBB_HBILS_FRISCHOL|SBB_HBILS_FRISCHO|SBB_HBILS_COOPAL|SBB_HBILS_COOPA|             \
2407      SBB_HBILS_COOPBL|SBB_HBILS_COOPB|SBB_HBILS_COOPCL|SBB_HBILS_COOPC|SBB_HBILS_COOPEL|                 \
2408      SBB_HBILS_COOPE|SBB_HBILS_COOPNL|SBB_HBILS_COOPN|SBB_HBILS_ARNIL|SBB_HBILS_ARNI|SBB_HBILS_ARNIOL|   \
2409      SBB_HBILS_ARNIO|SBB_HBILS_GALAL|SBB_HBILS_GALA|SBB_HBILS_GALAOL|SBB_HBILS_GALAO|SBB_HBILS_COOPML|   \
2410      SBB_HBILS_COOPM|SBB_HBILS_COOPM1L|SBB_HBILS_COOPM1|SBB_HBILS_PICANTAL|SBB_HBILS_PICANTA|            \
2411      SBB_HBILS_PICANTAOL|SBB_HBILS_PICANTAO|SBB_HBILS_MALTL|SBB_HBILS_MALT|SBB_HBILS_MALTOL|             \
2412      SBB_HBILS_MALTO|SBB_HBILS_QUICKL|SBB_HBILS_QUICK|SBB_HBILS_QUICKOL|SBB_HBILS_QUICKO|                \
2413      SBB_HBILS_APROZ1L|SBB_HBILS_APROZ1|SBB_HBILS_APROZ1OL|SBB_HBILS_APROZ1O|SBB_HBILS_APROZ2L|          \
2414      SBB_HBILS_APROZ2|SBB_HBILS_APROZ2OL|SBB_HBILS_APROZ2O|SBB_HBILS_APROZ3L|SBB_HBILS_APROZ3|           \
2415      SBB_HBILS_APROZ3OL|SBB_HBILS_APROZ3O|SBB_HBINS12|SBB_HBILS_BICUITSL|SBB_HBILS_BICUITS|              \
2416      SBB_HBILS_BICUITSOL|SBB_HBILS_BICUITSO|SBB_HBILS_BISCHOFSZELL1L|SBB_HBILS_BISCHOFSZELL1|            \
2417      SBB_HBILS_BISCHOFSZELL1OL|SBB_HBILS_BISCHOFSZELL1O|SBB_HBILS_BISCHOFSZELL2L|                        \
2418      SBB_HBILS_BISCHOFSZELL2|SBB_HBILS_BISCHOFSZELL2OL|SBB_HBILS_BISCHOFSZELL2O|                         \
2419      SBB_HBILS_BISCHOFSZELL3L|SBB_HBILS_BISCHOFSZELL3|SBB_HBILS_BISCHOFSZELL3OL|                         \
2420      SBB_HBILS_BISCHOFSZELL3O|SBB_HBILS_MIGROS2|SBB_HBILS_FREYL|SBB_HBILS_FREY|SBB_HBILS_MIGROS3|        \
2421      SBB_HBINS13|SBB_HBILS_MIGROS4|SBB_HBINS_MIGROS|SBB_HBILS_FARMER1L|SBB_HBILS_FARMER1|                \
2422      SBB_HBILS_FARMER2L|SBB_HBILS_FARMER2|SBB_HBILS_MARGARINEL|SBB_HBILS_MARGARINE|                      \
2423      SBB_HBILS_MARGARINEOL|SBB_HBILS_MARGARINEO|SBB_HBILS_MIGROS1|SBB_HBILS_MIDOR2L|SBB_HBILS_MIDOR2|    \
2424      SBB_HBILS_MIDOR2OL|SBB_HBILS_MIDOR2O|SBB_HBILS_MIDOR75L|SBB_HBILS_MIDOR75|SBB_HBILS_MIDOR75OL|      \
2425      SBB_HBILS_MIDOR75O|SBB_HBILS_MONTEG1L|SBB_HBILS_MONTEG1|SBB_HBILS_MONTEG2L|SBB_HBILS_MONTEG2|       \
2426      SBB_HBILS_TOTALL|SBB_HBILS_TOTAL|SBB_HBILS_TOTALOL|SBB_HBILS_TOTALO|SBB_HBILS_EPAL|SBB_HBILS_EPA|   \
2427      SBB_HBILS_HEIDILANDL|SBB_HBILS_HEIDILAND|SBB_HBILS_HERO1L|SBB_HBILS_HERO1|SBB_HBILS_HERO2L|         \
2428      SBB_HBILS_HERO2|SBB_HBILS_HERO3L|SBB_HBILS_HERO3|SBB_HBILS_JELMOLIL|SBB_HBILS_JELMOLI|              \
2429      SBB_HBILS_JURASELL|SBB_HBILS_JURASEL|SBB_HBILS_WALLISSER2|SBB_HBILS_WARTECK1L|SBB_HBILS_WARTECK1|   \
2430      SBB_HBINS_WARTECK|SBB_HBILS_WARTECK2L|SBB_HBILS_WARTECK2|SBB_HBILS_WARTECK3L|SBB_HBILS_WARTECK3|    \
2431      SBB_HBILS_EICHHOFBL|SBB_HBILS_EICHHOFB|SBB_HBILS_EICHHOF|SBB_HBILS_EICHHOFNL|SBB_HBILS_EICHHOFN|    \
2432      SBB_HBINS7|SBB_HBILS_EICHHOF1L|SBB_HBILS_EICHHOF1|SBB_HBILS_EICHHOF2L|SBB_HBILS_EICHHOF2|           \
2433      SBB_HBINS10|SBB_HBILS_GURTENBIER1L|SBB_HBILS_GURTENBIER1|SBB_HBILS_GURTENBIER2L|                    \
2434      SBB_HBILS_VY382GOTTHARDL|SBB_HBILS_VY382GOTTHARD|SBB_HBILS_VY458GOTTHARDL|SBB_HBILS_VY458GOTTHARD|  \
2435      SBB_HBILS_GURTENBIER2|SBB_HBILS_HALDENGUTL|SBB_HBILS_HALDENGUT|SBB_G8|SBB_HBINS_HALDENGUT|          \
2436      SBB_HBILS_HURLIMANNL|SBB_HBILS_HURLIMANN|SBB_HBILS_HURLIMANN1L|SBB_HBILS_HURLIMANN1|                \
2437      SBB_HBINS_KARBACHER|SBB_HBILS_LOWENBRAUL|SBB_HBILS_LOWENBRAU|SBB_HBILS_LOWENBRAU2L|                 \
2438      SBB_HBILS_LOWENBRAU2|SBB_HBILS_LOWENBRAU3L|SBB_HBILS_LOWENBRAU3|SBB_HBILS_SCHLOSSGOLDL|             \
2439      SBB_HBILS_SCHLOSSGOLD|SBB_HBILS_WALLISSERL|SBB_HBILS_WALLISSER|SBB_HBILS_WALLISSER2L|               \
2440      SBB_HBILS_PEPSI1L|SBB_HBILS_PEPSI1|SBB_HBINS3|SBB_HBILS_PEPSI2L|SBB_HBILS_PEPSI2|                   \
2441      SBB_HBILS_RIVELLA_ROT_BLAU_LI|SBB_HBILS_RIVELLA|SBB_G10|SBB_HBIS_RIVELLA|SBB_HBILS_RIVELLA1L|       \
2442      SBB_HBILS_RIVELLA1|SBB_HBILS_RIVELLA2L|SBB_HBILS_RIVELLA2|SBB_HBILS_SCHWEPPESL~TBR|                 \
2443      SBB_HBILS_SCHWEPPES~TBR|SBB_HBILS_SCHWEPPES~MF|SBB_HBINS1|SBB_HBILS_SINALCOL|SBB_HBILS_SINALCO|     \
2444      SBB_HBILS_PASSUGGER1L|SBB_HBILS_PASSUGGER1|SBB_HBILS_PASSUGGER2L|SBB_HBILS_PASSUGGER2|              \
2445      SBB_HBILS_RHAZUNSER1L|SBB_HBILS_RHAZUNSER1|SBB_HBILS_RHAZUNSER2L|SBB_HBILS_RHAZUNSER2|              \
2446      SBB_HBILS_VALSER1L|SBB_HBILS_VALSER1|SBB_HBILS_VALSER2L|SBB_HBILS_VALSER2|SBB_HBILS_VALSER|         \
2447      SBB_HBILS_VALSER3L|SBB_HBILS_VALSER3|SBB_HBILS_VALSER4L|SBB_HBILS_VALSER4|SBB_HBILS_VMBL|           \
2448      SBB_HBILS_VMB|SBB_HBILS_COLAL|SBB_HBILS_COLA|SBB_HBINS2|SBB_HBILS_ELMERL~TBR|SBB_HBILS_ELMER~TBR|   \
2449      SBB_HBILS_ELMER~MF|SBB_HBIS_GRANINI|SBB_HBILS_ORANGINA1L|SBB_HBILS_ORANGINA1|SBB_HBILS_ORANGINA2L|  \
2450      SBB_HBILS_ORANGINA2|SBB_HBINS6|SBB_HBILS_ORANGINA|SBB_HBILS_ORANGINA_ROCOL|                         \
2451      SBB_HBILS_ORANGINA_ROCO|SBB_HBILS_OVOMALTINE1L|SBB_HBILS_OVOMALTINE1|SBB_HBILS_OVOMALTINEL~TBR|     \
2452      SBB_HBILS_OVOMALTINE~TBR|SBB_HBILS_OVOMALTINE~MF|SBB_HBILS_C3O|SBB_HBILS_FONTESSA1L|                \
2453      SBB_HBILS_FONTESSA1|SBB_HBILS_FONTESSA1OL|SBB_HBILS_FONTESSA1O|SBB_HBILS_FONTESSA2L|                \
2454      SBB_HBILS_FONTESSA2|SBB_HBILS_FONTESSA2OL|SBB_HBILS_FONTESSA2O|SBB_HBILS_HENNIEZ1L|                 \
2455      SBB_HBILS_HENNIEZ1|SBB_HBILS_HENNIEZ2L|SBB_HBILS_HENNIEZ2|SBB_HBILS_C1I|SBB_HBILS_C2I|              \
2456      SBB_HBILS_C1GL|SBB_HBILS_CDOMFL|SBB_HBILS_CDOMF|SBB_HBILS_CDOM1GL|SBB_HBILS_CDOM1G|                 \
2457      SBB_HBILS_CDOM1FL|SBB_HBILS_CDOM1F|SBB_HBILS_CDOM1IL|SBB_HBILS_CDOM1I|SBB_HBILS_C2GL|               \
2458      SBB_HBILS_C2G|SBB_HBILS235L|SBB_HBILS235WL|SBB_HBIS225L|SBB_HBIS225|SBB_HBISWW225_2200)
2459
2460
2461  # EP 6 Passenger IC
2462
2463  $DEF CH6PIC=(<(3*(SBB_APM1|SBB_1090REFITL|SBB_1090REFIT)),SBB_EW4WRVRESTL|SBB_EW4WRVREST,               \
2464      6*(SBB_2090REFITL|SBB_2090REFIT|SBB_BPM2L|SBB_BPM2|SBB_BPM1L),SBB_BPM3)|                            \
2465      (<(2*SBBECAA~MF),SBB_1090EXCISL|SBB_1090EXCIS|SBBECBL~MF,SBB_EW3_BRM(|L)|SBB_EW4WRVREST,            \
2466      SBB_2090309DISL,5*(SBB_2090NCISL|SBB_2090NCIS))|                                                    \
2467      (<(3*(SBB_1090EXCISSL|SBB_1090EXCISS)),SBB_EW4WRVLEBUFFETL|SBB_EW4WRVLEBUFFET,                      \
2468      6*(SBB_2090312L|SBB_2090312))
2469
2470
2471  # EP 6 Freight with cereal transport
2472  $DEF CH6FC=11-14*(SNCF_CERG_OVO(|L)|SNCF_CERG_CTC6(|L)|SNCF_CERG_GRA1(|L)|SNCF_CERG_CTC(2|3|4|5)(|L)|   \
2473      SNCF_CERG_TMF(|L)|SNCF_CERG_TRA(1|2)(|L)|SNCF_CERG_SHGT2(|L)|                                       \
2474      SNCF_CERG96_(AC|CAR|CIWC|CTC|CTC2|LOG1|GRA2|OVO|OVO2|TMF|W|W2)(|L)|SNCF_FG132_(CTC3|SHGT2)(|L)|     \
2475      SNCF_CER84R_FR1(|L)|SNCF_CERP96H_LOG(|L)|SNCF_CERP_(M|CCA|LOG1)(|L)|SNCF_CERX_KAR(|L))
2476
2477
2478  # EP 6 Freight Truck transport
2479  $DEF CH6FR=BLS_HUPAC(|L),                                                                               \
2480      (<SBB_5SAADKMS(A|B)L[OB:!TRUCK_ITL,,5],18*SBB_5_SAADKMSM(|L)[OB:!TRUCK_ITL,,5],                     \
2481      SBB_5_SAADKMSA|SBB_5SAADKMSB[OB:!TRUCK_ITL,,5])|                                                    \
2482      (<SBB_5SAADKMS(A|B)L[OB:!TRUCK_IT,,5],18*SBB_5_SAADKMSM(|L)[OB:!TRUCK_IT,,5],                       \
2483      SBB_5_SAADKMSA|SBB_5SAADKMSB[OB:!TRUCK_IT,,5])
2484
2485  # EP 6 Freight Container
2486  $DEF CH6FCO=12*(SBB_SGNS(4|5)[O:MIGROS_REF(3|2L|1|1L),8,12][O:MIGROS_REF(3|2L|1|1L),113,12]|            \
2487      SBB_SGNS455L[N:#B,B13]                                                                              \
2488      [O:CA_PTT(1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25)(|L),24,12]             \
2489      [O:CA_PTT(1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25)(|L),100,12]|           \
2490      SBB_SGSB(|L)[O:ROFF_0(1|2|3|4|6)(|L),9,13][O:ROFF_0(1|2|3|4|6)(|L),70,13]                           \
2491      [O:ROFF_0(1|2|3|4|6)(|L),131,13]|AAE_SGGRS1[O:C40A,7,12][O:C40A,140,12]|                            \
2492      CBR_SGGMRSS1[O:C40A,10,12][O:C40A,159,12]|(2*SBB_LGNS4435000[O:C40A,,12]))
2493
2494  # EP 6 Freight STEAL
2495  $DEF CH6FS=(15-18*ERR_SHIMMNS(12|13)(|L))|                                                              \
2496      (15-18*SBB_SHIMMS(17|17L|18L|02|02L|04L|05L|06L|07L|08L|09L|10L|11L|12L|13L|14L|15L|16L|04|05|06|   \
2497      07|08|09|10|11|12|13|14))|(15-18*SBB_SHIMMNS(01|02|03|04|05|06|07|08|09|10|11|12|13|14|15)(|L))
2498  #----------------------------------------------------------------------------------------------------
2499  #
2500  # Austria
2501
2502  # EP 1 Passenger
2503  $DEF A1P=CSD_FY5_0902,KKSTB_DE,3-4*KKSTB_C3_EXKFNB,2-3*KKSTB_AB3_EXKFNB|CSD_BEY2_1980(|L),              \
2504      3-4*KKSTB_C3_EXKFNB
2505
2506  # EP 1 Freight shunting
2507  $DEF A1FR=(2-3*(KKSTB_1_LXVII(|H|HL)|KKSTB_1_LIVH(|L)|KKSTB_1_LMB(|L)|KKSTB_1_G1B(|H|HL)))|             \
2508      (2-3*(KKSTB_1_LXV(|H|HL)|KKSTB_1_LXI|KKSTB_1_LXIII(|H|HL)|KKSTB_1_LIVB(|L)))|                       \
2509      (2-3*(KKSTB_1_LXXI(|B|BL)|KKSTB_1_LI(|B|BL)|KKSTB_1_LIL(|B|BL)|KKSTB_1_LIII(|B|BL)))|               \
2510      (2-3*(KKSTB_1_GG(E1B|E1BH|E1BHL|1BHL|1BH|1B)))|(2-3*(KKSTB_1_GE(1BHL|1BH|1BH|1B|IAH|IAHL|IA)))|     \
2511      (1-2*KKSTB_1_GA(|L))|(2-3*KKSTB_1_LSTXI(|B|BL)[OB:COW(1|2|2L|3),7,12][OB:COW(1|2|2L|3),31,12])
2512
2513  # EP 1 Freight long
2514  $DEF A1FL=CSD_D6_05(|L)[NB:B,BA8],8*A1FR
2515
2516  # EP 2 Freight shunting
2517  $DEF A2FR=(2-3*(SBB_1K2_30113|SBB_1K2_30113|SBB_1K2_40101))|(2-3*CSD_UZ5_859)|(2-3*DRG_O21(|H)(|L))|    \
2518      (2-3*(NS_44001GLYN|NS_95001GN2E|NS_174501E|NS_19001))|                                              \
2519      (2-3*BBO_2_JKE(|H|HL|B|BL|R1|R1L|R1HL|R1H|R1B|R1BL|L1|L1L|L1H|L1HL|L1B|L1BL|L1R1|L1R1L|L1R1H|       \
2520      L1R1HL|L1R1B|L1R1BL|E|EH|EHL|EB|EBL|ER1|ER1H|ER1HL|ER1B|ER1BL|L)                                    \
2521      [OB:FR_CARRIAGE1|FR_HAYRAKE|FR_HAYRAKE2|BOX41|BOX44|BOX_FRICHS|BOX1|BOX6|MARBLE2|BOILER4|           \
2522      FR_CARRIAGE1,,12])
2523
2524  # EP 2 Freight long
2525  $DEF A2FL=CSD_D6_05(|L)[NB:B,BA8],8*A2FR
2526
2527
2528  # EP 3a 1949-1956 Passenger regional
2529  $DEF A3PL1=(<6-8*(OBB_2AXN28_3A(|L)|OBB_2AXN28(|N)_3BR(|L)|OBB_BI37710F(|L)|OBB_BI39200F(|L)|           \
2530      OBB_BI39000FR(|L)|OBB_BI35200FR(|L)),OBB_DGHO)
2531
2532  # EP 3b 1958-1960 Passenger long distance
2533  $DEF A3PL3=<OBB_D95103GM[B:90,13,10,5],2*OBB_3B_B4IPUHO330(0|3)0(|L)[NT:P],2*OBB_3B3150,                \
2534      3*OBB_3B311(2|0)0
2535
2536  # EP 3c 1960-1967 Passenger long distance 1 Schlieren
2537  $DEF A3PL2=(<OBB_3C3_BDPO8235,2*OBB_3C3_BPO2935(|L),OBB_BR8514(|L),OBB_3C1_ABPO3735,                    \
2538      OBB_3C1_APO1735(|L),OBB_3C3_BPO2935(|L))
2539
2540  # EP 3b 1957-1967 Passenger long distance 2 BBOE-cars
2541  $DEF A3PD=(<OBB_SPD1(|L),2-3*(OBB_N28B(0|1|2)(|L)|OBB_SP11),1-2*OBB_N28A1(|L),OBB_N28AB1,               \
2542      3-4*(OBB_N28B(0|1|2)(|L)|OBB_SP11))
2543
2544  # EP 3b 1957-1967 Passenger regional 2-axle
2545  $DEF A3PR2=(<OBB_BDI47900F,OBB_BI39700FL,OBB_BI38200F,OBB_2AXN28_3BRL)|                                 \
2546      (<OBB_BI38200FL,BBO_2AXN28L,OBB_BI39700F,OBB_BI37710FL,OBB_SP2,OBB_SP1,OBB_DGHO)
2547
2548  # EP 3 Freight other
2549  #   open car
2550  $DEF A3O=OBB_3_OM751(|E)(|L)[#E!OB:AG80,*46,28]|OBB_3_OM743U(|L)[#E!OB:AG80,*50,28]|                    \
2551      OBB_3_OM754(5|7)(|E)(|L)[#E!OB:AG80,*46,28]
2552  #   open car, end of the train (brake house)
2553  $DEF A3OE=OBB_3_OM751(H|EH|EB|B)[#E!OB:AG80,*46,28]|OBB_3_OM751(H|EH|EB|B)L[#E!OB:AG80,*50,28]|         \
2554      OBB_3_OM743(H|B)[#E!OB:AG80,*58,28]|OBB_3_OM743(H|B)L[#E!OB:AG80,*58,28]
2555
2556  #   box car
2557  $DEF A3G=OBB_3_(4:G125V(1|2)|10:(GM143|GM144|GMDS140)(|H|B)|GDS135H)(|L)
2558  #   box car, end of the train (brake house)
2559  $DEF A3GE=OBB_3_(GM143|GM144|GMDS140|GDS135)H($DIR(,L))
2560
2561  $DEF FR3Z=CSD_R8(|A|B|C)(|[!L])|DR_4A_(Z8020|Z8021)(|L)|DR_ZH8020(|L)|SBB_EGLIN3|SBB_EGLIN5
2562
2563  $DEF A3FO=3-15*A3O,A3OE
2564  $DEF A3FG=3-15*A3G,A3GE
2565  $DEF A3FX=A3O|A3G,3-30*A3O|A3G|FR3Z,A3OE|A3GE
2566
2567  $DEF A3FS=1-4*A3O|A3G|FR3Z
2568  $DEF A3F=(|[!E])A3FO|A3FG|5:A3FX
2569
2570  # EP 3 Freight shunting
2571  $DEF A3FS1=(2-4*OBB_1099K|OBB_MILCH_WIEN|OBB_MILCH_SCHARDINGER|SBB_STANDARDAG)|                         \
2572      (2-4*(OBB_BRAUERAG|OBB_HIRTER_MARZEN|OBB_STIEGL3)(|L))|                                             \
2573      (2-4*OBB_3(G163|_GMMS180E|_GMMS180EH|GLMMS283)(|L))|                                                \
2574      (2-4*G_008|DB_EKW49L|DB_ZAU_VTGL|DB_ZAU_VTG|DB_EKW49)|                                              \
2575      (2-4*OBB_3_G125V1L|OBB_3_G125V1|OBB_3_GM143|OBB_3_GM144|OBB_3_GMDS140HL|OBB_3_GMDS140H)|            \
2576      (2-4*OBB_3_OM743HL|OBB_3_OM751BL|OBB_3_OM751E|OBB_3_OM751EH|OBB_3_OM7545EL|OBB_3_OM7547EL)|         \
2577      (2-4*OBB_3_OM7547[O:FR_REPA2,,28]|OBB_3_OM7547L[O:#FR_REPA2,,28]|OBB_3_OM7547EL[O:FR_BRAM,,28]|     \
2578      OBB_3_OM7547E[O:FR_BRAM,,28])|(2-4*(OBB_BRAUERAG|OBB_HIRTER_MARZEN|OBB_STIEGL3)(|L))|               \
2579      (2-4*OBB_GABS1810|OBB_GABS1810N|OBB_GABS181|OBB_3_G125V2L|OBB_3_GM143L|OBB_3_GM143BL|OBB_3_GM143B|  \
2580      OBB_3_GM144H|OBB_3_GM144BL|OBB_3_GMDS140|OBB_3_GDS135HL)|                                           \
2581      (2-4*OBB_3_OM743BL[O:FR_KO21,,28]|OBB_3_OM751HL[O:#FR_KO21,,28]|OBB_3_OM751B[O:FR_KO20,,28])|       \
2582      (2-4*OBB_3_OL(R|RHL|RH|RBL|RB|R_R1|R_R1HL|R_R1H|R_R1BL|R_R1B|L|HL|H|BL|B|_R1L|_R1|_R1HL|_R1H|       \
2583      _R1BL|_R1B|_L1L|_L1|_L1HL|_L1H|_L1BL|_L1B|_L1R1L|_L1R1|_L1R1HL|_L1R1H|_L1R1BL|_L1R1B))              \
2584      [OB:(BOX16|BOX28|BOX1|BOX4|BOX6|BOX33),,12]|                                                        \
2585      (2-4*OBB_3_OL(|L|H|HL|B|BL|_R1|_R1L|_R1HL|_R1H|_R1B|_R1BL|_L1|_L1L|_L1H|_L1HL|_L1B|_L1BL|_L1R1|     \
2586      _L1R1L|_L1R1H|_L1R1HL|_L1R1B|_L1R1BL)                                                               \
2587      [OB:FR_CARRIAGE1|FR_HAYRAKE|FR_HAYRAKE2|BOX41|BOX44|BOX_FRICHS|BOX1|BOX6|MARBLE2|BOILER4|           \
2588      FR_CARRIAGE1,,12])|(2-4*OBB_3_OM751E[O:#FR_KO22,,28]|OBB_3_OM751EB[O:#FR_KO22,,28])|                \
2589      (2-4*OBB_3_GM144L,OBB_GBS151BL,OBB_GBS151,OBB_3_OM7547E)|(2-4*A3G(|E))|(2-4*A3O(|E))
2590
2591  # EP 3 Freight short
2592  $DEF Z_AT_E3_G1=5*A3FS1
2593
2594  # EP 3 Freight long
2595  $DEF A3FL=10*A3FS1
2596
2597  # EP 4 Freight shunting
2598  $DEF A4FS=(3-4*(OBB_EAOS_(Y25|MD)[O:SCRAP(5|6)]|OBB_EANOS_(Y25|MD)[O:SCRAP(8|10)]))|                    \
2599      (3-4*(OBB_GBS151(D|I)|OBB_GABS181(|0|0N|A|B|AB)|OBB_GBS151(|A|W|E|BL)|OBB_GBS150(|A)|OBB_GBSM))|    \
2600      (3-4*(OBB_SHIMMS_BL|OBB_SHIMMS_B))|(3-4*OBB_4GS(1200A1H|1200B1H|9432)(|L))|                         \
2601      (3-4*(OBB_HBINS_STIEGL|OBB_247HBBILLNS|OBB_HIRRS292(FT|A|B|SO)))|                                   \
2602      (3-4*(OBB_KSL[OB:ROPEDRUM,,11]|OBB_KS(|L)[OB:(GEOTEX1|TURBINE1),,13]))|(3-4*OBB_TADS)|              \
2603      (3-4*(OBB_ZANS_AVIA|EVA_7855631|VTG_859823|OBB_ZANS_VTG))|                                          \
2604      (3-4*(OBB_ZWETTL|OBB_MILCH_SCHARDINGER|OBB_MILCH_WIEN))|                                            \
2605      (3-4*(OBB_4GS1200(A|B)1(|L)|OBB_4GBS151A1(|L)))|(2-3*(OBB_GABSM|OBB_GABS1810|OBB_GABS181))
2606
2607  # EP 4 Freight short 2
2608  $DEF A4FK=2*A4FS
2609
2610  # EP 4 Freight long
2611  $DEF A4FL=5*A4FS
2612
2613  # EP 4 Passenger long distance
2614  $DEF A4PI=(<OBB_8235J1L,1-2*OBB_2935J1(|L)~ZS,OBB_1735J1(|L)~ZS,1-2*OBB_2935J1(|L)~ZS)|                 \
2615      (<OBB_SPDO(|L),1-2*OBB_4A_20750(|L),1-2*OBB_4B_1975L,1-2*OBB_4A_20751(|L))|                         \
2616      (<1-2*OBB_2134WJ1(|L),1-2*OBB_3034J1(|L),1-2*OBB_20342J1(|L),OBB_8234J1L)
2617
2618  # EP 4A Passenger semi-fast train 4
2619  $DEF A4PS=(OBB_EILZUGD,OBB_EILZUGB,OBB_EILZUGB2,OBB_N28ABJL)|                                           \
2620      (OBB_4A1_BDPO8235,OBB_4A1_BPZ85353,OBB_4A1_ABP3735,2*OBB_4A1_BPO2935)
2621
2622  # EP 4B Passenger semi-fast train 4
2623  $DEF A4PSB=(<(OBB_B290440M(|L)|OBB_BP281463J(1|2)ML),(OBB_B28300GM(|L)|OBB_BP281463G(1|2)ML),           \
2624      OBB_A(18130|B39130)M(|L),OBB_B2(8141J1|0130)M(|L),OBB_D9(5103G|2133_31U)M(|L))|                     \
2625      (<OBB_B2814(6|1)J2M(|L),OBB_AB37400J1M(|L),OBB_A1(7800J2|8140)M(|L),                                \
2626      OBB_B28141G1M(|L)|OBB_D9(2433J2|2433G1|5103J2)M(|L))
2627
2628  # EP 5 Freight short
2629  $DEF A5FS1=(3-4*OBB_SHIMMNSM(|L))|(3-4*(OBB_EAOS1M[OB:SCRAP(5|6|4)(|[M]),,35]))|                        \
2630      (3-4*((OBB_KBS334|OBB_KS3310099|OBB_KS3311215)(|L)[OB:FOKRT101(|_WOOD),,13]))|                      \
2631      (3-4*(OBB_RNOOS_UZ3522(|L)[OB:WOOD31(|[M]),,10]|OBB_RNSZ3991396W(|L)))|                             \
2632      (3-4*(OBB_KS3311215P|OBB_KBS334P|OBB_KBS3349977P)(|L))|                                             \
2633      (3*(OBB_HBBINS2470000(|L)|OBB_HBBILLS2471207(|L)|0000|OBB_HBBILLS2471178(|L)|OBB_HBBILLS2471539(|L)))| \
2634      (3-4*((OBB_RS3900200|OBB_RNSZ3506183)(|L)[OB:PIPE(54|58|40|63|59|55),,13]))|                        \
2635      (3-4*((OBB_RNSZ3991396|OBB_RNSZ3504154)(|L)[OB:PIPE(54|58|40|63|59|55|45|47),,11]))|                \
2636      (3-4*((OBB_EANOS|OBB_EANOS1)(|L)[O:SCRAP(5|6|4)(|[M]),,33]))|                                       \
2637      (3-5*((OBB_RNSZ_KS1|OBB_RS_RS1|OBB_RS_RS2|OBB_KS_RNSZ_KS1|OBB_RNSZ3506183S|OBB_RNSZ3504154S)(|L)))| \
2638      (3-4*OBB_SHIMMNS_STEEL(1|2|3|4|5)(|L))|(3-4*(OBB_ZANS_VTG))|                                        \
2639      (3-5*OBB_(RNOOS_UZ3522620W|RNOOS_UZ3522623W|RNOOS_UZ3522)(|L))|(3-4*OBB_LAAPS430(A|B|C))|           \
2640      (3*(OBB_FBS|OBB_FCS(|L)))|(3-4*(OBB_TADSRCA))|(3*(OBB_SHIMMS_T|OBB_SHIMMS_W))
2641
2642  # EP 5 Freight long
2643  $DEF A5F1=5*A5FS1
2644
2645
2646  # EP 6 Passenger historic (Schlieren green)
2647  $DEF A6PN=(<OBB_5N2_BRPZ85353|OBB_5N2_BRPZ85353L,OBB_5N1_BRPZ85353|OBB_5N1_BRPZ85353L,                  \
2648      OBB_5N_AP1735|OBB_5N_AP1735L)
2649
2650  # EP 6 Freight short steel transport
2651  $DEF Z_AT_E6_G_COIL=(OBB_SHIMMS_W,OBB_SHIMMS_T,OBB_SHIMMS_R,                                            \
2652      5*(OBB_SHIMMNS_STEEL1L|OBB_SHIMMNS_STEEL1|OBB_SHIMMNS_STEEL2L|OBB_SHIMMNS_STEEL2|                   \
2653      OBB_SHIMMNS_STEEL3L|OBB_SHIMMNS_STEEL3|OBB_SHIMMNS_STEEL4L|OBB_SHIMMNS_STEEL4|OBB_SHIMMNS_STEEL5L|  \
2654      OBB_SHIMMNS_STEEL5|OBB_SHIMMNS_STEEL6L|OBB_SHIMMNS_STEEL6|OBB_SHIMMNS_STEEL7))
2655
2656  # EP 6 Freight short
2657  $DEF A6FS1=(3-4*(OBB_SHIMMS_W|OBB_SHIMMS_T|OBB_SHIMMS_R|RCA_SHIMMNSM(|L)))|                             \
2658      (3-4*(RCA_EANOS53(76|80)M[OB:SCRAP(5|6|4)(|[M]),,35]))|                                             \
2659      (3-4*((OBB_KBS334|OBB_KS3310099|OBB_KS3311215)(|L)[OB:FOKRT101(|_WOOD),,13]))|                      \
2660      (3-4*(OBB_RNOOS_UZ3522(|L)[OB:WOOD31(|[M]),,10]|OBB_RNSZ3991396W(|L)))|                             \
2661      (3*(OBB_HABBIILLNS2893196(|L)|OBB_HBBILLNS_DARBO))|                                                 \
2662      (3-4*(OBB_KS3311215P|OBB_KBS334P|OBB_KBS3349977P)(|L))|                                             \
2663      (3*(OBB_HBBINS2470000(|L)|OBB_HBBILLS2471207(|L)|0000|OBB_HBBILLS2471178(|L)|                       \
2664      OBB_HBBILLS2471539(|L)|OBB_HABINS_RCA|OBB_247HBBILLNS_RC|OBB_HABIS_RCA))|                           \
2665      (3-4*((OBB_RS3900200|OBB_RNSZ3506183)(|L)[OB:PIPE(54|58|40|63|59|55),,13]))|                        \
2666      (3-4*((OBB_RNSZ3991396|OBB_RNSZ3504154)(|L)[OB:PIPE(54|58|40|63|59|55|45|47),,11]))|                \
2667      (3-4*((OBB_EANOS|OBB_EANOS1|OBB_6EANOS)(|L)[O:SCRAP(5|6|4)(|[M]),,33]))|                            \
2668      (3-5*((OBB_RNSZ_KS1|OBB_RS_RS1|OBB_RS_RS2|OBB_KS_RNSZ_KS1|OBB_RNSZ3506183S|OBB_RNSZ3504154S)(|L)))| \
2669      (3-4*(OBB_SHIMMNS_STEEL1L|OBB_SHIMMNS_STEEL1|OBB_SHIMMNS_STEEL2L|OBB_SHIMMNS_STEEL2|                \
2670      OBB_SHIMMNS_STEEL3L|OBB_SHIMMNS_STEEL3|OBB_SHIMMNS_STEEL4L|OBB_SHIMMNS_STEEL4|OBB_SHIMMNS_STEEL5L|  \
2671      OBB_SHIMMNS_STEEL5|OBB_SHIMMNS_STEEL6L|OBB_SHIMMNS_STEEL6|OBB_SHIMMNS_STEEL7))|                     \
2672      (3-4*(OBB_ZANS_VTG))|(3-5*OBB_(RNOOS_UZ3522620W|RNOOS_UZ3522623W|RNOOS_UZ3522)(|L))|                \
2673      (3-4*(OBB_TADSRCA))|(3-4*OBB_LAAPS430(A|B|C))|(3*(OBB_FBS|STLB_FBS|OBB_FCS(|L)))|                   \
2674      (3*(OBB_SHIMMS_T|OBB_SHIMMS_W))
2675
2676  # EP 6 Freight long
2677  $DEF A6F1=5*A6FS1
2678
2679  # EP 6 Freight Container
2680  $DEF A6FC=15-18*((OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C30A,7,11]               \
2681      [OT:C30A,99,11])|                                                                                   \
2682      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[O:C20B,7,11][O:C20B,68,11]               \
2683      [O:C20B,129,11])|                                                                                   \
2684      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)                                          \
2685      [O:CT_BERTSCHI11|CT_CHIMICAL_EXPRESS|CT_CONSERT2|CT_CONTAINERDIENST|CT_HOYER1|CT_MILKA|CT_REXWAL|   \
2686      CT_TANKCT|CT_TIPHOOK,112,11][OT:C30A,99,11])|                                                       \
2687      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[O:C2I_EXTE_WOOD(1|2|3|4|5|6),7,11]       \
2688      [O:C2I_EXTE_WOOD(1|2|3|4|5|6),68,11][O:C2I_EXTE_WOOD(1|2|3|4|5|6),129,11])|                         \
2689      (M_SGNSS(|L)[OT:C40B,7,11][OT:C20A,128,11])|                                                        \
2690      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C20A,7,11][OT:C20A,68,11]             \
2691      [OT:C20A,128,11])|(AAE_SGNS4553467[O:WBGA75,9,12][O:WBGA75,>188,12])|                               \
2692      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C40B,7,11][OT:C20A,128,11])|          \
2693      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C40B,7,11])|                          \
2694      (OBB_SGNS(_BR|_FBR_BR|S_Y_BR|S_Y_RT|S_Y_RCAA|S_Y_RCAB)(|L)[OT:C40B,68,11])|                         \
2695      (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11)[O:C40B,9,11][O:C40B,164,11])|                                    \
2696      (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C20A,17,11][O:C20A,78,11][O:C20A,202,11][O:C20A,263,11])|             \
2697      (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C40B,17,11][O:C40B,202,11]))
2698
2699
2700  #----------------------------------------------------------------------------------------------------
2701  #
2702  # Great Britain
2703
2704  # EP 2 Freight short
2705  $DEF GB2FS1=(2-3*(BR_5PLU[BC:-30,30][BT:0,7,3][BT:48,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][AUM:CA]     \
2706      [NB:B,BA8]))|                                                                                       \
2707      (2-3*((BR_10THOO|BR_10TFUR1|BR_10TGLA2|BR_10THAW1|BR_10THGW|BR_10THOL)[BC:-30,30,7,0,46,9]          \
2708      [BT:0,7,3][BT:5,30,46][BT:57,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]                       \
2709      [O:FR_KO(55)(|[M]),6,29]))|                                                                         \
2710      (2-3*(BR_5PLF[BC:-20,20][BT:0,7,3][BT:50,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]))|        \
2711      (2-3*((GW_VAN3A|GW_BANANA1|GW_GWFRUIT|GW_FRUIT|GW_VAN5A|GW_VAN1|GW_VAN1A|GW_VAN2|GW_VAN2A|GW_VAN4|  \
2712      GW_VAN4A|GW_VENT|LMS_12TVAN1|LMS_12TVAN2)[BC:-20,20][BC:-20,20,2,32,52,1][BC:-20,20,2,31,52,2]      \
2713      [BT:0,7,3,4][BT:52,7,3,4][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]))
2714
2715  # EP 2 Freight long GW
2716  $DEF GB2F1GW=7*GB2FS1,                                                                                  \
2717      GW_TOAD2L[BC:-20,20][BC:-20,20,2,34,60,1][BC:-20,20,2,36,81,2][BC:-20,3,2,38,82,1][BT:0,6,3]        \
2718      [BT:82,5,3,7][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]
2719
2720  # EP 2 Freight long LMS
2721  $DEF GB2F1LM=7*GB2FS1,                                                                                  \
2722      LMS_BV1D[BC:-20,20][BC:-20,20,2,33,60,1][BC:-20,20,2,35,60,2][BC:-20,3,2,36,53,1][BT:0,7,3]         \
2723      [BT:62,7,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8]
2724
2725  # EP 2 Freight long LNER
2726  $DEF GB2F1LN=7*GB2FS1,                                                                                  \
2727      (LNER_BRAKE2|LNER_BRAKE3|LNER_BRAKE)[BC:-20,20][BC:-20,20,2,35,57,1][BC:-10,11,4,0,54,8]            \
2728      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8]
2729
2730
2731  # EP 2 Passenger short GW
2732  $DEF GB2PSGW=GW_SIPHONJ[BC:-20,20][BC:-20,20,2,34,156,1][BC:-20,20,2,36,156,1][NC:P,2,22,12,0]          \
2733      [OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8],                                                       \
2734      3*((GW_28DIAE141[BC:-10,20,4,32,180,3][BC:-10,20,4,37,180,2][BC:-10,20,4,32,180,1][BT:0,6,3,5]      \
2735      [BT:185,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16])| \
2736      (GW_22DIAC35[BC:-50,30,4,32,171,6][BC:10,20,4,35,171,2][BT:0,6,3,5][BT:176,6,3,5][OT:BUFFER4R,>,8]  \
2737      [O:BUFFER4L,0,8][NB:B,BA8][OB:WINDOW_BG,16,17][OB:WINDOW_BG,72,16][NC:P,3,22,12,0][NC:P,2,1,11,1]))
2738
2739  # EP 2 Passenger short London Midland and Scottish Railway
2740  $DEF GB2PSLM=,LMS_1BGL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,53,15],                                          \
2741      (<LMS_1FKL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3FKL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],  \
2742      LMS_3FK2L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3FK4L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],  \
2743      LMS_3BCK[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3BTK2L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],  \
2744      LMS_3BTOL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3RFL[OB:WINDOW_BG,9,15],                       \
2745      LMS_1BTO2L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],                                                  \
2746      LMS_1BTOL[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15],LMS_3BTK4L[OB:WINDOW_BG,9,15][OB:WINDOW_BG,75,15])
2747
2748  # EP 2 Passenger short London and North Eastern Railway
2749  $DEF GB2PSLNER=(<LNER_TGCK[BT:0,0,2,12][BT:190,0,2,12][BC:-30,30,0,0,,9][BC:-25,25,2,32,188,3]          \
2750      [BC:-25,25,2,37,187,2][BC:-25,25,2,32,190,1]                                                        \
2751      [WD:A,21,4,9,16,29,37,50,58,71,79,92,117,130,151,138,159,172,100][WOO:A,WIN_4_9]                    \
2752      [WD:C,21,5,7,22,43,85,64,106,123,144,165][WOO:C,WIN_5_7][O:BUFFER2L,0,8][OT:BUFFER2R,>,8]           \
2753      [NB:B,BA8][NC:P,2,23,12,0],                                                                         \
2754      LNER_TGSKR[BT:0,0,2,12][BT:190,0,2,12][BC:-30,30,0,0,,9][BC:-25,25,2,32,188,3]                      \
2755      [BC:-25,25,2,37,187,2][BC:-25,25,2,32,190,1]                                                        \
2756      [WD:A,21,4,9,14,27,35,48,56,69,77,90,98,119,132,153,140,161,174,111][WOO:A,WIN_4_9]                 \
2757      [WD:C,21,5,7,20,41,83,62,104,125,146,167][WOO:C,WIN_5_7][O:BUFFER2L,0,8][OT:BUFFER2R,>,8]           \
2758      [NB:B,BA8][NC:P,2,23,12,0],                                                                         \
2759      LNER_TGTWIN[BT:0,0,2,13][BT:330,0,2,13][BC:-30,30,0,0,,9][BC:-25,25,2,31,328,3]                     \
2760      [BC:-25,25,2,36,328,2][BC:-25,25,2,31,328,1]                                                        \
2761      [WD:A,20,4,9,5,18,25,243,38,45,58,65,78,85,98,105,118,125,145,138,158,170,183,190,203,290,210,230,  \
2762      223,250,263,270,283,310,303,323,][WOO:A,WIN_4_9]                                                    \
2763      [WD:C,21,3,6,12,32,72,52,177,112,92,132,152,197,217,237,257,297,277,317][WOO:C,WIN_3_6]             \
2764      [O:BUFFER2L,0,8][OT:BUFFER2R,>,8][NB:B,BA8],                                                        \
2765      LNER_TGBTWINL[BT:0,0,2,13][BT:318,0,2,13][BC:-30,30,0,0,,9][BC:-25,25,2,31,316,3]                   \
2766      [BC:-25,25,2,36,316,2][BC:-25,25,2,31,316,1]                                                        \
2767      [WD:A,20,4,9,5,18,27,40,49,62,79,92,99,119,132,152,139,164,177,184,197,204,217,237,224,112]         \
2768      [WOO:A,WIN_4_9][WD:C,21,3,6,12,34,86,56,191,106,126,146,171,211,231,268,262,306][WOO:C,WIN_3_6]     \
2769      [O:BUFFER2L,0,8][OT:BUFFER2R,>,8][NB:B,BA8][BC:20,30,279,28,4,1][BC:20,30,274,28,4,1]               \
2770      [BC:20,30,299,28,4,1][BC:20,30,294,28,4,1][BC:20,30,289,28,4,1][BC:20,30,250,28,4,1]                \
2771      [BC:20,30,255,28,4,1][BC:20,30,284,28,4,1][BC:20,30,316,21,1,5][BC:20,30,312,21,1,5])
2772
2773  # EP 2 Passenger short Southern Railway
2774  $DEF GB2PSSR1=(<SR_MPP1[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1]             \
2775      [BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1][WD:A,20,12,9,26,45,64,83,121,140,102][WOO:A,WIN_12_9]  \
2776      [WD:C,20,5,9,158,165,8,15][WOO:C,WIN_5_9][O:SNCFUFGL2,0,12][O:SNCFUFGR2,>,12][O:BUFFER4L,0,8]       \
2777      [OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0],                                                        \
2778      2*(SR_MCOR12[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-30,-30,10,20,4,8]                    \
2779      [BC:-30,-30,162,20,4,8][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1]           \
2780      [WD:A,20,4,8,26,46,66,86,126,146,140,106,152][WOO:A,WIN_4_8]                                        \
2781      [WD:C,20,4,8,20,40,60,92,120,52,132,112,100,72,80,32][WOO:C,WIN_4_8][O:SNCFUFGL2,0,12]              \
2782      [O:SNCFUFGR2,>,12][O:BUFFER4L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]),                     \
2783      SR_MPP[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2]    \
2784      [BC:-10,25,2,37,171,1][WD:A,20,4,9,27,47,67,87,127,152,158,107][WOO:A,WIN_4_9]                      \
2785      [WD:C,20,5,9,20,40,60,93,120,53,133,113,100,73,80,33][WOO:C,WIN_5_9][WD:B,20,4,8,167]               \
2786      [WOO:B,WIN_4_8][O:SNCFUFGL2,0,12][O:BUFFER5L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NCL:P,2,23,12,0])
2787
2788  # EP 2 Passenger long Southern Railway
2789  $DEF GB2PLSR1=(<2*(SR_MPP1[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1]          \
2790      [BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1][WD:A,20,12,9,26,45,64,83,121,140,102][WOO:A,WIN_12_9]  \
2791      [WD:C,20,5,9,158,165,8,15][WOO:C,WIN_5_9][O:SNCFUFGL2,0,12][O:SNCFUFGR2,>,12][O:BUFFER4L,0,8]       \
2792      [OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]),                                                       \
2793      4*(SR_MCOR12[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-30,-30,10,20,4,8]                    \
2794      [BC:-30,-30,162,20,4,8][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1]           \
2795      [WD:A,20,4,8,26,46,66,86,126,146,140,106,152][WOO:A,WIN_4_8]                                        \
2796      [WD:C,20,4,8,20,40,60,92,120,52,132,112,100,72,80,32][WOO:C,WIN_4_8][O:SNCFUFGL2,0,12]              \
2797      [O:SNCFUFGR2,>,12][O:BUFFER4L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]),                     \
2798      2*(SR_MPP1[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1]                      \
2799      [BC:-10,25,2,33,171,2][BC:-10,25,2,37,171,1][WD:A,20,12,9,26,45,64,83,121,140,102][WOO:A,WIN_12_9]  \
2800      [WD:C,20,5,9,158,165,8,15][WOO:C,WIN_5_9][O:SNCFUFGL2,0,12][O:SNCFUFGR2,>,12][O:BUFFER4L,0,8]       \
2801      [OT:BUFFER4R,>,8][NB:B,BA8][NC:P,3,23,12,0]),                                                       \
2802      SR_MPP[BT:0,0,2,12][BT:175,0,2,12][BC:-30,30,0,0,,9][BC:-20,25,2,32,171,1][BC:-10,25,2,33,171,2]    \
2803      [BC:-10,25,2,37,171,1][WD:A,20,4,9,27,47,67,87,127,152,158,107][WOO:A,WIN_4_9]                      \
2804      [WD:C,20,5,9,20,40,60,93,120,53,133,113,100,73,80,33][WOO:C,WIN_5_9][WD:B,20,4,8,167]               \
2805      [WOO:B,WIN_4_8][O:SNCFUFGL2,0,12][O:BUFFER5L,0,8][OT:BUFFER4R,>,8][NB:B,BA8][NCL:P,2,23,12,0])
2806
2807
2808  # EP 2 Passenger long  GW
2809  $DEF GB2PLGW=GW_SIPHONJ[BC:-20,20][BC:-20,20,2,34,156,1][BC:-20,20,2,36,156,1][NC:P,2,22,12,0]          \
2810      [OT:BUFFER3R,>,8][OT:BUFFER3L,0,8][NB:B,BA8],                                                       \
2811      GW_34DIAC32[BC:-10,20,4,32,171,6][BC:-20,20,4,32,171,3][BC:-10,20,4,32,171,1]                       \
2812      [BC:-20,20,4,37,171,1][BT:0,6,3,5][BT:176,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8]        \
2813      [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1],                            \
2814      GW_34DIAC35[BC:-10,20,4,32,171,6][BC:-20,20,4,32,171,3][BC:-10,20,4,32,171,1]                       \
2815      [BC:-20,20,4,37,171,1][BT:0,6,3,5][BT:176,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8]        \
2816      [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1],                            \
2817      GW_34DIAC59[BC:-10,20,4,32,180,6][BC:-20,20,4,32,180,3][BC:-10,20,4,32,180,1]                       \
2818      [BC:-20,20,4,37,180,1][BT:0,6,3,5][BT:185,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8]        \
2819      [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1],                            \
2820      GW_34DIAC61_63[BC:-10,20,4,32,180,6][BC:-20,20,4,32,180,3][BC:-10,20,4,32,180,1]                    \
2821      [BC:-20,20,4,37,180,1][BT:0,6,3,5][BT:185,6,3,5][OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8]        \
2822      [OB:WINDOW_BG,16,17][OB:WINDOW_BG,77,16][NC:P,3,22,12,0][NC:P,2,1,11,1]
2823
2824  # EP 3 Freight short
2825  $DEF GB3FS1=(2-3*(BR_3_VIX(|L)))|                                                                       \
2826      (2-3*BR_12T(E|SAVN|N)(|L)[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:0,0,5,5][BT:53,0,4,8]    \
2827      [NB:B,BA8])|(2-3*(DB_3B_RBMMS55(O|R)|DB_3B_GBMHS51(A|B)|SNCB_3(A_5030A2|B_5030A2|B_5030A2V))(|L))|  \
2828      (2-3*(BR_HAA(|L)[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:81,0,4,8][NB:B,BA8]))|            \
2829      (2-3*(BR_16TSMN(1|2)E(|L)[BC:-15,20][BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:53,0,4,8]     \
2830      [NB:B,BA8]))|(2-3*BR_OCT1P[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:139,0,4,8][NB:B,BA8])|  \
2831      (2-3*BR_(5PLK1|5PLK2|7PLC1|7PLK1|7PLK2)[BT:0,3,4,6][OT:BUFFER4L,0,8][OT:BUFFER4R,>,8][BT:53,0,4,9]  \
2832      [NB:B,BA8])|                                                                                        \
2833      (2-3*BR_HOP3[BT:0,3,4,6][OT:BUFFER3L,0,8][OT:BUFFER3R,>,8][BT:74,0,4,8][NB:B,BA8]                   \
2834      [B:74,9,1,01,#181818][B:3,9,1,01,#181818][O:COAL4(3|5)(|[M])])
2835
2836  # EP 3 Freight long
2837  $DEF GB3F1=9*GB3FS1,                                                                                    \
2838      (BR_BRAKE1NL|BR_STDBV|BR_BVF|BR_BVU|BR_STDBVU|BR_BRAKE1NL|BR_BRAKE1EL|BR_BRAKE1E)[BC:-20,20]        \
2839      [BC:-20,20,2,36,69,1][BC:-20,3,2,35,67,2][BT:0,8,3][BT:80,8,3][OT:BUFFER3R,>,8][OT:BUFFER3L,0,8]    \
2840      [NB:B,BA8]
2841
2842  # EP 3 Passenger short maroon
2843  $DEF GB3PS1=BR_MDIAD117[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3]               \
2844      [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16]                 \
2845      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10],                                     \
2846      4*((BR_MDIAC61_63[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3]                 \
2847      [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16]                 \
2848      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8])|                                                      \
2849      (BR_MDIAC59(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3]                   \
2850      [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16]                 \
2851      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])|                                    \
2852      (BR_MDIAC60_62[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3]                    \
2853      [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16]                 \
2854      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])|                                    \
2855      (BR_MDIAC35[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3]                       \
2856      [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16]                 \
2857      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10]))
2858
2859  # EP 3 Passenger short red/creme
2860  $DEF GB3PS2=BR_CDIAD95L[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3]               \
2861      [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16]                 \
2862      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10],                                     \
2863      4*((BR_CDIAC59(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3]                \
2864      [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16]                 \
2865      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])|                                    \
2866      (BR_CDIAC32(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3]                   \
2867      [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16]                 \
2868      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])|                                    \
2869      (BR_CDIAC60_62[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:184,7,4,2][BC:-20,20,2,32,182,3]                    \
2870      [BC:-20,20,2,37,182,2][BC:-20,20,2,32,182,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,82,16]                 \
2871      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10])|                                    \
2872      (BR_CDIAC35(|L)[BC:-20,20,0,0,,9][BT:0,7,4,2][BT:175,7,4,2][BC:-20,20,2,32,177,3]                   \
2873      [BC:-20,20,2,37,177,2][BC:-20,20,2,32,177,1][OB:WINDOW_BG,6,17][OB:WINDOW_BG,73,16]                 \
2874      [OT:BUFFER4R,>,8][OT:BUFFER4L,0,8][NB:B,BA8][N:#P,DB_30_NP,10]))
2875
2876  # EP 3 Passenger long MK3
2877  $DEF GB3PL3=(<BR_MK1SO02BSKL,2*BR_MK1SO02SK(|L),BR_MK1SO02FO(|L),BR_MK1SO02TSO(|L),BR_MK1SO02RBR(|L),   \
2878      BR_MK1SO02FO(|L),2*BR_MK1SO02TSO(L),BR_MK1_CCTP)
2879
2880  # EP 4 Passenger IC
2881  $DEF GB4PI=(<BR_MK2D_BFKL,2*BR_MK2D_TFO(|L),BR_MK2D_RMBT(|L),4*BR_MK2D_TSO(|L))|                        \
2882      (<(2*BR_MK1SO06SKL),BR_MK1SO06FKL,BR_MK1SO06BFKL|BR_MK1SO06BCKL|BR_MK1SO06BSKL|BR_MK1SO06RBRL,      \
2883      BR_MK1SO06FOL,2*BR_MK1SO06TSOL,BR_MK1SO06RMBL|BR_MK1SO06BGL)|                                       \
2884      (<BR_MK1SO06BG|BR_MK1SO06RMB,2*BR_MK1SO06SK,BR_MK1SO06FO,                                           \
2885      BR_MK1SO06BFK|BR_MK1SO06BCK|BR_MK1SO06BSK|BR_MK1SO06RBR,BR_MK1SO06FK,2*BR_MK1SO06TSO)
2886
2887  # EP 4 Passenger MK3
2888  $DEF GB4PM1=(<(2*BR_MK1SO02SKL),BR_MK1SO02FKL,                                                          \
2889      BR_MK1SO02BFKL|BR_MK1SO02BCKL|BR_MK1SO02BSKL|BR_MK1SO02RBRL,BR_MK1SO02FOL,2*BR_MK1SO02TSOL,         \
2890      BR_MK1SO02RMBL|BR_MK1SO02BGL)|                                                                      \
2891      (<BR_MK1SO02BG|BR_MK1SO02RMB,2*BR_MK1SO02SK,BR_MK1SO02FO,                                           \
2892      BR_MK1SO02BFK|BR_MK1SO02BCK|BR_MK1SO02BSK|BR_MK1SO02RBR,BR_MK1SO02FK,2*BR_MK1SO02TSO)|              \
2893      (<(2*BR_MK1SO01SKL),BR_MK1SO01FKL,BR_MK1SO01BFKL|BR_MK1SO01BCKL|BR_MK1SO01BSKL|BR_MK1SO01RBRL,      \
2894      BR_MK1SO01FOL,2*BR_MK1SO01TSOL,BR_MK1SO01RMBL|BR_MK1SO01BGL)|                                       \
2895      (<BR_MK1SO01BG|BR_MK1SO01RMB,2*BR_MK1SO01SK,BR_MK1SO01FO,                                           \
2896      BR_MK1SO01BFK|BR_MK1SO01BCK|BR_MK1SO01BSK|BR_MK1SO01RBR,BR_MK1SO01FK,2*BR_MK1SO01TSO)|              \
2897      (<(2*BR_MK1SO03SKL),BR_MK1SO03FKL,BR_MK1SO03BFKL|BR_MK1SO03BCKL|BR_MK1SO03BSKL|BR_MK1SO03RBRL,      \
2898      BR_MK1SO03FOL,2*BR_MK1SO03TSOL,BR_MK1SO03RMBL|BR_MK1SO03BGL)|                                       \
2899      (<BR_MK1SO03BG|BR_MK1SO03RMB,2*BR_MK1SO03SK,BR_MK1SO03FO,                                           \
2900      BR_MK1SO03BFK|BR_MK1SO03BCK|BR_MK1SO03BSK|BR_MK1SO03RBR,BR_MK1SO03FK,2*BR_MK1SO03TSO)|              \
2901      (<(2*BR_MK1SO04SKL),BR_MK1SO04FKL,BR_MK1SO04BFKL|BR_MK1SO04BCKL|BR_MK1SO04BSKL|BR_MK1SO04RBRL,      \
2902      BR_MK1SO04FOL,2*BR_MK1SO04TSOL,BR_MK1SO04RMBL|BR_MK1SO04BGL)|                                       \
2903      (<BR_MK1SO04BG|BR_MK1SO04RMB,2*BR_MK1SO04SK,BR_MK1SO04FO,                                           \
2904      BR_MK1SO04BFK|BR_MK1SO04BCK|BR_MK1SO04BSK|BR_MK1SO04RBR,BR_MK1SO04FK,2*BR_MK1SO04TSO)|              \
2905      (<(2*BR_MK1SO05SKL),BR_MK1SO05FKL,BR_MK1SO05BFKL|BR_MK1SO05BCKL|BR_MK1SO05BSKL|BR_MK1SO05RBRL,      \
2906      BR_MK1SO05FOL,2*BR_MK1SO05TSOL,BR_MK1SO05RMBL|BR_MK1SO05BGL)|                                       \
2907      (<BR_MK1SO05BG|BR_MK1SO05RMB,2*BR_MK1SO05SK,BR_MK1SO05FO,                                           \
2908      BR_MK1SO05BFK|BR_MK1SO05BCK|BR_MK1SO05BSK|BR_MK1SO05RBR,BR_MK1SO05FK,2*BR_MK1SO05TSO)
2909
2910  # EP 4 Passenger Network SouthEast
2911  $DEF GB4PNSE1=(<(2*NSE_MK1SO01SKL),NSE_MK1SO01FKL,                                                      \
2912      NSE_MK1SO01BFKL|NSE_MK1SO01BCKL|NSE_MK1SO01BSKL|NSE_MK1SO01RBRL,NSE_MK1SO01FOL,2*NSE_MK1SO01TSOL,   \
2913      NSE_MK1SO01RMBL|NSE_MK1SO01BGL)|                                                                    \
2914      (<NSE_MK1SO01BG|NSE_MK1SO01RMB,2*NSE_MK1SO01SK,NSE_MK1SO01FO,                                       \
2915      NSE_MK1SO01BFK|NSE_MK1SO01BCK|NSE_MK1SO01BSK|NSE_MK1SO01RBR,NSE_MK1SO01FK,2*NSE_MK1SO01TSO)
2916  # EP 4 Passenger West Coast Railway
2917  $DEF GB4PWC1=(<(2*WCRC_MK1SO01SKL),WCRC_MK1SO01FKL,                                                     \
2918      WCRC_MK1SO01BFKL|WCRC_MK1SO01BCKL|WCRC_MK1SO01BSKL|WCRC_MK1SO01RBRL,WCRC_MK1SO01FOL,                \
2919      2*WCRC_MK1SO01TSOL,WCRC_MK1SO01RMBL|WCRC_MK1SO01BGL)|                                               \
2920      (<WCRC_MK1SO01BG|WCRC_MK1SO01RMB,2*WCRC_MK1SO01SK,WCRC_MK1SO01FO,                                   \
2921      WCRC_MK1SO01BFK|WCRC_MK1SO01BCK|WCRC_MK1SO01BSK|WCRC_MK1SO01RBR,WCRC_MK1SO01FK,2*WCRC_MK1SO01TSO)
2922
2923  # EP 4 Passenger regional
2924  $DEF GB4PR=(<(2*BR_MK2A_TSO)(|L),2*BR_MK2A_FK(|L),2*BR_MK2A_TSO(|L),BR_MK2A_BSO)
2925
2926  # EP 4 Freight short
2927  $DEF GB4FS1=(2-3*(BR_4A_HFS(1|2)(|L)))|(2-3*(BR_4B_ZJX_SATLINK(|L)))|(2-3*(BR_4B_HFS(1|2|3)(|L)))|      \
2928      (2-3*(BR_HEASL|BR_HEAS|BR_HEATRL|BR_HEATR|BR_HEAMLL|BR_HEAML))|                                     \
2929      (2-3*(BR_VDA01SL|BR_VDA01S|BR_VDA02SL|BR_VDA02S|BR_VDA03SL|BR_VDA03S|BR_VDA04SL|BR_VDA04S|          \
2930      BR_VDA05SL|BR_VDA05S|BR_VDA06SL|BR_VDA06S|BR_VDA07SL|BR_VDA07S|BR_VDA08SL|BR_VDA08S|BR_VDA09SL|     \
2931      BR_VDA09S))|(2-3*(BR_MEATR|BR_MFASL|BR_MFAS|BR_MFAMLL|BR_MFAML|BR_MEATRL))|                         \
2932      (2-3*(BR_OBA05SL|BR_OBA07S|BR_OBA10S|BR_OBA08SL|BR_OBA06SL))|(2-3*BR_TEABL(5|4|3|2|1)L)|            \
2933      (2-3*(DRS_FNA(|L)[BC:-20,20][BT:0,3,4,6][BT:0,3,4,6][BT:109,3,4,6][OT:BUFFER4L,0,8]                 \
2934      [OT:BUFFER4R,>,8][NB:B,BA8]))|(2-3*(BR_4B_RRX_B787214))|                                            \
2935      (2-3*BR_TE01(5A_SUKO80111|5A_SMBP4049|4H_BPO80560)(|L))|(2-3*BR_4HABFIS_(2796119|0298000)(|L))|     \
2936      (2-3*(SNCB_4A_HF2040|DB_4A_LFST569R|DB_4A_TCEFS845|DB_4A_HFRS312)(|L))|                             \
2937      (2-3*(BR_4B_RRX_B787214(|L)[O:C60_E4,*40][O:C60_E4,*101,12]))
2938  # EP 4 Freight long
2939  $DEF GB4FL=7*GB4FS1
2940
2941  # EP 5 Passenger IC
2942  $DEF GB5PI=(<BR_MK2D_ICBSOL,4*BR_MK2D_ICTSO,BR_MK2F_ICRFB(|L),2*BR_MK2D_ICFO(|L))
2943
2944  # EP 5 Freight shunting
2945  $DEF GB5FR=(TGR_PCA(|L),KETT_PCA(|L),BCC_PCA2(|L))|(2*EWS_VDAS(|L))|(2*BR_VDA07S(|L))|                  \
2946      (EWS_HOA(1|2)S(|L))|(2*FL_HIA(1|2))|(3*EWS_HEAS(|L))|                                               \
2947      (4-5*TIPH_JRA(|L)[OB:SCRAP_14,10,28][OB:#SCRAP_15,52,28])|                                          \
2948      (2*FL_MJAS(|L)[OB:SCRAP_14,10,28][OB:#SCRAP_15,52,28])|(1-3*EWS_MEAS(|L))|                          \
2949      (1-3*(VTG_KIAS(|L)|TIPH_KIA1S(|L)|TIPH_KIA2S(|L)|EWS_BYA1(|L)))|(2*EWS_BLAS(|L))|(2*EWS_BWAS(|L))|  \
2950      (4-5*EWS_MFAS(|L)[OB:SCRAP3(|[M])])|(3*ELC_JHASO0(1|2|3|4)(|L))|                                    \
2951      (3*(GTRM_JJA|BR_5HABFIS_2796119)(|L))|(3*(GBRF|FSTL)_HYASO0(1|2)(|L))
2952
2953
2954  # EP 5 Freight long
2955  $DEF GB5FL=5-7*GB5FR
2956
2957  # EP 5 Freight Container
2958  $DEF GB5FC2=9-11*(FL_FEA[OB:C40A,38,10][OB:C40A,212,10]|                                                \
2959      FL_FEA[O:C20A,38,10][O:C20A,211,10][O:C20A,99,10][O:C20A,272,10]|                                   \
2960      FL_FIA[O:C20A,26,10][O:C20A,208,10][O:C20A,87,10][O:C20A,269,10]|                                   \
2961      EWS_FKA[O:C30A,22,9][O:C20A,189,9][O:C20A,113,9][O:C30A,250,9]|FL_FEA[O:C20A,211,10][O:C20A,272,10]), \
2962      1-2*(FL_F(E|I)A|EWS_FKA)
2963
2964  # EP 5 Freight other
2965  $DEF GB_CONT1=BR_SDFFGSS[O:C20A|C40A]
2966  $DEF GB_STEEL1=(VTG_KIAS|TIPH_KIA1S|TIPH_KIA2S|EWS_BYA1|EWS_BWAS)(|L)
2967
2968  $DEF GB5FC=12-18*GB_CONT1
2969  $DEF GB5FS=8-15*GB_STEEL1
2970
2971  # EP 5 Freight Tank
2972  $DEF GB5FT=(12-15*(CAIB_TEASO01|EWS_TEASO01|FL_TEASO01|VTG_TEASO01|VTG_TEASO02|VTG_TEASO03|             \
2973      VTG_TEASO04|VTG_TEASO05|VTG_TEASO06|VTG_TEASO07|VTG_TEASO08|VTG_TEASO09)(|L))|                      \
2974      (12-15*(PETRO_TEA0(1|1L|2L|3L)|EWS_TEA0(7|6|5|4|3|2|1)L|                                            \
2975      VTG_TEA(08|07|05L|04|04L|05|03|03L|02|02L|01|01L|09|10|11)))
2976
2977
2978
2979  # EP 5 Freight mix
2980  $DEF GB5F=GB5FC|GB5FS|GB5FL|GB5FC2|GB5FT
2981
2982  # EP 6 Passenger West Coast Railway
2983  $DEF GB6PWC1=(<2*WCRC_MK1SO01SKL,WCRC_MK1SO01FKL,                                                       \
2984      WCRC_MK1SO01BFKL|WCRC_MK1SO01BCKL|WCRC_MK1SO01BSKL|WCRC_MK1SO01RBRL,WCRC_MK1SO01FOL,                \
2985      2*WCRC_MK1SO01TSOL,WCRC_MK1SO01RMBL|WCRC_MK1SO01BGL)|                                               \
2986      (<WCRC_MK1SO01BG|WCRC_MK1SO01RMB,2*WCRC_MK1SO01SK,WCRC_MK1SO01FO,                                   \
2987      WCRC_MK1SO01BFK|WCRC_MK1SO01BCK|WCRC_MK1SO01BSK|WCRC_MK1SO01RBR,WCRC_MK1SO01FK,2*WCRC_MK1SO01TSO)
2988
2989  # EP 6 Passenger Direct Rail Services
2990  $DEF GB6PDR1=(<DRS_MK2ABSO|DRS_MK2BSO,5*DRS_MK2TSOL)|(<(5*DRS_MK2TSO),DRS_MK2ABSOL|DRS_MK2BSOL)
2991
2992  # EP 6 Passenger Chiltern Railways
2993  $DEF GB6PC1R=(<(4*CHIL_MK3TSOBG),2*CHIL_MK3FOBG,CHIL_MK3DVT)|                                           \
2994      (<CHIL_MK3TSO1,CHIL_MK3TSO1L,CHIL_MK3GFW,CHIL_MK3DVT)
2995  $DEF GB6PC1L=(<CHIL_MK3DVTL,CHIL_MK3GFWL,CHIL_MK3TSO1,CHIL_MK3TSO1L,CHIL_MK3TSO2,CHIL_MK3TSO2L)|        \
2996      (<CHIL_MK3DVTL,2*CHIL_MK3FOBG,4*CHIL_MK3TSOBG)
2997
2998  # EP 6 Maintenance
2999  $DEF GB6FMO=4-5*(4-5*BR_OBA(01|02|03|04|05|06|07|08|09|10)S(|L)                                         \
3000      [O:(FR_GRAVEL1|BALLAST49|GRAVEL(2|6))(|[M]),,22])
3001
3002
3003
3004  # EP 6 Freight Short
3005  $DEF GB6FRS=(4*(VTG_JNA4SO0(1|2|3)|TOUAX_JNA4SO0(1|2)|GBRF_JNA4SO0(1|2)|ERMEWA_JNA2SO0(1|2)|            \
3006      (TIPH_JRA|NTWR_IOASO01)|FL_MJAS(|O02)|(DBS_MMASO01|GBRF_MJASO01))(|L)[OB:SCRAP2(0|1)(|[M]),,30])|
3007  $DEF GB6FRH=(4*(FL_HIA(1|2)|ELC_JHASO0(1|2|3|4)|FL_HIA(1|2)|ELC_JHASO0(1|2|3|4)|VTG_HYASO0(1|2|3|4|5)|  \
3008      EWS_HOA1SO0(1|2|3)|(TOUAX|NACCO|VTG)_HYASO01|(GBRF_HYASO03|DBS_HOA1SO01|ERMEWA_HOA1SO01))(|L))
3009  $DEF GB6FRI=(4*(VTG_IIA1SO0(1|2|3)|(TOUAX|GERS|DRS)_IIA1SO01|GBRF_IIA1SO0(1|2)|FSTL_IIA1SO0(1|2)|       \
3010      GBRF_HYASO0(1|2))(|L))
3011
3012  # EP 6 Freight mix
3013  $DEF GB6FRM=5*GB6FR(H|I|S)
3014
3015
3016  #----------------------------------------------------------------------------------------------------
3017  #
3018  # FRANCE
3019
3020  # EP 1 Freight short Est
3021  $DEF F1FESS=3*EST_1C_KYW29(3|2)(|L)
3022
3023  # EP 1 Freight short Etat
3024  $DEF F1FETS=3*ETAT_1C_KYW(80|267)(|L)
3025
3026  # EP 1 Freight short Midi
3027  $DEF F1FMIS=MIDI_1C_KYW220(|L)
3028
3029  # EP 1 Freight short Nord
3030  $DEF F1FNOS=3*NORD_1C_KYW267(8|2)(|L)
3031
3032  # EP 1 Freight short Paris - Lyon - Méditerranée
3033  $DEF F1FPLMS=3*PLM_1C_KYW113(|L)
3034
3035  # EP 1 Freight short Paris-Orleon
3036  $DEF F1FPOS=3*PO_1C_KYW44(1|2)(|L)
3037
3038  # EP 2 Freight short Est
3039  $DEF F2FESS=3*EST_2_KYW29(3|2)(|L)
3040
3041  # EP 2 Freight short Etat
3042  $DEF F2FETS=3*ETAT_2_KYW(80|267)(|L)
3043
3044  # EP 2 Freight short Midi
3045  $DEF F2FMIS=MIDI_2_KYW220(|L)
3046
3047  # EP 2 Freight short Nord
3048  $DEF F2FNOS=3*NORD_2_KYW267(8|2)(|L)
3049
3050  # EP 2 Freight short Paris-Orleon
3051  $DEF F2FPOS=3*PO_2_KYW44(1|2)(|L)
3052
3053  # EP 2 Freight short Paris-Lyon-Mediterannee
3054  $DEF F2FPLMS=3*PLM_2_(FAY32|KYW113)(|L)
3055
3056  # EP 2 Passenger semi-fast train Alsace-Lorraine
3057  $DEF F2PAS=AL_PW3|AL_PW3G,4-5*(AL_C9FG|AL_C9F)
3058
3059  # EP 2 Passenger Express PLM
3060  $DEF F2PP=PLM_F3U|PLM_F3UL,(<PLM_AB3UL|PLM_AB3U,5*(PLM_AB4ULLSL|PLM_AB4ULS|PLM_AB4UL|PLM_AB4U))
3061
3062  # EP 2 Passenger Express CIWL
3063  $DEF F2PC=CIWL_D1269MCB|CIWL_D1283MCN,2-2*(CIWL_A4029CB|CIWL_A4018CN),CIWL_AK4005CN,CIWL_SH4013CB,      \
3064      2-3*(CIWL_AK4080CB|CIWL_B4111CB|CIWL_BK4091CB)
3065
3066  # EP 2 Passenger Express CIWL Edelweis
3067  $DEF F2PCE=(<CIWL_PW4B,CIWL_2PEDN,CIWL_2PCFO,CIWL_2PFO,CIWL_2PCEDN,CIWL_PW4BL)|                         \
3068      (<CIWL_PW4B,CIWL_2PEDNL,CIWL_2PCEDNL,CIWL_2PFOL,CIWL_2PCFOL,CIWL_PW4BL)
3069
3070  # EP 2 Freight long
3071  $DEF F2FL=8-10*((3-5*(AL_TREMIE(|L)[O:FR_AG02|FR_KO10](|[M])))|                                         \
3072      (1-3*(SBB_63401(|L)[OB:FR_HAYRAKE(|2)(|[M]),,12]))|                                                 \
3073      (1-3*((WUE_OM12(V|S)HN(|L)|WUE_OM12(V|S)N)[OB:(OMM_KOHLE_02|COAL9)(|[M]),,25|26]))|                 \
3074      (1-3*(DRG_G|DRG_GH(|L)))|(1-3*(GB_3485HZ(|L)|GB_3485H(|L)))|(1-2*(CSD_Z1_75473(|A)))|               \
3075      (1-3*(SNCF_2_K363(|L)))|(1-2*(NS_70431E|NS_70774E(|L)))|(2-3*(NOB_K1_VSCHB(|HL)))|                  \
3076      (2-3*(OBB_3_OM751H(|L)))|(2-3*(SBB_60501B(|L)[OB:BOX25|BOX8|GRANIT2,,12])))
3077
3078  # EP 2 Freight short
3079  $DEF F2FS=4-6*((1-2*(AL_TREMIE(|L)[O:FR_AG02|FR_KO10](|[M])))|                                          \
3080      (1-2*(SBB_63401(|L)[OB:FR_HAYRAKE(|2)(|[M]),,12]))|                                                 \
3081      (1-2*((WUE_OM12(V|S)HN(|L)|WUE_OM12(V|S)N)[OB:(OMM_KOHLE_02|COAL9)(|[M]),,25|26]))|                 \
3082      (1-2*(DRG_G|DRG_GH(|L)))|(1-2*(GB_3485HZ(|L)|GB_3485H(|L)))|(1-2*(CSD_Z1_75473(|A)))|               \
3083      (1-2*(SNCF_2_K363(|L)))|(1-2*(NS_70431E|NS_70774E(|L)))|(1-2*(NOB_K1_VSCHB(|HL)))|                  \
3084      (1-2*(OBB_3_OM751H(|L)))|(1-2*(SBB_60501B(|L)[OB:BOX25|BOX8|GRANIT2,,12])))
3085
3086  # EP 3 Passenger long distance
3087  $DEF F3PD=(<SNCF_3EST_1B9JL,2*SNCF_3EST_3A8JL,SNCF_3EST_3BRJL,2*SNCF_3AOC48_B10GJ,SNCF_3EST_1B5DJ)|     \
3088      (<SNCF_3EST_1B5DJL,2*SNCF_3AOC48_B10GJL,SNCF_3EST_3BRJ,2*SNCF_3EST_3A8J,SNCF_3EST_1B9J)|            \
3089      (<SNCF_3TOR_A5DHL,2*SNCF_3TOR_B(9|10)HL,CIWL_WR_D3A,SNCF_3TOR_A8HL,SNCF_3TOR_A4B4HL,                \
3090      2*SNCF_3TOR_B(9|10)HL,SNCF_3(PAEAL21M|TP21M)(|L))|                                                  \
3091      (<(2*SNCF_3TOR_B(9|10)H),SNCF_3TOR_A4B4H,SNCF_3TOR_A8H|SNCF_METSO48_A812M,CIWL_WR_D3AL,             \
3092      2*SNCF_3TOR_B(9|10)H,SNCF_3TOR_A5DH)|                                                               \
3093      (<SNCF_3TOR_A5DHL,2*SNCF_3TOR_A8HL|SNCF_METSO48_A812ML,5*SNCF_3TOR_B10HL,SNCF_3TOR_A4B4HL)|         \
3094      (<5*SNCF_3TOR_B10H,SNCF_3TOR_A4B4H,2*SNCF_3TOR_A8H,SNCF_3TOR_A5DH)|                                 \
3095      (<SNCF_3(PAEAL21M|TP21M)(|L),SNCF_PA16BM|SNCF_PA16BML,SNCF_3ESTDD2PM(|L)|SNCF_3ESTDD2M,             \
3096      2*SNCF_3TOR_B9HL,SNCF_3TOR_B10HL,SNCF_3TOR_A4B4L,CIWL_4WRT3341M(|L),SNCF_3TOR_A9M,SNCF_3TOR_A9ML,   \
3097      2*SNCF_3TOR_B10HL)
3098
3099  # EP 3 Passenger regional cars ex DRG
3100  $DEF F3PRD=(<SNCF_DR2E30_A6TG|SNCF_DR2E30_A6TGL,SNCF_ARM18_B6TF|SNCF_ARM18_B6TFL,SNCF_DR23,             \
3101      SNCF_DR_BAT_B7TG,SNCF_DR_BAT_B612TG,SNCF_SEMIMET2O_B6|SNCF_SEMIMET2O_B6L,                           \
3102      SNCF_SEMIMET2O_B7|SNCF_SEMIMET2O_B7L,SNCF_DR28D)|                                                   \
3103      (SNCF_3PA10L,SNCF_DR28D,SNCF_DR_BAT_B,SNCF_DR23,SNCF_DR2E_TNL,SNCF_SEMIMET2O_B6)
3104
3105  # EP 3B Passenger Region Sud-Est 5
3106  $DEF F3PRSE=(<PLM_B4DTM,6*PLM_B8TM(|L),PLM_B4DTML)|(>PLM_B4DTML,6*PLM_B8TM(|L),PLM_B4DTM)|              \
3107      (<SNCF_3MET3_B4DM,2*SNCF_3MET3_B8M(|L),SNCF_3MET3_A7M(|L),2*SNCF_3MET3_B8M(|L),                     \
3108      SNCF_3MET3_A3B4M(|L),SNCF_3MET3_B8M(|L))|                                                           \
3109      (2*SNCF_ROME_BM(|L),SNCF_ROME_AM(|L),3*SNCF_ROME_BM(|L),$DIR(SNCF_ROME_BDM,SNCF_ROME_BDML))
3110
3111  # EP 3B Passenger  Grandes lignes Est
3112  $DEF F3PRES=(SNCF_EST_DD2M|SNCF_DD2_METEST_WL_VML),2*SNCF_BRUHAT_GM,SNCF_AOC_A8G0M(|L),2*SNCF_BRUHAT_GM
3113
3114
3115  # EP 3 Freight short
3116  $DEF F3FS=(4-5*(SNCF_3A_K363L|SNCF_3A_K363|SNCF_3A_K437L|SNCF_3A_K437|SNCF_3A_KF437HL|SNCF_3A_KF437H|   \
3117      SNCF_3A_LL|SNCF_3A_L|SNCF_3A_L_BL|SNCF_3A_L_B))|(5-8*(SNCF_ELO[O:BETTERAVES_2E(1|2)(|[M])]))|       \
3118      (3-4*(SNCB_3A_5030A2(|L)|SNCB_3B_5030A2(|V)(|L)))|(3-4*(SNCF_3A_HJYF(|L)|EVS_HS_CIMT(|O)M))|        \
3119      (3-4*EVS_HS_SNAV2(OM|UM|_SRVVM|_SRLVM|_RENAULTM))|(4-5*SNCF_3_LYW4(1|2)2(|L))|                      \
3120      (4-5*(SNCF_3A_HK(F_VB|F_VBL|_VB|_VBL|_VBU)))|(3-4*SNCF_GS402(A|B|C|D))|                             \
3121      (3-4*SNCF_TREMIE(_FER2M|VBML|VBM))|(3-4*SNCF_UHS_MILKM)|                                            \
3122      (4-5*(STEF_I_CADOUX_STEF_E3M|SNCF_I_STEF_BERLINM|STEF_I_DRISO_STEF1M|STEF_I_UIC_STEF_E3M|           \
3123      STEF_I_TPISO_STEFM))|(3-4*SGW_DM40_FANE_E3M(|L))|                                                   \
3124      (<SNCF_HMYV_EXTRML[OB:(CAMIONBACHE1|BUSSING_SAK2|BUSSING_NAG4500|BUSSING_T2|SAURER_5D_EAG1),38,8],  \
3125      SNCF_HMYV_EXTRM[OB:(CAMIONBACHE1|BUSSING_SAK2|BUSSING_NAG4500|BUSSING_T2|SAURER_5D_EAG1),38,8])|    \
3126      (4-5*(SNCF_TREMIE_MH30_SGMFM|SNCF_TREMIE_MH30_GFM|SNCF_TREMIE_MH30_GCM|SGW_MH30_E4M|                \
3127      SGW_MH30_SGMF_E3M|SGW_MH45_SCRC_E3M(|L)))|(4-5*SGW_EF_(E3M|E3AM|ARBEL_E3M))|                        \
3128      (4-5*(PLM_E07MM(|L)[OB:COAL4(5|3)(|[M]),,24]|                                                       \
3129      SNCF_TOW_VILLACH(|MET)M[OB:(COAL50|FR_COAL1)(|[M]),,26]|                                            \
3130      SNCF_E_KLAGENFURT(1|M)M[OB:(COAL50|FR_COAL1)(|[M]),,25]))|(4-5*SNCF_G_UIC_(BOIS_RWM|RWM|RWPEM))|    \
3131      (4-5*SNCF_G(_EST20TM|_EST20TRM|_EST20TFML|_EST20TFM|_ETAT1904M|_OCEM19M|_OCEM19RWM|M1_21M|          \
3132      _OCEM29M|_OCEM29BML|_OCEM29BM|_STDAM|_STDA_RWM|_STDB_RWM))|                                         \
3133      (4-5*(SNCF_E_LINZM[O:BARREL8[BC:-5,-30],29,21][O:BARREL8[BC:-5,-30],7,21]                           \
3134      [O:BARREL8[BC:-5,-30],35,21]))|(3-4*(SGW_3TH40_CFMCF35HRWM(|L)[OB:#SCRAP_1(3|2|4|5)(|[M]),,33]));
3135
3136
3137  # EP 3 Freight long
3138  $DEF F3FL=4-5*F3FS
3139
3140  # EP 3 Freight long steam
3141  $DEF F3FLS=SNCF_(UK6_14BM(|L)|FOURG_WD_BM|3FOURG_OCEM2M(|L)|STDD_E3M(|L)|RWM(|L)),F3FL
3142
3143  # EP 3 Freight Cerales short
3144  $DEF F3FCR=(3-4*(SNCF_3CER3E_RICHARD1_CTCM|SNCF_3CER3E_RICHARD1_CTC_COTRAMM)(|L))|                      \
3145      (3-4*(SNCF_3CER2EFRB_CTCM)(|L))|(3-4*(SNCF_3CER2EFRC_CTCM)(|L))|(3-4*(SNCF_CER2E47FG_ALGECO_E3M))|
3146
3147  # EP 3 Freight Cerales short
3148  $DEF F3FCS=2-3*F3FCR
3149
3150  # EP 3 Freight Cerales long
3151  $DEF F3FCL=7*F3FCR
3152
3153  # EP 4 Passenger Long distance
3154  $DEF F4PD=(<SNCF_UIC_A7DYL,2*SNCF_UIC_A9_1967L,SNCF_874470SYL,SNCF_Y_WRRB,,SNCF_UIC_A4B5YL,             \
3155      5*SNCF_875970SYL)|                                                                                  \
3156      (<5*SNCF_875970SY,SNCF_UIC_A4B5Y,SNCF_Y_WRRBL,SNCF_874470SY,2*SNCF_UIC_A9_1967,SNCF_UIC_A7DY)
3157
3158  # EP 4 Passenger Long distance le Mistral
3159  $DEF F4PM=(<SNCF_M69_A4DTUXJ,SNCF_M69_A8UJL,SNCF_M69_A8UJ,SNCF_M69_A3RTUJ,SNCF_M69_A8UJL,               \
3160      SNCF_M69_A8UJ,SNCF_M69_VRUJ,SNCF_M69_A8TUJL,SNCF_M69_A4DTUXJL)|                                     \
3161      (<SNCF_M69_A4DTUXJ,SNCF_M69_A8TUJ,SNCF_M69_VRUJ,SNCF_M69_A8UJ,SNCF_M69_A8UJ,SNCF_M69_A3RTUJL,       \
3162      SNCF_M69_A8UJL,SNCF_M69_A8UJ,SNCF_M69_A4DTUXJL)
3163
3164  # EP 4 Freight shunting
3165  $DEF F4FR=(3-5*((SNCF_E_UIC2_SGWS|SNCF_E_UIC2S|SNCF_E_UIC2)[OB:SCRAP3(|[M]),,27|26]))|                  \
3166      (3-5*(SNCF_EAOS(1|2|3)[OB:SCRAP_1(2|3|4|5)(|[M]),,30|29]))|(3-5*SNCF_GAS(|1|1B|1C|1D|1E)(|L))|      \
3167      (3-5*SNCF_GAS(2B|2|2B|2C|2D|2E|2F)(|L))|(3-5*(SNCF_Z_ELF2|SNCF_Z_ELF1))|                            \
3168      (3-5*(SNCF_Z_ELF2|SNCF_Z_ELF1))|(3-5*(SNCB_4A_HF2040(|L)|SNCF_EVS_SNAV_RENAULTM))|                  \
3169      (3-5*EVS_HS_SNAV4(M|YM|YSM|_CHAMPM|PM_PEUG1ML|PM_PEUG1M|PM_PEUG2ML|PM_PEUG2M))|                     \
3170      (3-5*(SNCF_EOS40(|A)M[OB:(COAL50|FR_COAL1)(|[M]),,30]||(3-4*SNCF_4FFS6094(|L))|                     \
3171      SGW_4TH30VRWM[OB:(COAL50|FR_COAL1)(|[M]),,26]))|(3-5*(SNCF_R_TP_BB_E4M[OB:BOX6,,13]))|              \
3172      (3-5*(SNCF_4_GS311(|A|F|AF|B|BF|BS1|BS1F)(|L)|SNCF_4_GS312(|A|B|BS1)(|L)|SNCF_4_GS313(|A|B|BS1)(|L)))| \
3173      (3-5*(SNCF_UASJFL|SNCF_UASGSSL|SNCF_UAGPPS1UL|SNCF_UASGSS|SNCF_UAGPPS1C|SNCF_UAGPPS1CL|             \
3174      SNCF_UAGPPS1U|SNCF_UASJF|SNCF_UASGNTL|FS_UASSMG|SNCF_UASGNT|SNCF_UAGPPS1EL|SNCF_UAGPPS1E|           \
3175      SNCF_UASTCL|SNCF_UASTC|SNCF_UASTCECL|SNCF_UASTCEC))|(3-4*SNCF_I(71SM|71M|87M|87FM))|                \
3176      (3-5*SNCF_G(S2_12M|HKS605BM|4BOISM|4M|S402EM))|(3-5*SNCF_G(ASS9_16AM|ASS9_16M|12M|13_SERNAMG2M))|   \
3177      (3-4*(SNCF_E9_31M[OB:#SCRAP_1(3|2|4|5)(|[M]),,24]))|(3-4*(SNCF_TMSM|SNCF_T001M|SNCF_TMS_SM))|       \
3178      (3-4*(SNCF_4K_OCEM29M[OB:SCHALE(1|2)(|[M]),,12]))|(3-4*SGW_DM(40AM|53_SITRAM_E3M))|                 \
3179      (3-4*(SNCF_FLBS_MK_SIMOTRAM|SGW_MKANF81_SIMOTRAM))|(3-4*SNCF_I87M(|L))|                             \
3180      (3-4*((SGW_TH_BAIGNOIRE_SCRC|SNCF_EALMO_TH_STEMIM|SNCF_EALMO_THM|SNCF_EALMO_TH_ARBELM|              \
3181      SNCF_EALMO_TH_SIMOTRAM)[OB:SAND(10|9|11|12)(|[M]),,31]))|                                           \
3182      (3-4*SNCF_UCS_MARIAGE34_(BMP1M|BMP2M|OMYAM))|(4-5*SNCF_EOS40(|A)M[OB:SCRAP3(|[M]),,31])|            \
3183      (3-4*((SGW_TH_FRANGECOM|SGW_EAOS_BSPRM|SGW_EAOS_BMM)[OB:#SCRAP_1(3|2|4|5)(|[M]),,33]))|             \
3184      (3-4*(SGW_4TH40ARBELM(|L)[OB:#SCRAP_1(3|2|4|5)(|[M]),,27]))|                                        \
3185      (3-4*(SNCF_EVSM|SNCF_UCS_EVS1M|SNCF_UCS_EVS2M|SNCF_UCS_OMYAM|SNCF_UCS_OMYA2M))|                     \
3186      (3-4*(SNCF_4PRIM_PLM34FM|SNCF_4PRIM_OCEM29M|SNCF_GOS719M|SNCF_G79M))|                               \
3187      (2-3*SNCF_LGS_N(VM|CM)[O:C6(0|10)_E4,11,12][O:C6(0|10)_E4,73,12],SNCF_4UFSS9196(B|A))
3188
3189  # EP 4 Freight short
3190  $DEF F4FS=2-3*F4FR
3191
3192  # EP 4 Freight long
3193  $DEF F4FL=6*F4FR
3194
3195  # EP 4 Freight Cerales short
3196  $DEF F4FCR=(3-4*SNCF_CER2EFR(B_TC_CTC|D_CTC|D_TC_CTC)M(|L))|(3-4*SNCF_CER2EFR(D_TC_SOFIDIC)M(|L))|      \
3197      (3-4*(SNCF_CER2E47FG_TC_ALGECOM|SNCF_CER2E47FG_TC_SHGTM))|                                          \
3198      (3-4*(SNCF_CER2E43_TC_UNCACM|SNCF_CER2E43_TC_SLEMIM)(|L))|(3-4*(SNCF_CER2EM|SNCF_CER2E_TCM))|       \
3199      (3-4*(SNCF_CEREX3E_RICHARD1_COTRAMM|SNCF_CEREX3E_RICHARD1_ESMERYM)(|L))
3200
3201  # EP 4 Freight Cerales short
3202  $DEF F4FCS=2-3*F4FCR
3203
3204  # EP 4 Freight Cerales long
3205  $DEF F4FCL=7*F4FCR
3206
3207  # EP 5 Passenger long distance
3208  $DEF F5PC=(<SNCF_VTU_B51_2L,SNCF_VTU_B51_2,                                                             \
3209      3*(SNCF_VTU_A2R|SNCF_VTU_A10UL|SNCF_VTU_A10U|SNCF_VTU2_A10UL|SNCF_VTU2_A10U|SNCF_VTU_A10L|          \
3210      SNCF_VTU_A10|SNCF_VTU_A10AL|SNCF_VTU_A10A|SNCF_VTU_A10BL|SNCF_VTU_A10B|SNCF_VTU_A10CL|              \
3211      SNCF_VTU_A10C|SNCF_VSE_A9U_COL|SNCF_VSE_A9U_CO|SNCF_VSE_A9U_CSL|SNCF_VSE_A9U_CS|SNCF_A9U_VSEL|      \
3212      SNCF_A9U_VSE|SNCF_VTU_A2RL),SNCF_VTU_B5RXL,                                                         \
3213      5*(SNCF_VTU_B11L|SNCF_VTU_B11|SNCF_VTU_B11AL|SNCF_VTU_B11A|SNCF_VTU_B11BL|SNCF_VTU_B11B|            \
3214      SNCF_VTU_B11CL|SNCF_VTU_B11C|SNCF_VTU_B11DL|SNCF_VTU_B11D|SNCF_VTU2_B10UL|SNCF_VTU2_B10U|           \
3215      SNCF_VTU_B10L|SNCF_VTU_B10|SNCF_VTU_B10AL|SNCF_VTU_B10A|SNCF_VTU_B10BL|SNCF_VTU_B10B|               \
3216      SNCF_VTU_B10CL|SNCF_VTU_B10C|SNCF_VTU_B10DL|SNCF_VSE_B11U_COL|SNCF_VSE_B11U_CO|SNCF_VSE_B11U_CSL|   \
3217      SNCF_VSE_B11U_CS|SNCF_VTU_B10D|SNCF_B11U_VSEL|SNCF_B11U_VSE),                                       \
3218      SNCF_VTU_A5B5UL|SNCF_VTU_A5B5U|SNCF_VSE_A4B6U_ORIGL|SNCF_VSE_A4B6U_ORIG|SNCF_VSE_A4B6U_COL|         \
3219      SNCF_VSE_A4B6U_CO|SNCF_VSE_A4B6U_CSL|SNCF_VSE_A4B6U_CS|SNCF_VTU2_A5B5UL|SNCF_VTU2_A5B5U|            \
3220      SNCF_VTU_A5B5L|SNCF_VTU_A5B5)
3221
3222  # EP 5 Freight short
3223  $DEF F5FS=(4-5*(SNCF_R55M|SNCF_R56M|SNCF_R57M|SNCF_ROOS516M)[OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),152,12]   \
3224      [OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),104,12][OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),10,12]                   \
3225      [OB:WOOD17(1|2|3|4|5|6|7|8)(|[M]),56,12])|(4-5*SNCF_RILS0(1|4|5|6))|                                \
3226      (4-5*RTRAN_(TE2|T1|TE1|TE3|TE4|PLC2A|PLC2B)M)|(4-5*(SNCF_ERMEWASATI_PM|GT1|ERMEWA_ZAS1(|L)))|       \
3227      (4-5*SNCF_H8(1_6UNIMETALM|7M))|(4-5*SNCF_L31M[OB:CLAAS_01,,11])|                                    \
3228      (4-5*(SNCF_FAPS_SIMOTRAM|SGW_FAPS_SIMOTRAMALETM|SGW_EX100_ROYM)(|L))|                               \
3229      (4-5*SNCF_T(87M|90M|ANPPS_TRANSENGRAIS1M))|(3-4*SNCF_FG128M(|L))|                                   \
3230      (4-5*(SNCF_ORVAL80AEM|SNCF_ORVAL80AKM|SNCF_ORVAL80BEM|SNCF_ORVAL80B_COFRABLACKEM|                   \
3231      SNCF_ORVAL80B_COFRABLACKBM|SNCF_ORVAL80BKM)(|L))
3232
3233
3234  # EP 5 Freight long
3235  $DEF F5FL=5-6*F5FS
3236
3237  # EP 5 Freight Cerales short
3238  $DEF F5FCR=(3-4*(SNCF_CER2E50B_SAND1M|SNCF_CER2E4_SOUF1M)(|L))|                                         \
3239      (3-4*(SNCF_CER2E50B_CTCM|SNCF_CER2E50B_ESMERYM)(|L))|                                               \
3240      (3-4*(SNCF_CER2E50B_CANAM|SNCF_CER2E50B_GUYOMARCHM|SNCF_CER2E50B_MJGM)(|L))|                        \
3241      (3-4*(SNCF_CER2E50B_ERMEWAM|SNCF_CER2E50B_GMBM)(|L))|                                               \
3242      (3-4*(SNCF_CER2E1_UNCACM|SNCF_CER2E53BRA_TCM(|L)|SNCF_CERE2E53BRC_TC(|L)))|                         \
3243      (3-4*(SNCF_CERE2E53BRB_FRLUZM|SNCF_CERE2E53BRB_TCM|SNCF_CERE2E53BRB_TC_MROM|SNCF_CERE2E53BRC_TCM)   \
3244      (|L))|(3-4*(SNCF_CER2E70_TMFCITA1M|SNCF_CER2E70_TMFCITA2M|SNCF_CER2E70_CTCM)(|L))|                  \
3245      (3-4*(SNCF_CERG2_CTCM|SNCF_CERG2_MIDIM|SNCF_CERG2_MROM|SNCF_CERG2_SHGTM|SNCF_CERG2_STEMIM|          \
3246      SNCF_CERG2_TRANSMAGRAINSM)(|L))|(3-4*SNCF_CER2E50B_CANAM(|L))
3247
3248  # EP 5 Freight Cerales short
3249  $DEF F5FCS=2-3*F5FCR
3250
3251  # EP 5 Freight Cerales long
3252  $DEF F5FCL=7*F5FCR
3253
3254  # EP 5 Freight short maintenance
3255  $DEF F5FM=(3-4*G_RGS2[OB:RAIL1,15,12][OB:RAIL1,95,12],3-4*SNCF_RES9_16[NB:B,BA1][O:GRAVEL(1|8)(|[M])],  \
3256      3*SNCF_TDS_INFRA[NT:B])|                                                                            \
3257      (8*SNCF_UAS_S39_6M[O:BALLAST(41|40|39|38|42)(|[M])],2*SNCF_UAS_S39_2VM[OB:FR17,,17])|               \
3258      (8*SNCF_UA_R09_6VM[OB:RAIL5,,12])|                                                                  \
3259      (4*SNCF_US_C12_2VM(|L)[O:FER(3|4)(|[M]),,40],7*SNCF_UAS_D12_6VM(|L)[O:FER(1|2)(|[M]),,40])
3260
3261
3262  # EP 6 Passenger long distance
3263  $DEF F6PC=(<SNCF_VSE_A9U_CPL,SNCF_VTU2_A10U_CP2L|SNCF_VTU_A10U_CP2L,                                    \
3264      SNCF_VSE_A4B6U_CPL|SNCF_VTU_A5B5U_CP2L|SNCF_VTU2_A5B5U_CP2L,SNCF_VTU_B5RX,SNCF_VU_B11U_CP,          \
3265      SNCF_VTU2_B10U_CP2,SNCF_VTU_B10U_CP2,SNCF_VSE_B11U_CPL,SNCF_VU_B9UX_CP)|                            \
3266      (<SNCF_VTU_B5RX,SNCF_VU_B11U_CP,SNCF_VTU2_B10U_CP2,SNCF_VTU_B10U_CP2,SNCF_VSE_B11U_CPL,             \
3267      SNCF_VU_B9UX_CP,SNCF_VSE_A4B6U_CP|SNCF_VTU_A5B5U_CP2|SNCF_VTU2_A5B5U_CP2,SNCF_VSE_A9U_CP,           \
3268      SNCF_VTU2_A10U_CP2|SNCF_VTU2_A10U_CP2)
3269
3270  # EP 6 Freight short
3271  $DEF F6FS=(4-5*(SNCF_AIR_LIQUIDE|SNCF_AIR_LIQUIDE2|GATX_13(|L)|SBB_MOTOREX(|L)))|                       \
3272      (4-5*(DB_HABIS7TW5|SNCF_HABIS_KRONENBOURG))|(4-5*SNCF_RILS0(1|2|3|4|5|6))|                          \
3273      (4-5*SNCF_HBILLNS(1|2|3|5|6|7|9|10|11|12|13|1L|3L|4L|6L|7L|8L|9L|10L|11L|12L|13L))|                 \
3274      (4-5*SNCF_H8(1_6UNIMETALM|7M))|(4-5*SNCF_(EAOS4|EAOS80_SGW)[OB:SCRAP(6|4|5)(|[M]),,32])|            \
3275      (4-5*(SNCF_HFS(1|2|3|4)))|(4-5*G_ZAES_HR|SNCF_ZANS_SIMOTRA)|(4-5*SNCF_GS402(A|B|C|D))|              \
3276      (4-5*(SNCF_GHKS(1|2)))|(4-5*(SNCF_RILS216|SNCF_GASS9_16))|                                          \
3277      (4-5*(SNCF_UAHS1|INFRA_UAS_D12_6(|L)|SNCF_G41BETAIL))|(2-3*SNCF_SLMMPS96_6M[O:STEEL2(7|8|9|5|6)])|  \
3278      (4-5*(SNCF_GAS86|SNCF_GOS70|SNCF_GOS70_SERNAM))|(4-5*(SNCF_68ACETATEVINYLE|SNCF_FS_LAROCHETTE))|    \
3279      (4-5*SNCF_KANGB_CNC_VIM[O:WB121,,12])|(4-5*(SNCF_T90M|SNCF_TANPPS_TRANSENGRAIS2M))|                 \
3280      (4-5*ERMEWA_CARBONATE(1|2|3)M(|L))|                                                                 \
3281      (4-5*(SNCF_UACS_SIMOTRAM|EVS_UACS64_TRANSPULM|SNCF_UACS_CALCIAM)(|L))|                              \
3282      (4-5*(FWAG_TAMS_M30M|SNCF_T13M|SNCF_T13AM|SNCF_T13BM|SNCF_T13_BSFM|SNCF_T13_BMFM)(|L))
3283
3284  # EP 6 Freight long
3285  $DEF F6FL=4-5*F6FS
3286
3287  # EP 6 Freight Cerales short
3288  $DEF F6FCR=(3-4*(SNCF_CER2E47BR_FLUZ|SNCF_CER2E47BR_TCM|SNCF_CER2E43EM|SNCF_CER2E43_MBLANCM|            \
3289      SNCF_3CER2E43_SAND1M|SNCF_CER2E43_SAND1M|SNCF_CER2E43_TC_SLEMIM|SNCF_CER2E48_CAPM|                  \
3290      SNCF_CER2E48_MBLANCM|SNCF_CER2E48_UCAM|SNCF_CER2E50AEM|SNCF_3CER2E50A_CLECHETM|SNCF_CER2E2_MFSM|    \
3291      SNCF_CER2E50A_MROM|SNCF_CER2E50A_SICALRPM|SNCF_CER2E50A_STEMIM|SNCF_CERCAD50_STORIONE2|             \
3292      SNCF_CERE2E53BRB_TC|SNCF_CERE2E53BRB_TC_MRO|SNCF_CER2E53BRA_TC|SNCF_CERE2E53BRB_FRLUZ)(|L))|        \
3293      (3-4*(SNCF_CERG96M|SNCF_CERG96WM|SNCF_CERG96_AGRI1M|SNCF_CERG96_AGRIM|SNCF_CERG96_GOUESSANTM|       \
3294      SNCF_CERG96_GUYM|SNCF_CERG96_INVIVOM|SNCF_CERG96_UCAM|SNCF_CERP84_MROM)(|L))|                       \
3295      (3-4*(SNCF_CERG_TCVEM|SNCF_CERP86_TCV_CTCM|SNCF_CER96P1_TCVE_CTCM|SNCF_CERP86_TCV2_CTCM|            \
3296      SNCF_CERP96H_TCV_CTC1M|SNCF_CERP86_TC_CMTM|SNCF_CERP84R_CTCM|SNCF_CERP96_TC_CTCM|                   \
3297      SNCF_CERP96P2_TCVE_CTCM|SNCF_CERP96P2_TCV_CTCM|SNCF_CERG96_TCV2_CTCM|SNCF_CER2E48_TC_CTCM|          \
3298      SNCF_CER2E43_TC_CTCM|SNCF_CER2E45_CTCM|SNCF_CER2E45TC_CTCM|SNCF_FG132_CTCM|                         \
3299      SNCF_CERFG96P3_TCV_CTCM|SNCF_CERG4_CTCM)(|L))|                                                      \
3300      (3-4*(MILLET_CEREG95M|MILLET_CERG95PTMM|MILLET_CER96P1M|MILLET_CER96P2M|MILLET_CERG132M)(|L))|      \
3301      (3-4*(SNCF_CERG96_SOUFFLET2M|SNCF_CERP86_TC_CAM|SNCF_CERP86_TC_SATIM)(|L))|                         \
3302      (3-4*(SNCF_CERP84R_GMMM|SNCF_CERP84R_FWM|SNCF_CERP84R_CIWCM|SNCF_CERP84_ESMERYM|SNCF_CERP84_STEMIM) \
3303      (|L))|                                                                                              \
3304      (3-4*(SNCF_CERFG96P3_TCVE_ERMEWAM(|L)|SNCF_CERP_ERMEWAGM|SNCF_CER94P_ERMEWAM(|L)|                   \
3305      SNCF_CER2E50A_ERMEWAM(|L)|SNCF_CERG92_ERMEWAM(|L)|SNCF_CER2E48_ERMEWAM(|L)|                         \
3306      SNCF_CER2E43_ERMEWAM(|L)|SNCF_CERP84R_ERMEWAM(|L)))|(3-4*(SNCF_CERP86M|SNCF_CERP86_TMFCITAM)(|L))|  \
3307      (3-4*(SNCF_CERP96P2_TCVM|SNCF_CERFG96P3_TCVEM|SNCF_CERP96P2_TCVEM|SNCF_CERG96_TCV2M|                \
3308      SNCF_CERP86_TCVM|SNCF_CERP96P2_TCVE_TRANSMAGRAINSM|SNCF_CERP96P2_TCV2_CIWCM|                        \
3309      SNCF_CERP96P2_TCV2_INVIVOM)(|L))|                                                                   \
3310      (3-4*(SNCF_CERP_CARGILL2M(|L)|SNCF_CER96P1_CARGILL2M(|L)|SNCF_CERP_COOPER(LML|ML)|                  \
3311      SNCF_CERP_SANDERS1M(|L)))|                                                                          \
3312      (3-4*(SNCF_CERP_STORIONEM|SNCF_CERP_TMFCITAEM|SNCF_CERP_SHGT1M|SNCF_CERP_UFACM)(|L))|               \
3313      (3-4*(SNCF_CERP96_BREIZALM|SNCF_CERP_BREIZALM|SNCF_CERG_BREIZALM|SNCF_CERG94G8_BREIZALM)(|L))|      \
3314      (3-4*(SNCF_CERG_CANTALOUML|SNCF_CERG_GMBM(|L)|SNCF_CERG_GRANITM(|L)|SNCF_CERG_GUYM(|L)))|           \
3315      (3-4*(NACCO_CERPM|SNCF_CERP_NACCOM|SNCF_CERG_NACCOM)(|L))|                                          \
3316      (3-4*(SNCF_CER96P1_MONFERM|SNCF_CER2E43_MONFERM|SNCF_CER2E48_MONFERM|SNCF_CERG96_MONFERM|           \
3317      SNCF_CER2E50A_MONFERM)(|L))|(3-4*(SNCF_CERP84_SOUFFLETM|SNCF_CERG94_SOUF3M)(|L))|                   \
3318      (3-4*(SNCF_CERG94_TMFCITAPLM|SNCF_CERG_INVIVO1M|SNCF_CERG_INVIVOM|SNCF_CERG_SIGMAM)(|L))|           \
3319      (3-4*(SNCF_CERG94G_UCAM|SNCF_CERG94G8_UCAM|SNCF_CER96P1_UCAM|SNCF_CERP102FG_UCAM)(|L))|             \
3320      (3-4*(SNCF_CERFG96P3_COOPER(ML|LML)|SNCF_CERFG96P3_GUYOMARCH1M(|L)))|                               \
3321      (3-4*(SNCF_CERP92_COOPAGRIM|SNCF_SUCREFGM|SNCF_CERP_MBLANCM|SNCF_CERP102FGM)(|L))|                  \
3322      (3-4*(SNCF_CERG4_ALGECOM|SNCF_CER96P1_TMFCITANM|SNCF_CERP102FG_GOUESSANTM)(|L))|                    \
3323      (3-4*(SNCF_CERP96HKP_TMFCITAM|SNCF_CERP96D_TMFCITAM|SNCF_CERG102_TMFCITAM)(|L))
3324
3325  # EP 6 Freight Cerales short
3326  $DEF F6FCS=2-3*F6FCR
3327
3328  # EP 6 Freight Cerales long
3329  $DEF F6FCL=7*F6FCR
3330
3331  # EP 6 Freight tank long
3332  $DEF F6FTL=15*(SNCF_CITVIN_DANZAS12M(|L)|SNCF_CITVIN_ERMEFERM|SNCF_CITVIN1304_ERMEFERM|                 \
3333      SNCF_CITVIN1304_ERMEWAJUS1UNIFERM|SNCF_CITVIN_ERMEWAJUS1M|SNCF_CITVIN1304BI_MONFERLM|               \
3334      SNCF_CITVIN_LOTRAS12M(|L)|SNCF_CITVIN_MUSCADOR13M(|L)|SNCF_CITVIN_LOTRAS13M(|L))
3335
3336  # EP 6 Freight short maintenance
3337  $DEF F6FM=(3-4*G_RGS2[OB:RAIL1,15,12][OB:RAIL1,95,12],3-4*SNCF_RES9_16[NB:B,BA1][O:GRAVEL(1|8)(|[M])],  \
3338      3*SNCF_TDS_INFRA[NT:B])|                                                                            \
3339      (8*SNCF_UAS_S39_6M[O:BALLAST(41|40|39|38|42)(|[M])],2*SNCF_UAS_S39_2VM[OB:FR17,,17])|               \
3340      (8*SNCF_UA_R09_6VM[OB:RAIL5,,12])|                                                                  \
3341      (4*SNCF_US_C12_2VM(|L)[O:FER(3|4)(|[M]),,40],7*INFRA_UAS_D12_6M(|L)[O:FER(1|2)(|[M]),,40])
3342
3343  #----------------------------------------------------------------------------------------------------
3344  #
3345  # LUXEMBURG
3346
3347  # EP 3 Freight short
3348  $DEF L3FS=(2-3*SNCF_GAS(|2))|(2-3*(CFL_GS1))|(2-3*(CFL_3_TTOWB(|L)[O:SUGARBEET3(|[M]),,28]))|           \
3349      (2-3*(NS_KBS1))|(2-3*(SNCB_3A_4422000(|L)|SNCB_3A_4422762E(|L)|SNCB_3A_4427500(|L)))|               \
3350      (2-3*(NS_GBLS))|(2-3*(CFL_3_UKK(|L)[OB:BOX(34|25|23),14,11][OB:BOX(34|25|23),59,11]))|              \
3351      (2-3*SNCB_3A_257001U(|V))
3352  # EP 3 Freight long
3353  $DEF L3F1=8-9*L3FS
3354
3355  # EP 4 Freight short
3356  $DEF L4FS=(2-3*CFL_TMSM)|(3-4*CFL_FCS_B1M[OB:FER(3|4)M(|[M]),,40])|(2-3*CFL_4_GBLS_ALB(|L))|            \
3357      (2-3*CFL_4_ES(|L))|(2-3*(CFL_4_GKKS1301(|L)|CFL_4_GKKS1301AL(|L)))|(3-5*CFL_GS(1|1L|2))
3358
3359  # EP 4 Freight long
3360  $DEF L4F1=5*(L4FS|F4FR|D4FK1)
3361
3362  # EP 5 Freight short
3363  $DEF L5FS=(2-3*CFLC_FAS_B1M)
3364
3365
3366  # EP 6 Freight shunting
3367  $DEF L6FR=(3-4*(CFL_SHIMMNSSL|CFL_SHIMMNSS|ERR_CFL_SHIMMNSL|ERR_CFL_SHIMMNS))|(3-4*CFL_KS)|             \
3368      (3-4*CFL_SHIMMNSS(|L))|(3-4*CFLC_RILNSS(3|8|7|7L|6|5|5L|4|9|10|11|12|11L))|                         \
3369      (3-4*(CFL_RILNSSM|CFLC_RILNSS1M|CFLC_RILNSS2M))|(3-4*CFL_FCS(1|2|3)M[OB:FER(3|4)M(|[M]),,40])|      \
3370      (3-4*CFL_RENSSM[OB:PYLON3,15,12][OB:PYLON3,100,12])|(3-4*CFL_TDGSM)
3371  # EP 6 Freight short
3372  $DEF L6FS=2*L6FR
3373  # EP 6 Freight long
3374  $DEF L6FL=5*L6FR
3375
3376
3377  #----------------------------------------------------------------------------------------------------
3378  #
3379  # BELGIUM
3380
3381  # EP 2 Passenger
3382  $DEF B2P1=(<SNCB_2_M1C8PL,2*SNCB_2_M1C10(|L),SNCB_2_M1B5C4(|L),2*SNCB_2_M1C10(|L))|                     \
3383      (<(2*SNCB_2_M1C10(|L)),SNCB_2_M1B5C4(|L),2*SNCB_2_M1C10(|L),SNCB_2_M1C8P)
3384
3385  # EP 3 Passenger
3386  $DEF B3P1=(<SNCB_3_M1B8DPL,3*SNCB_34_M1B10(|L),SNCB_34_M1A5B4(|L),SNCB_34_M1B10(|L))|                   \
3387      (<SNCB_34_M1A5B4(|L),3*SNCB_34_M1B10(|L),SNCB_3_M1B8DP)
3388
3389  # EP 3 Freight short 3A
3390  $DEF B3FS=(2-3*SNCF_GAS(|2))|(2-3*(CFL_GS1))|(2-3*(SNCF_RORYW[OB:BETON4,25,13][OB:BETON3,112,12]))|     \
3391      (2-3*(NS_KBS1))|(2-3*(SNCB_3A_4422000(|L)|SNCB_3A_4422762E(|L)|SNCB_3A_4427500(|L)))|               \
3392      (2-3*(NS_GBLS))|(2-3*(SNCB_G(9|10)A))|(2-3*SNCB_3_103800(|U)(|L))|                                                          \
3393      (2-3*(SNCB_3A_257001U(|V))|(2-3*SNCB_3A_4(1|2)0000(|L)[O:COAL(40|42|20)(|[M])]))
3394  # EP 3 Freight long 3A
3395  $DEF B3F1=7-8*B3FS
3396
3397  # EP 3 Freight short 3B
3398  $DEF B3F2S=(2-3*SNCF_GAS(|2))|(2-3*CFL_GS1)|(2-3*(SNCF_RORYW[OB:BETON4,25,13][OB:BETON3,112,12]))|      \
3399      (2-3*(NS_KBS1))|(2-3*(SNCB_3B_(1022500|2286200|2286200B)(|L)[OB:SAND5(|[M]),,27]))|                 \
3400      (2-3*SNCB_3_1038200(|L))|(2-3*SNCB_3B_4427500)|(2-3*NS_GBLS)|(2-3*SNCB_G(9|10)A)|                   \
3401      (2-3*SNCB_3_5030(|L))|(2-3*SNCB_3B_4(1|2)0000(|L)[O:COAL(40|42|20)(|[M])])|                         \
3402      (2-3*SNCB_3B_6600[OB:BOX33(|[M]),,12])|(2-3*SNCB_3B_1038600(|U)(|L))
3403
3404  # EP 3 Freight long 3B
3405  $DEF B3F2=7-8*B3F2S
3406
3407  # EP 4 Pessenger Regional 4a
3408  $DEF B4PR1=(<SNCB_4LA6DL|SNCB_4LB6DL,SNCB_4LA8L|SNCB_4LA8,2*SNCB_4LB8,SNCB_4LB8L)|                      \
3409      (<(2*SNCB_3LB8),SNCB_3LA8L,SNCB_3LA4B4L|SNCB_3LA4B4|SNCB_3LA4B4L,2*SNCB_3LB8L,                      \
3410      SNCB_3LB6D|SNCB_3LA6D)|(<SNCB_K1ARDML,3*SNCB_K1B1M(|L))|(<3*SNCB_K1B1M(|L),SNCB_K1ARDM)|            \
3411      (<SNCB_K2BDM2L,3*SNCB_K2B(1|2)M(|L))|(<3*SNCB_K2B(1|2)M(|L),SNCB_K2BDM2)|                           \
3412      (<SNCB_K1BD(4|3)ML,SNCB_K1AB1M(|L),2*SNCB_K1B1M(|L))|                                               \
3413      (<SNCB_K1AB1M(|L),2*SNCB_K1B1M(|L),SNCB_K1BD(4|3)M)|                                                \
3414      (<SNCB_M2GBM(|L),SNCB_M2GABM(|L),SNCB_M3_BM(|L),SNCB_M2GBM(|L),SNCB_M2GBDM)|                        \
3415      (>SNCB_M2GBM(|L),SNCB_M2GABM(|L),SNCB_M3_BM(|L),SNCB_M2GBM(|L),SNCB_M2GBDML)
3416
3417  # EP 4 Freight short 4A
3418  $DEF B4F1S=(2-3*SNCB_4A_E1215A0(|B)(|L)[OB:COAL(40|41)(|[M]),,28])|(2-3*SNCB_LGNSS2)|                   \
3419      (2-3*SNCB_TMS(|L))|(2-3*SNCB_4(_GKKLMS2231|_GLMS2231|GKLMMS)(|L))|                                  \
3420      (2-3*SNCB_4_ELO5510(|L)[OB:TARP19(|[M]),,10])|(2-3*(SNCB_ZANS_CAIB|SNCB_ZANS_ARMITA))|              \
3421      (2-3*SNCB_TADS(1|2|3|4))|(2-3*SNCB_UASCITA)|(2-3*SNCB_4A_UDE9025(|U)(|L))|                                                  \
3422      (2-3*(SGW_MKH61ARBELM|SGW_MKH61ARBEL_SCRCM|SGW_MKH61ARBEL_SOGEWAGM|SGW_MH61ARBEL_SIMOTRAM))
3423
3424  # EP 4 Freight long 4A
3425  $DEF B4F1=7-8*B4F1S
3426
3427  # EP 4 Freight short 4B
3428  $DEF B4F2S=(2-3*SNCB_4B_E1215A0(|B)[OB:COAL(40|41)(|[M]),,28])|(2-3*(SNCB_LGNSS2))|                     \
3429      (2-3*(SNCB_TMS|SNCB_TMS1215B1M)(|L))|(2-3*(SNCB_ZANS_CAIB|SNCB_ZANS_ARMITA))|                       \
3430      (2-3*SNCB_TADS(1|2|3|4))|(2-3*SNCB_UASCITA)|(2-3*SNCB_4_ROOS3514E4(|L)[OB:PIPE_BERGROHR,,12])|      \
3431      (2-3*(SNCB_EAOS_1415A(1|2|3)M[OB:#SCRAP_1(3|2|4|5)(|[M]),,32]))|                                    \
3432      (2-3*SNCB_3614C5M[OB:PIPE7(|[M]),,12])|(2-3*SNCB_1000H0_(CAIBM|VTGM))
3433
3434
3435  # EP 4 Freight long 4B
3436  $DEF B4F2=7-8*B4F2S
3437
3438  # EP 5 EC
3439  $DEF B5PE=(<SNCB_9570NB|SNCB_9570NBL,SNCB_I10_2170NL,SNCB_I10_8870M3|SNCB_I10_8870M3L,SNCB_I6_1970M,    \
3440      2*SNCB_I10_2170N,SNCB_I10_2170NL)
3441
3442  # EP 5 Freight short
3443  $DEF B5FS=(2-4*((SNCB_5_E1215A0(|B)(|L)[OB:COAL(40|41)(|[M]),,28])|(SNCB_E1[OB:COAL(40|41)(|[M]),,27])))| \
3444      (2-4*(NS_EANOS3L|NS_EANOS3|DBAG_5_EAOSX051|DBAG_5_EAOSX051BL|DB_EANOSB|DBC_EANOSX055|               \
3445      DBAG_EALOS_053|DBAG_5_EALOST058VL|DBAG_EALOS058L[OB:PAPER1(|[M]),,32]))|                            \
3446      (2-4*((DBAG_EALOS058,DBAG_5_EALSX063E,SNCB_R1,SNCB_RILS,SNCB_TAEMSL,SNCB_REMMS3514C0M)              \
3447      [OB:GRAVEL1,,16]))|(2-4*SNCB_REMMS3514C0IM[OB:FR_JCB_JS175W,,9])|                                   \
3448      (2-4*SNCB_5_EAOS6501B(2|1A|1B)(|F)(|L))|(2-4*(SNCB_S3614A2M[OB:COIL20H,26,13][OB:COIL20H,72,13]))
3449
3450  # EP 5 Freight long
3451  $DEF B5F1=7*B5FS
3452
3453  # EP 6 Freight short
3454  $DEF B6FS=(3-4*((SNCB_SHMMNS3614E2AM|XPEDYS_SHMMNS3614E2M)[OB:COIL23H,35,12][OB:COIL23H,80,12]))|       \
3455      (3-4*(SNCB_SHIMMNS3614D5AM|SNCB_SHIMMNS3614D9M|SNCB_SHIMMNS3614D9AM|SNCB_SHIMMNS3614L1AM))|         \
3456      (3-4*(SNCB_3614D5_VBM|SNCB_3614L1_VBM))|(3-4*(SNCB_R3514C3AM[O:BETON3,12][O:BETON3,76,18]))|        \
3457      (3-4*((SNCB_SHMMNS3614E1|SNCB_SHMMNS3614E1A)[OB:COIL13,32,15][OB:COIL13,74,15]))|                   \
3458      (3-4*SNCB_FAS(|1415G6A|1415G8|1415G8A)M)|(4-5*BCAR_SDKMS(|L)[O:WB13(5|7|6),,12])|                   \
3459      (3-4*(SNCB_CERP_AMYLUMM|SNCB_CER92P_AMYLUM)(|L))
3460
3461  # EP 6 Freight long
3462  $DEF B6F=(15*(SNCB_FALS1000F9L|SNCB_FALS1000F9|SNCB_FALS1000F9BCVL|SNCB_FALS1000F9BCV|                  \
3463      SNCB_FALS1000F5BCVM))|(5*B6FS)
3464
3465
3466
3467  #----------------------------------------------------------------------------------------------------
3468  #
3469  # NETHERLANDS
3470
3471  # EP 1-2 Freight
3472  $DEF NL12V=SS_83900(|L)|SS_84543|SS_82001(|L)|SS_84500
3473  $DEF NL12OE=(SS_5501[OB:FR_HAYRAKE2,8,12][OB:FR_HAYRAKE2,55,12]|SS_25589L[#E!OB:AG65,*47,19]|           \
3474      SS_25589[#E!OB:AG65,*40,19]|SS_42176[#E!OB:AG85,*49,22]|SS_42176L[#E!OB:AG85,*55,22]|               \
3475      SS_47091L[#E!OB:AG70,*50,26]|SS_47091[#E!OB:AG70,*44,26])
3476  $DEF NL12O=5:(SS_25509[#E!OB:AG75,*44,19]|SS_45301[#E!OB:AG50,*31,23]|SS_43001[#E!OB:AG70,*44,26])|     \
3477      3:(SS_25589[#E!OB:AG65,*47,19]|SS_42176[#E!OB:AG85,*49,22]|SS_42176L[#E!OB:AG85,*55,22]|            \
3478      SS_47091L[#E!OB:AG70,*50,26]|SS_47091[#E!OB:AG70,*44,26])
3479  $DEF NL12GE=(SS_17066|HSM_6526CHD|NS_12201|NS_12701E|NS_12701N|HSM_33226CHD|SS_11169|HSM_10671CHW|      \
3480      NS_23601HE|NS_23601HN|HSM_447|SS_59090|SS_59414|SS_61251|SS_14001)($DIR(,L))
3481  $DEF NL12G=5:(HSM_5041CHD|NS_19001|NS_7801E|NS_7801N|NS_9501|SS_10030|HSM_41976CHWG|NS_21001E|          \
3482      NS_21001N|NS_21426N|SS_15001)|                                                                      \
3483      3:(NS_23601E|NS_23601N|SS_17066|HSM_6526CHD|NS_12201|NS_12701E|NS_12701N|HSM_33226CHD|SS_11169|     \
3484      HSM_10671CHW|NS_23601HE|NS_23601HN|HSM_447|SS_59090|SS_59414|SS_61251|SS_14001)(|L)
3485
3486  $DEF NL12FV=3-15*NL12O,NL12OE
3487  $DEF NL12FO=3-15*NL12O,NL12OE
3488  $DEF NL12FG=3-15*NL12G,NL12GE
3489  $DEF NL12FX=NL12O|NL12G,3-16*NL12O|NL12G,NL12OE|NL12GE
3490  $DEF NL12FS=1-5*NL12O(2:|[!E])|NL12G|FR3Z
3491  $DEF NL12FM=3-10*NL12O(2:|[!E])|NL12G|FR3Z,NL12OE(2:|[!E])|NL12GE
3492  $DEF NL12FC=(|[!E])                                                                                     \
3493      ((8-15*SS_45301[#E!OB:AG50,*31,23],SS_25589[#E!OB:AG65,*47,19])|                                    \
3494      (1-4*(3-5*SS_43001[#E!OB:AG70,*44,26],|SS_47091L[#E!OB:AG70,*50,26]|SS_47091[#E!OB:AG70,*44,26])))
3495  $DEF NL12FDG=NS_D(G2421G|111|112|G2266|G3209|G2199|G2030)(|L)
3496
3497  $DEF NL12F=NL12FDG,3:(|[!E])NL12FO|3:NL12FG|10:NL12FX|3:NL12FC|1:NL12FV
3498
3499  $DEF NL12T=NL12F
3500
3501  # EP 2 Freight coal
3502  $DEF NL2FLC=NL12FDG,13-17*(3:NS_56261E|NS_GTMKHE(|L)|2:NS_47501E)
3503
3504  # EP 2 Freight short
3505  $DEF NL2FS1=2-3*(NS_91010GTDE|NS_G3|NS_560809_GROLSCH(|L)|NS_GB_HEINEKEN1(|L))
3506
3507
3508  # EP 2 Passenger 2-axle short
3509  $DEF NL2P2=NS_D25(57|66)|NS_DPOSTL|NS_D4|NS_D(1|2),NS_D3,NS_C6_2570,NS_B4C_2501|NS_B2,NS_P2,NS_P1,      \
3510      NS_C7_4001
3511
3512  # EP 2 Passenger 4-axle
3513  $DEF NL2PSC=(NS_D4501(|L),                                                                              \
3514      (<,NS_C10C_6101L,                                                                                   \
3515      NS_SAX1L|NS_SAX1|NS_SAX1HL|NS_SAX1H|NS_AB7C_6009L|NS_AB7C_6009|NS_AB7C_6021L|NS_AB7C_6021|          \
3516      NS_AB7C_6101L|NS_AB7C_6101|NS_AB8C_6231|NS_B8C_6006L|NS_B8C_6006,NS_BC9C_6001(|L)|NS_P3,            \
3517      NS_C10C_6026L))|                                                                                    \
3518      ((NS_D4525_1(|L),                                                                                   \
3519      (<NS_C10CL|NS_C10C,NS_BC9CL|NS_BC9C|NS_BC9CHL|NS_BC9CH,NS_AB7CL|NS_AB7C|NS_AB7CHL|NS_AB7CH,         \
3520      NS_D4501L,NS_C10CHL|NS_C10CH))|(<NS_C7_4001L,NS_B6C_4511,NS_C8C_4501,NS_C7_4001)|                   \
3521      (<NS_C10C_6101L,NS_C10C_6026,NS_B8C_6006L|NS_B8C_6006,NS_AB8C_6221L|NS_AB8C_6221,NS_C10C_6101L))
3522
3523  # EP 3a Freight short
3524  $DEF NL3FLS=(3-4*(NS_174501N|NS_174541NL|NS_174541N))|(3-4*(NS_7801N|NS_9501|NS_12701NL))|              \
3525      (3-4*(NS_70774N))|(3-4*(NS_87101E|NS_44001GLYN|NS_95001GN2E|NS_95001GN1E|NS_G3))|                   \
3526      (3-4*(NS_23601NL|NS_23601N|NS_23601HNL|NS_23601HN))|(3-4*(NS_GZ(E|N)))|                             \
3527      (3-4*NS_RMMP_EX_USATC[O:PROPELLER|SPARE1|BOILERPARTS1,13][O:PROPELLER|SPARE1|BOILERPARTS1,51,11]    \
3528      [O:PROPELLER|SPARE1|BOILERPARTS1,88,11])|(3-4*(NS_3A_SCHH(|L)|NS_CHHP1))|                           \
3529      (3-4*NS_3A_SCHR(K|KB|W|KGB1|WGB1|KGB1B|WGB1B|KGB2|KGB2B|WGB2|WGB2B|KGB3|KGB3B|WGB3|WGB3B)(|L))|     \
3530      (3-4*(NS_3_CHOP1460(|V)_FRICO(|L)|NS_3_CHOP1460(|V)_FRICOR(|L)))|(3-4*(G_E1|NS_3A_XCHG(|L)))|       \
3531      (3*(NS_3A_CHOP1469H(|L)|NS_3A_CHOP1475(B|H)(|L)))|(NS_UIKKS[O:MOTOR4,,6],NS_179023N,NS_25101N)
3532
3533  # EP 3a Freight long
3534  $DEF NL3FLA=NS_D(G2421G|111|112|G2266|G2372|G3209|G2199|G2030)(|L),5*NL3FLS
3535
3536  # EP 3a Passenger regional
3537  $DEF NL3PRA=(2*NS_C12C_(O|OH|G|GH)(|L),NS_B12C_G(|L),2*NS_C12C_(O|OH|G|GH)(|L))|                        \
3538      (2*NS_C12C_B(|L),NS_B12C_B(|L),2*NS_C12C_B(|L))
3539
3540  # EP 3a Passenger long distance     NS_OVALBC
3541  $DEF NL3PLA=(NS_D6061G,2*(NS_OVAL(O|OH|G|GH)_C),2*(NS_OVAL(O|OH|G|GH)_AB),2*(NS_OVAL(O|OH|G|GH)_C))|    \
3542      (NS_D6061B,2*(NS_OVALB_C),(NS_OVALB_B(1|2)),(NS_OVALB_(AB|A)),2*(NS_OVALB_C))|                      \
3543      (NS_D6061GL,2*(NS_OVAL(O|OH|G|GH)_CL),2*(NS_OVAL(O|OH|G|GH)_ABL),2*(NS_OVAL(O|OH|G|GH)_CL))|        \
3544      (NS_D6061BL,2*(NS_OVALB_CL),(NS_OVALB_B(1|2)L),(NS_OVALB_(AB|A)L),2*(NS_OVALB_CL))|                 \
3545      (NS_D6061B,1-2*NS_ABD9_CL,NS_ABD9_ABL|NS_ABD9_AL,NS_ABD9BL,2*NS_ABD9_CL)|                           \
3546      (NS_D6061BL,1-2*NS_ABD9_C,NS_ABD9_AB|NS_ABD9_A,NS_ABD9B,2*NS_ABD9_C)|                               \
3547      (NS_D7521G,1-2*NS_ABD9G_C,2-3*NS_ABD9(OH|G|GH|O),2*NS_ABD9G_C)|                                     \
3548      (NS_D7521GL,1-2*NS_ABD9G_CL,2-3*NS_ABD9(OH|G|GH|O)L,2*NS_ABD9G_CL)
3549
3550  # EP 3a Freight coal
3551  $DEF NL3FLC=13-17*(NS_GTMKN|NS_GTMKBN(|L)|NS_GTMKHN(|L)|NS_47501N)
3552
3553  # EP 3bc Freight short
3554  $DEF NL3FSB=(2-3*NS_3B_SCH(H|K)(|L))|(2-3*NS_3C_GSV(W|K|KB|KV|KVB|WV|WB|WVB)(|L))|                      \
3555      (2-3*NS_3B_(XCHG|SCHRK|SCHRKB|SCHRW|SCHRWB|SCHRKE|SCHRKEB|SCHRWE|SCHRWEB)(|L))|                     \
3556      (2-3*NS_3_(CHOP1460_FRICO|CHOP1460V_FRICO|CHOP1460_FRICOR|CHOP1460V_FRICOR|GSV_FRICO)(|L))|         \
3557      (2-3*NS_3B_CHO(K1450B|P1460|K1459|K1450H|P1469H)(|L))
3558
3559  # EP 3b Freight long
3560  $DEF NL3FLB=8*NL3FSB
3561
3562
3563  # EP 3b Passenger regional
3564  $DEF NL3PRB=(<NS_MAT24BDZG,2-4*NS_MAT24GB(|L))|(<(2-4*NS_MAT24GB(|L)),NS_MAT24BDZGL)|                   \
3565      (<NS_MAT24BDZ,(NS_MAT24AB(|M|MS|S)(|L)|NS_MAT24A(|S)(|L)),2-3*NS_MAT24B(Z|1|2|3|4)(|L))|            \
3566      (<(2-3*NS_MAT24B(Z|1|2|3|4)),(NS_MAT24ABM(|S)(|L)|NS_MAT24A(|S)(|L)),NS_MAT24BDZL)
3567
3568  # EP 3 maintenance
3569  $DEF NL3FM1=(NS_9441511,NS_9741616)|(7*(NS_ROBEL6|NS_ROBEL4|NS_ROBEL1|NS_ROBEL3))
3570
3571  # EP 4 Freight short
3572  $DEF NL4FS1=(2-3*GSM_4_TTOX(|L)[O:BETTERAVES_2E(1|2)(|[M]),,27])|(2-3*NS_RS1[OB:(BOX27|PIPE27),,13])|   \
3573      (2-3*NS_FALS2520_KALK(1|2))|(2-3*NS_SAHMMS(1|2))|(2-3*NS_SDKMMSS_TRAILSTARL)|                       \
3574      (2-3*NS_EANOS1[O:SCRAP(5|6)(|[M])])|(2-3*(NS_GSWD|NS_TMS(|L)))|(2-3*NS_UCS3810(|L))|                \
3575      (2-3*NS_4_GSV(K|KB|KV|KVB|W|WB|WV|WVB|_FRICO)(|L))|(2-3*NS_4_(GBLS|HBCSV)(|L))|                     \
3576      (2-3*NS_EKLO[OB:CABLE7,*29,12][OB:CABLE7,*74,12])|                                                  \
3577      (2-3*(NS_HBIS1940(C|B|D)|NS_HBCS|NS_HBBKKSS|NS_HBIS1910(B|UTD)|NS_HBIS1920C))|                      \
3578      (2-3*(NS_GBS18(10|20)|NS_GS_POST|NS_GS|NS_G_UIC_BOISM))|(2-3*(NS_KLMOS1))|(2-3*(NS_KS(1|2)))|       \
3579      (2-3*(NS_KBS(3|4)))|                                                                                \
3580      (2-3*NS_SAHMMS357[OB:COIL23H,50,14][OB:COIL23H,91,13][OB:COIL23H,133,13][OB:COIL23H,7,13])|         \
3581      (2-3*NS_CHHP2|(2-3*NS_FCCPPS)|(2-3*NS_TADS(2|3)))
3582
3583  # EP 4 Freight long
3584  $DEF NL4FL1=7*NL4FS1
3585
3586  # EP 4 maintenance
3587  $DEF NL4FM1=(NS_9741611,NS_270118,NS_9791507,NS_9791508)|                                               \
3588      (NS_ROBELB,NS_VERBLW(2|1),NS_GS_W,NS_WERKW(1|2))|                                                   \
3589      (NS_HBIS_SPOORKRAAN,NS_KRAN1L,NS_KRANM1,NS_KRANM2(|L))|                                             \
3590      (NS_ROBELA,NS_3ROBEL,NS_3ROBEL,NS_3ROBELE,NS_3ROBELE)
3591
3592  # EP 5 Freight short
3593  $DEF NL5FS1=(3-5*(NS_EAOS(|L)|NS_EANOS|NS_EANOS3(|L)|NS_EANOS2)[O:SCRAP(5|6)(|[M])])|                   \
3594      (3-5*(NS_HBIS1910B|NS_HBIS1940C))|(3-5*(NS_KBS4|NS_KBS3))|(3-5*(NS_FCCPPS[OB:CLAY15(|[M]),,38]))|   \
3595      (3-5*(NS_UCS3810|NS_UBCS3830A|NS_UBCS3830B|NS_UCSY384)(|L))|(3-5*(NS_TADS3|NS_TADS2|NSC_TADS))|     \
3596      (3-5*NS_SAHMMS357[OB:COIL23H,50,14][OB:COIL23H,91,13][OB:COIL23H,133,13][OB:COIL23H,7,13])|         \
3597      (3-5*NS_SDKMMSS_TRAILSTAR)|(3-5*(NS_TADS_MESTSTOFFEN_O(|L)))|(3-5*NS_SHIMMNS_NSCARGOM)
3598
3599  # EP 5 Freight long
3600  $DEF NL5F1=5*NL5FS1
3601
3602  # EP 5 maintenance
3603  $DEF NL5FM1=(NS_WERKWY1(|L),NS_G1,NBM_WERKW1)|((6*NS_G2|NS_ROBEL5),NS_ROBEL2,NS_WERKW3)
3604
3605  # EP 6 Freight short
3606  $DEF NL6S=(3-5*(RAILPRO_FCCPPS1L|RAILPRO_FCCPPS1|RAILPRO_FCCPPS2L))|(3-5*NACCO_TADS_Y(|L))|             \
3607      (3-5*EIVEL_EAOS(|L))|                                                                               \
3608      (3-5*(RAI_EANOS|RAI_EANOS_S055(|L)|RAI_EANOS_X052(|L)|RAI_EAOS075BM(|L)|DBS_EAOS075M))|             \
3609      (3-5*(DBC|DBS)_HABBIS345M)|(3-5*DBS_RGLNS673[O:STEEL41,,12])|                                       \
3610      (3-5*(ACTS_SLPSX(|L)[O:ROFF_20E,7,13][O:ROFF_20E,70,13]                                             \
3611      [O:ROFF_(20E|20GP|20G|30B|30BP|30BM|20NESTLER(|1)|30GT|30GW|30G)(|L),134,13]))
3612
3613  # EP 6 Freight long
3614  $DEF NL6F=5*NL6S
3615
3616  # EP 6 Passenger IC HSA
3617  $DEF NL6PIH=(<NS_HSA_B1L,NS_HSA_A2,NS_HSA_B5L,NS_HSA_BD4,NS_HSA_A3L,NS_HSA_A2L,NS_HSA_B1)|              \
3618      (<NS_HSA_B1L,NS_HSA_A2,NS_HSA_A3,NS_HSA_BD4L,NS_HSA_B5,NS_HSA_A2L,NS_HSA_B1)
3619
3620  #----------------------------------------------------------------------------------------------------
3621  #
3622  # Denmark
3623  #
3624  # EP 3 Freight open cars
3625  $DEF DK3O=DSB_3A_PB10121(|L)|DSB_3_PB10116E(|L)|DSB_3_PB10872(|L)|DSB_3_P12009U|DSB_3_P12401B(|L)|      \
3626      DSB_3_E52(042EU|401EB|401EBL)
3627
3628  # EP 3 Freight shunting
3629  $DEF DK3FS=(2-3*DK3O)|(2-3*DSB_3_G4(18|10E|10|00)(|L))|(2-3*(DSB_EM|DSB_EQ|DSB_QB))|                    \
3630      (2-3*DSB_3_PJB16638(|L)[OB:WOOD20(7|8|9)(|[M]),,13])|                                               \
3631      (2-3*DSB_3_PJ17(040|167|218)(|L)[OB:WOOD21(4|5|3)(|[M]),,13])|                                      \
3632      (2-3*DSB_3_PJ(R13975|R13933|B16638)(|L)[OB:WOOD2(11|12|09)(|[M]),,13])|                             \
3633      (2-3*DSB_3A_PB10121(|L)[OB:TARP_SULZER1(|L)])|                                                      \
3634      (DSB_3_GP_VIKING(|L),DSB_EQ[NB:B,BA8],DSB_ZT99999[NB:B,BA8])|(2-3*DSB_3_IA19(151|501)(|L))|         \
3635      (2-3*DSB_3_HJ37(001|212|277|357)(|L))|(2-3*DSB_3_H(J37542|J37776|J37768|J37701|D38121)(|L))|        \
3636      (2-3*DSB_3_G(418|410E|410|400)(|L))|                                                                \
3637      (2-3*DSB_3_P12(009U|401BL|401B)[OB:WOOD2(13|14|12|11|09|08),,12])|                                  \
3638      (2-3*DSB_3_E52(042EU|401EBL|401EB)[OB:WOOD2(13|14|12|11|09|08),,12])|                               \
3639      (2-3*DSB_3_(HD38121|HJ37001|HJ37212|HJ37277|HJ37330|HJ37357|HJ37542|HJ37701|HJ37768|HJ37776)(|L))|  \
3640      (2-3*DSB_3_G(418|410E|410|400)(|L))|(2-3*DSB_3_IA19(501|151)(|L))
3641
3642  # EP 3 Freight long
3643  $DEF DK3FL=7-8*DK3FS
3644
3645  # EP 3A Passenger 2/3x
3646  $DEF DK3PA1=(DSB_3A(EK6939|DO5630|EH6590)(|L),                                                          \
3647      6-7*((DSB_3A_CU4055|DSB_3A_CU4160|DSB_3A_CU4216|DSB_3A_CV4301|DSB_3A_CV4318|DSB_3A_CX4551|          \
3648      DSB_3A_CX4553|DSB_3A_CY4616|DSB_3A_CY4644)(|L)))
3649
3650  # EP 3A Passenger long distance
3651  $DEF DK3PA2=(<DSB_3AED6401,5*(DSB_3A_CM2099|DSB_3A_CM2132|DSB_3A_CM2051))|                              \
3652      (<5*(DSB_3A_CM2051L|DSB_3A_CM2132L|DSB_3A_CM2099L),DSB_3AED6401L)
3653
3654  # EP 3B Passenger 2/3x
3655  $DEF DK3PB1=DSB_3B(EK6925|EH6597|DO5601|DO5620)(|L),                                                    \
3656      6-7*((DSB_3B_CU4048|DSB_3B_CU4071|DSB_3B_CU4101|DSB_3B_CU4164|DSB_3B_CU4201|DSB_3B_CU4249|          \
3657      DSB_3B_CV4305|DSB_3B_CV4319|DSB_3B_CY4601|DSB_3B_CY4622)(|L))
3658
3659  # EP 3B Passenger regional 4x
3660  $DEF DK3PB2=(<DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245|  \
3661      BECO6280|AED6401)(|L),DSB_3B_(CL1525|CL1624)L,DSB_3B_(AU162L|AV249L),                               \
3662      3*(DSB_3B_(COB|CO2742|CMR2119|CMR2123)),1-2*(DSB_3B_CR3614))|                                       \
3663      (<2*(DSB_3B_(COB|CO2742|CMR2119|CMR2123)L),1-2*(DSB_3B_CR3614)L,DSB_3B_(CL1525|CL1624),             \
3664      DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245|BECO6280|   \
3665      AED6401)(|L))|                                                                                      \
3666      (<DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245|          \
3667      BECO6280|AED6401)(|L),DSB_3B_CLE1677L,DSB_3B_BL1331L,DSB_3B_AL342L,DSB_3B_BL1322L)|                 \
3668      (<DSB_3B_BL1331,DSB_3B_AL342,DSB_3B_BL1322,DSB_3B_CLE1677,                                          \
3669      DSB_3(_DA5005|_DB5102|BDB5107|_DH5316|_DK5901|_DK5907|_EA6002|BEA6013|BECO6242|BECO6245|BECO6280|   \
3670      AED6401)(|L))
3671
3672  # EP 3B Passenger long distance
3673  $DEF DK3PB3=(<DSB_3(_DC5142|BDD5201)(|L),                                                               \
3674      1-2*DSB_3B_(CM2006|CM2179|CA1002|CA1026|CAE1035|CAR1041|CB1308)L,DSB_3B_(AU162|AV249),              \
3675      1-2*((DSB_3B_(AC29|AC42)|DSB_3B_AF185_AY186)L),                                                     \
3676      1-2*DSB_(CB1|3B_CC1136|3B_CA1002|3B_CA1026|3B_CAE1035|3B_CAR1041|3B_CB1308))|                       \
3677      (<1-2*DSB_3B_(CC1136|CA1002|CA1026|CAE1035|CAR1041|CB1308)L,                                        \
3678      1-2*(DSB_3B_(AC29|AC42)|DSB_3B_AF185_AY186),DSB_3B_(AU162|AV249)L,                                  \
3679      1-2*DSB_3B_(CM2006|CM2179|CA1002|CA1026|CAE1035|CAR1041|CB1308),DSB_3(_DC5142|BDD5201)(|L))|        \
3680      (<DSB_3B_AL341L,DSB_3C_ABG286L,5*DSB_3C_BGC001L,DSB_3BDD5201L)|                                     \
3681      (<DSB_3BDD5201,5*DSB_3C_BGC001,DSB_3C_ABG286,DSB_3C_ABG286L)
3682
3683  # EP 3C Passenger regional 4x push and pull
3684  $DEF DK3PC1L=(<DSB_3C_BHS827L,DSB_3C_ABG286L,DSB_3C_BG049L)
3685  $DEF DK3PC1R=(<DSB_3C_ABG286,DSB_3C_BG049,DSB_3B_AL341)
3686
3687  # EP 4 Freight short
3688  $DEF DK4FS=(3-5*(DSB_4(|A|B)_GS120(10|20|28|30)(|L)))|(3-5*(DSB_HBIKKS(1|2|3|4)))|                      \
3689      (3-5*(DSB_HBIS225GD|DSB_HBIS225SCISSORS|DSB_HBIS225PIANO|DSB_HBIS225ALBANI|DSB_ZB_TUBORG))|         \
3690      (3-5*DSB_EAOS1)|                                                                                    \
3691      (3-5*((DSB_EM2|DSB_4A_E5000EB(|L)|DSB_4A_E5020EU|DSB_4A_ELO5110(|L))[OB:#SCRAP_1(3|2)(|[M]),,23]))
3692
3693  # EP 4 Freight long
3694  $DEF DK4FL=5*DK4FS
3695
3696  # EP 4 Passenger long
3697  $DEF DK4PL1=(<2*(DSB_A(F|G)|DSB_AL2),DSB_WRM601,DSB_BFG,3*DSB_BG,DSB_BU1)|(<3*DSB_4BNL,DSB_4ADNS)|      \
3698      (<DSB_4AG037L,DSB_4ABG287L,4*DSB_4BGC005L)|(<4*DSB_4BGC005,DSB_4ABG287,DSB_4AG037)
3699
3700  # EP 6 Freight short
3701  $DEF DK6FS=(2-3*(DBAG_EALOS058L|DBAG_5_EALOST058FV))|(2-3*RAI_HABBIINS)|(2-3*ONRAIL_FCS2(|L))|          \
3702      (2-3*ITL_RES3(|L))
3703
3704  # EP 6 Freight long
3705  $DEF DK6F=DBAG_EALOS058L,DBAG_5_EALOST058FV,ONRAIL_FCS2,ONRAIL_FCS2L,RAI_HABBIINS,                      \
3706      4*(DSB_SDKMSL [OB:(STRAIL_KLINE|STRAIL_NORFOLKLINE|STRAIL_HANGARTNER3|STRAIL_LEMAN|STRAIL_GWG|      \
3707      STRAIL_VANDIEREN1),20,4][OB:STRAILST1,137,8]|                                                       \
3708      DSB_SDKMS[OB:(STRAIL_KLINEL|STRAIL_HANGARTNER1[!L]|STRAIL_LEMANL|STRAIL_PANEUROPA2L|                \
3709      STRAIL_FERCAMFL|STRAIL_POSSOZL[!L]),10,4][OB:STRAILST1,24,8]),ITL_RES3L,                            \
3710      2*DSB_EAOS1[O:(GRAVEL10|BALLAST47)(|[M])],3-5*(DSB_HBIKKS1|DSB_HBIKKS2|DSB_HBIKKS3|DSB_HBIKKS4)
3711
3712  #------------------------------------------------------------------------------
3713  #
3714  # Sweden
3715  #
3716  # EP 3 Freight long
3717  $DEF S3FG2=5-15*SJ_ELOS
3718
3719  $DEF S3G1=2:SJ_GBS1|2:SJ_GBS_T|2:SJ_DV30F|3:SJ_GBS|SJ_GBS_ASG|SJ_GBS_EDET
3720  $DEF S3FG1=5-15*S3G1
3721  $DEF S3F=S3FG1|S3FG2
3722
3723
3724
3725  # EP 3 Passenger
3726  $DEF S3P11=<1-3*SJ_C3C,1-3*SJ_C3A1,|SJ_CF4A
3727  $DEF S3P12=SJ_F5A,1-2*SJ_C3DA,2-4*SJ_CD3A
3728  $DEF S3P13=<1-2*SJ_C4,2-4*SJ_C3A,SJ_CF4
3729  $DEF S3P14=SJ_DFO5,2-5*SJ_C3DB
3730  $DEF S3P15=<1-2*SJ_CC2,2-3*SJ_C3DC,SJ_CF3|SJ_DFO20
3731
3732  $DEF S3P21=<SJ_CO5A1,2-3*SJ_2C,SJ_2BC,|SJ_2C
3733  $DEF S3P22=<SJ_CO5A2,1-3*SJ_3C,|3:$DIR(SJ_3BCL,SJ_3BC),1-2*SJ_3B
3734  $DEF S3P23=SJ_DO2,6*SJ_CO1A|SJ_CO5|SJ_CO6|SJ_CO7
3735
3736  $DEF S3P1=S3P1(1|2|3|4|5)
3737  $DEF S3P2=S3P2(1|2|3)
3738  $DEF S3P=S3P1|S3P2
3739
3740  # EP 4 Freight short
3741  $DEF S4FK1=SJ_DV30A|SJ_OB|SJ_GBS_ASG|SJ_OR|(SJ_OMS|SJ_OP(1|2)[OB:BARREL11,,21])|SJ_KBPS741|             \
3742      SJ_LGJS[OB:C2_SEALAND2,12,12][OB:C2_SEALAND,75,12]|SJ_GBS1,                                         \
3743      SJ_ELOS|SJ_L|SJ_OMS|SJ_4_RS6(8|9)1[OB:PIP29,,12]
3744
3745  $DEF S4F=4-7*S4FK1
3746
3747  # EP 4 Freight long
3748  $DEF S4FL1=15-20*S4FK1
3749
3750
3751  # EP 4 Passenger push and pull left
3752  $DEF S3PPL=<SJ_AFM7L,SJ_B7K,SJ_B7(B|IC),SJ_BR2,SJ_S1RT|SJ_S11R|SJ_S11RZ|SJ_R2B|SJ_R4B,SJ_A7(IC|B),      \
3753      SJ_ABO24,SJ_F33Z|SJ_DF21Z
3754
3755  # EP 5 Freight short
3756  $DEF S5FS=(4-5*((SJ_5A_EAOS5400(|L)|SJ_EASOS)[OB:SCRAP(6|4|5)(|[M]),,32]))|                             \
3757      (4-5*(SJ_HABBINS941|SJ_HBBILLNS1|SJ_HBBILLNS2|SJ_HBBILLNS4|SZ_HBBILLNS))|                           \
3758      (4-5*(SJ_LGJS,SJ_LGJS1|SJ_LGNS2|SJ_DV30B|SJ_DV30A|SJ_DV30,SJ_HBBINSZ))
3759
3760  # EP 5 Freight long
3761  $DEF S5F1=(4-5*S5FS)
3762
3763  # EP 6 Freight short
3764  $DEF S6FS=(4-5*(SJ_HCCMRRS|SJ_LAAEILPRS|SJ_AUDICARS|SJ_SDGMS833(|L)))|(3-4*SJ_LGJS)|                    \
3765      (4-5*(SJ_HBBINSZ|SJ_HBBINS1Z|SJ_HBBINS2Z|SJ_HABINS|SJ_HABINS2|SJ_HABBINS941|SJ_HBBINS3Z|SJ_HBBINS|  \
3766      SJ_HBBINS1|SJ_HBBINS2|SJ_HBBINS3~ARN|SJ_HBBINS3~KAR|SJ_HBBINS4|SJ_HBBILLNS3|SJ_HBBILLNS4))|         \
3767      (4-5*(SJ_LGJS1[OB:(C4S_EVERGREEN|C4S_KLINE|C4S_PONED|C4R_CAPITAL|C4R_CHINA|C4R_CHINA2|C4R_CMACGM2|  \
3768      C4R_COSCO1|C4R_EG2|C4R_GEE|C4R_HANJIN1|C4R_IFF1|C4R_KLINE1|C4R_MAERSK4|C4R_PO1|C4R_YANG2|C4R_UASC|  \
3769      C4T_BERTSCHI5|C4T_03|C4T_RIWATRANS),,12]))|(4-5*(SJ_5B_EAOS5400(|L)[OB:SCRAP(6|4|5)(|[M]),,32]))|   \
3770      (4-5*SJ_RMMNS3442028S(|L))|(4-5*(GC_HBBINS(1|2|3)|GC_HBBILLNS1|GC_HBINS1)(|L))
3771
3772  # EP 6 Freight long
3773  $DEF S6F1=5*S6FS
3774
3775  # EP 6 Freight long container
3776  $DEF S6F2=3-4*((AAE_SGGMRSS90L|AAE_SGGMRSS90AL|AAE_SGGMRSS90A|AAE_SGGMRSS90L)                           \
3777      [O:(C2062|C2RT12|C2RT13|C2RT14|C2RT15|C2RS_TRANS_EUROPEAN_TRANSPORT|C2RS_TFG1|C2RO_TIPES),10,11]    \
3778      [O:(C2_ANL2|C2RT16|C2RT_JUMBO|C2RT_BERTSCHI14|C2RT_BERTSCHI15|C2RT_BERTSCHI16|C2RT_BULKHAUL4|       \
3779      C2RO_TRITON|C2RO_VECCI_ZIRONI),77,11]                                                               \
3780      [O:(C2_IBC1|C2T_JOT1|C2T_INTERFLOW2|C2RT_LFT2|C2RT_LINDE2|C2RT_MEURER|C2RT_RINNEN2|C2RO03|C2RO04|   \
3781      C2R_EG3|C2R_EG6),156,11]                                                                            \
3782      [O:(C2_VOLVO2|C2RT05|C2RT09|C2RT10|C2IT_CARGODOMINO1|C2RT_EUROTAINER3|C2RT_FOODFLOW|C2RT_GRUBAR|    \
3783      C2RT_HOYER4|C2RT_HOYER5),222,11]),                                                                  \
3784      3-4*(AAE_SGGMRSS90AL|AAE_SGGMRSS90L|AAE_SGGMRSS90|AAE_SGGMRSS90A|WASC_SGGMRSS90L)                   \
3785      [O:C3_UBC2|C3I_BERTSCHI6|C3I_BULKHAUL1|C3I_HANJIN1|C3I_KLINE1|C3I_MOL2|C3IP_FERCAM4|C3IT_DONATI1|   \
3786      C3IT_GREIWING1|C3IT_RINNEN1|C3T_BUZZATTI,20,11]                                                     \
3787      [O:C3_EG2|C3_BERTSCHI4|C3_BERTSCHI5|C3_IBC1|C3_UBC1|C3_S2|C3I_BERTSCHI3|C3I_EG1|C3_IFF1|            \
3788      C3I_KLINE2|C3_MOL|C3I_UASC1|C3T_DONATI|C3T_GIEZENDANNER|C3T_RAILROADS|C3T_RINNEN2|C3T_RIWATRANS,    \
3789      184,11],                                                                                            \
3790      3-5*((AAE_SGGMRSS90L|AAE_SGGMRSS90AL|AAE_SGGMRSS90A|AAE_SGGMRSS90L)                                 \
3791      [O:(C2I_CAI_IP|C2_CHINA|C2I_COSCO1|C2I_EVERGREEN2|C2I_KLINE4|C2I_MOL6|C2I_MOL4),10,11]              \
3792      [O:(C2I_EVERGREEN1|C2I_GESEACO1|C2I_HANJIN2|C2I_KLINE3|C2I_MOL7|C2I_PO4|C2I_RCL1|C2I_SIEMENS1|      \
3793      C2I_SITC1|C2I_UASC1|C2I_TTC1),77,11]                                                                \
3794      [O:(C2I_KLINE2|C2I_MOL6|C2I_PO3|C2I_SINOTRANS3|C2I_TRANS_CONTAINER1|C2I_TRITON2|C2I_UNIGLORY1|      \
3795      C2I_PO2|C2I_SINOCON1|C2_SZDU3|C2_TEX|C2I_UNIK1),156,11]                                             \
3796      [O:(C2I_MOL9|C2_MORFLOT4|C2I_NEDLLOYD1|C2I_PO1|C2_APL|C2I_CAI_IP|C2I_COSCO1|C2I_COSCO3|C2_EG4|      \
3797      C2I_FCL1|C2I_HANJIN3|C2_KLINE1|C2_MOL|C2_MORFLOT2|C2I_SINOTRANS1),222,11])
3798
3799  #------------------------------------------------------------------------------
3800  #
3801  # Norway
3802  #
3803  # EP 3 Freight short
3804  $DEF N3FS1=(3-5*NSB_3_G4(|D1V1|S1|B|BV1|V1)(|L))|(3-5*NSB_3_G4(L1V1|D1L1V1|L1|BD1|BD1V1)(|L))|          \
3805      (3-5*(NSB_3_L37894[OB:FR_ERZ(19|20),,28](|L)))|(3-5*NSB_3_G3(36|3345|3681|3602|3687|5843)(|L))
3806
3807  # EP 3 Freight long
3808  $DEF N3FL1=5*N3FS1
3809
3810  # EP 3 Passenger
3811  $DEF N3P=$DIR(NSB_BD3_B,NSB_BD3_BL)|NSB_BM93,0-3*NSB_B3_B(|L),                                          \
3812      |NSB_AB3_B|NSB_AB3_BL|(<NSB_AB3_C,NSB_AB3_CL),1-3*NSB_B3_B(|L)
3813
3814  # EP 3 Passenger E3 B
3815  $DEF N3PB1=(<NSB_3(B3F3_21406|F3_21421)(|L)|NSB_3B(F10_21513|3BF12)L,                                   \
3816      3*NSB_3B(2_25503|2_25504|3B3|3B4)L,NSB_3B3(BR_21202|R1)L,NSB_3B3AB1(1|2)L,NSB_3B3A2L,               \
3817      NSB_3B3WLAB210(35|81)L)|                                                                            \
3818      (<NSB_3B3WLAB210(35|81),NSB_3B3A2,NSB_3B3AB1(1|2),NSB_3B3(BR_21202|R1),                             \
3819      3*NSB_3B(2_25503|2_25504|3B3|3B4),NSB_3B(F10_21513|3BF12)|NSB_3(B3F3_21406|F3_21421)(|L))
3820
3821  # EP 4 Freight short
3822  $DEF N45G1=4-5*G_SHIM
3823  $DEF N45G2=4-5*(NSB_HBIKKS|NSB_HBIKKS1|NSB_RGS1[OB:PIPE(19|20),,10])
3824  $DEF N45G3=4-5*NSB_UADHS
3825  $DEF N45G4=4-5*NSB_RGS1
3826  $DEF N45G5=4-5*(NSB_4_EAOS5350(|L)[O:SCRAP(5|6|4)(|[M])])
3827  $DEF N45G6=4-5*(NSB_4_G4((|D1V1)|B|BV1|V1|BD1|BD1V1)(|L))
3828  $DEF N45G7=4-5*(NSB_4_G4(|V1|D1V1|B|BD1|BD1V1)(|L))
3829  $DEF N45G8=4-5*NSB_4B_GS(1200|1201|1201E|1202)(|L)
3830  $DEF N45G9=4-5*NSB_4B_HIS2102T(2D|2|1D|1|3)(|L)
3831
3832
3833  $DEF N4FS=N45G(7|4|5|1|2|3|6|8|9)
3834
3835
3836  # EP 4 Freight long
3837  $DEF N4F=4-5*(1:(4-5*S4FK1)|7:N45G(1|2|3|4|5|6|7))
3838
3839  # EP 4 Passenger
3840  $DEF N4P=(<NSB_BD3_BL,3*NSB_B3_B(|L),NSB_AB3_B(|L))|(<NSB_AB3_C(|L),3*NSB_B3_B(|L),NSB_BD3_B)|          \
3841      (<NSB_4F3_214(20|07)(|L)|NSB_4BF10_21509L,3*NSB_4B(F10_21509|4|2_25510|2_25517)(|L),NSB_4AB11L)|    \
3842      (<NSB_4AB11,3*NSB_4B(F10_21509|4|2_25510|2_25517)(|L),NSB_4BF10_21509|NSB_4F3_214(20|07)(|L))|      \
3843      (<NSB_4BF14L,3*NSB_4B5(|L),NSB_4A3(|L))|(<NSB_4A3(|L),3*NSB_4B5(|L),NSB_4BF14)
3844
3845  # EP 5 Freight short
3846  $DEF N5FS=4-8*(G_SHIM|NSB_HBIKKS|NSB_HBIKKS1|NSB_RGS1[OB:PIPE(19|20),,10]|NSB_UADHS)
3847
3848  # EP 5 Freight long
3849  $DEF N5F=3*N5FS
3850
3851  # EP 5A Passenger
3852  $DEF N5PA1=(<NSB_5A_BF14L,3*NSB_5A_B5(|L),NSB_5A_A3(|L))|(<NSB_5A_A3(|L),3*NSB_5A_B5(|L),NSB_5A_BF14)
3853
3854  # EP 5B Passenger
3855  $DEF N5PB1=(<NSB_5BF12L,NSB_5B3L,NSB_5FR3_21266L,2*NSB_5CB1_2121(7|8)L,NSB_5WLAB21080L)|                \
3856      (<NSB_5WLAB21080,NSB_5CB1_2121(7|8),NSB_5FR3_21266,NSB_5B3,NSB_5BF12)|                              \
3857      (<NSB_5B_BF14L,3*NSB_5B_B5(|L),NSB_5B_A3(|L))|(<NSB_5B_A3(|L),3*NSB_5B_B5(|L),NSB_5B_BF14)
3858
3859  # EP 6 Freight short
3860  $DEF N6FR=NSB_HBIKKS(|1)|NSB_UADHS|NSB_RGS1[O:PIPE59,,12]
3861  $DEF N6FS=1:S6FS|2:(4*NSB_HCCRRS(1|3|2|0))|2:(4*N6FR)
3862  # EP 6 Freight long
3863  $DEF N6FL=4-5*N6FS
3864
3865
3866  # EP 6 Passenger
3867  $DEF N6P1=(<NSB_6FR521722(|L)|NSB_6BF1421715L,3*NSB_6(B526028|A526059|B526002)(|L))|                    \
3868      (<3*NSB_6(B526028|A526059|B526002)(|L),NSB_6FR521722(|L)|NSB_6BF1421715)
3869
3870  #------------------------------------------------------------------------------
3871  # Finnland
3872  #------------------------------------------------------------------------------
3873
3874
3875  # EP 4 Passenger short
3876
3877  $DEF FI4PS1=(<VR_FOTL,VR_FOT|VR_CI|VR_CHTL,VR_CIL|VR_CHT,VR_CEI|VR_CEIL,VR_RKL,VR_RK|VR_EIN|VR_EINU,    \
3878      VR_EINL|VR_EINUL,VR_EIT)
3879
3880  # EP 6 Freight short
3881  # EP 6 Freight
3882  $DEF FI6FS=(2-3*VR_HAIT4)|(2-3*VR_HBIKK(|2|3))|(2-3*VR_GBLNT(|2))|(2-3*RF_HCCMQQR)|                     \
3883      (2-3*(VR_SONK|VR_ZAGS))|(2-3*(VR_SONK|VR_ZAGS))|(2-3*VR_OB143007[OB:WOOD1(24|28|30|29),,12])
3884
3885  $DEF FI6FS1=2*FI6FS
3886
3887  # EP 6 Freight long
3888  $DEF FI6FL1=8*FI6FS
3889
3890
3891  #------------------------------------------------------------------------------
3892  # Portugal
3893  #------------------------------------------------------------------------------
3894
3895
3896
3897  # EP 3 Freight short
3898  $DEF P3FS=(2-3*(CP_3_JV302U|CP_3_JFV310UH(|L)|CP_3_JV502U|CP_3_JV502(|L)|CP_3_JFV510H(|L)))
3899  $DEF P3FS1=2-3*P3FS
3900
3901  # EP 4 Freight short
3902  $DEF P4FS=(2-3*((CP_4_GLM1022|CP_4_GLM10230H|CP_4_GLM10230H3|CP_4_GLM10231|CP_4_GKKLMS1385|             \
3903      CP_4_GKKLMS1385H3|CP_4_GKKLMS1385H|CP_4_U9402)(|L)))|(2-3*(CP_4_U9402(|L)))|                        \
3904      (2-3*(CP_4_GLM1024(|H|HL|L|U)))|(2-3*CP_US)|(2-3*CP_4_UHK7032(|L))|(2-3*CP_SGS(1|2))|               \
3905      (2-3*(CP_G2|CP_GABS(1|2)))|(2-3*(CP_GBKKS(7|8)(|L)))|                                               \
3906      (2-3*(CP_HIS(3|1|2|4|5)(|L)|CP_HIS2|CP_HIS(1|2)(|L)|CP_HIKKS))|(2-3*(CP_GBKKS(2|3)(|L)))|           \
3907      (2-3*(CP_4_U9402(|L)))|(2-3*(CP_4_GLM1024(|H|HL|L|U)))|(2-3*CP_US)|                                 \
3908      (2-3*(CP_EKKLS|CP_EKKLS2|CP_ELOS|CP_EKKLO)[OB:GRAVEL10,,27])|(2-3*(CP_KBS(|L)|CP_KBKKS1|CP_KBKKS2))
3909  $DEF P4FS1=2-3*P4FS
3910
3911  # EP 5/6 Freight long
3912
3913  $DEF P6FL1=(<RF_LAAEKS3,RF_LAAEKS0,SEMAT_LADKS,CP_RS,CP_KBKKMPS1,                                       \
3914      RF_LAAGRSS1[O:C4_KS1,170,9][O:C4_KS2,20,9],RF_HBFIS239B,RF_LAAGRSS,CP_GABS4,CP_GABS2)
3915
3916
3917  #------------------------------------------------------------------------------
3918  # Spain
3919  #------------------------------------------------------------------------------
3920  #
3921  $DEF E3OE1=(RF_XP_PONFEHL|RF_XP_EBROH|RF_X1H|RF_X2H|RF_X3H|RF_X4H)L[#E!OB:AG55,*42,28]|                 \
3922      (RF_XP_PONFEHL|RF_XP_EBROH|RF_X1H)[#E!OB:AG55,*38,28]|(RF_XP_PONFE|RF_XP_EBRO)[#E!OB:AG55,*38,28]
3923  $DEF E3O=(RF_X1|RF_X2|RF_X3|RF_X4|RF_X5A|RF_X5B|RF_X5C)[#E!OB:AG55,*38,28]|                             \
3924      (RF_X1H|RF_X2H|RF_X5HC)[#E!OB:AG55,*38,28]|(RF_X1H|RF_X2H|RF_X4H)L[#E!OB:AG55,*42,28]
3925  $DEF E3OG=RF_X1(P1|P2|P3|P4|P5|W1|W2)
3926  $DEF E3G1=RF_J200000(A|B|C)|RF_G(3|4)|                                                                  \
3927      6:RF_J300000(E|E1|EB|EBL|EH|EHH|EHHL|EHL|T|T1|TB|TBL|TH|THH|THHL|THL|Y|Y1|YB|YH|YHH|YHHL)
3928
3929  $DEF E_UAS=RF_UAS(1|1E|2|3)
3930  $DEF E_EALOS=RF_EALOS(|1B|2|2B|2C|3|3B|3C|3D|3E|3F)[#E!O:AG120]
3931  $DEF E_HABIS=RF_HABISS(1|2|3|4)(A|B)
3932  $DEF E_SHIM=RF_SHIMMS4768AL|RF_SHIMMS4768A|RF_SHIMMS4768BL|RF_SHIMMS4768B|RF_SHIMMS|RF_G2
3933  $DEF E4G=RF_GS(1|2|3|4|5|6|7|8)
3934  $DEF E4T=RF_RRP_USAF(|L)
3935  $DEF E5C=RF_(4|5)SDGKKMSS(|L)[O:C40A,,12]
3936
3937  # EP 3 Freight long
3938  $DEF E3FL1=(<RF_TRFS1,RF_J600000A,NOR_G1,RF_J300000E1,RF_M_BAT,RF_M1H,RF_J300000Y1,RF_J300000YB,        \
3939      RF_M1HL,RF_M_UNI_H,RF_X2,RF_X2HL,RF_CER1,RF_CER2,RF_CG1,RF_J1_NORTEL,RF_J1_NORTE,RF_XP3,            \
3940      RF_X300000T1BL,RF_JT2BL,RF_JT1,RF_X300000T,RF_X300000TH,RF_XP2,RF_DV340200,RF_G4ANIS)
3941  $DEF E3FL2=5-6*((3-4*RF_R_CAMPSA(2|2H|2HL))|(3-4*RF_PRR5151(2|6)(|L))|                                  \
3942      (3-4*(RF_(PR130006|PR510001|PR510010|RR1|PR_EXPLOSIVE)))|(3-4*(RF_PNN1(6704|7092|7091|6704L)))|     \
3943      (3-4*(RF_PN(520061|520062|520063|520060|300000T|300000THL|17190|17283|16500)))|                     \
3944      (3-4*RF_J(1A|1C|1D|2|2A|1H|2(B|H)(|L))|(3-4*(RF_(J_G|GGH)))))
3945  $DEF E3FL=E3FL(1|2)
3946
3947  # EP 3 Freight short
3948  $DEF E3FS=1-5*E3G1|(|[!E])E3O|E3OG
3949
3950  # EP 3 Long Distance class 5000
3951  $DEF E3PL1=(<RF_AAWL5000_1,RF_AA5000_1,(RF_AAB5000_1|RF_AAC5000_1),RF_BB5000A_1,RF_AAR5000_1,           \
3952      2*RF_BB5000B_1,2*RF_CC5000_1,(RF_CCD5000_1|RF_DD5000_1|RF_DDT5003_1|RF_DDT5027_1),                  \
3953      RF_DGDC1516(A|B|C)(|L)|RF_DGDC2000(A|B)(|L))|                                                       \
3954      (<RF_DGDC2000(A|B)(|L)|RF_DGDC1541(A|B|C)(|L),                                                      \
3955      (RF_CCD5000_1L|RF_DD5000_1L|RF_DDT5003_1L|RF_DDT5027_1L),2*RF_CC5000_1L,2*RF_BB5000B_1L,            \
3956      RF_AAR5000_1L,RF_BB5000A_1L,(RF_AAB5000_1L|RF_AAC5000_1L),RF_AA5000_1L,RF_AAWL5000_1L)
3957
3958  # EP 4 Long Distance class 5000
3959  $DEF E4PL5=(<2*RF_BB4_5100_(2|3|4),RF_AAWL(|R)5000_(2|3),RF_AA5000_2,RF_AAR5000_(2|3),                  \
3960      3*RF_BB5000(A|B)_(4|3|2),RF_BBD4_5000_(2|3|4))|                                                     \
3961      (<RF_BBD4_5000_(2|3|4)L,3*RF_BB5000(A|B)_(4|3|2)L,RF_AAR5000_(2|3)L,RF_AA5000_2L,                   \
3962      RF_AAWL(|R)5000_(2|3)L,2*RF_BB4_5100_(2|3|4)L)|                                                     \
3963      (<2*RF_BB4_5100_(2|3|4),RF_AAB5000_(2|3|4),RF_AA5000_2,RF_AAR5000_(2|3),3*RF_BB5000(A|B)_(4|3|2),   \
3964      RF_BB1_5200_(2|3|4),RF_DGDC1541(E|F)(|L)|RF_DGDC2000C(|L))|                                         \
3965      (<RF_DGDC1529M(|L)|RF_DGDC2000C(|L),RF_BB1_5200_(2|3|4)L,3*RF_BB5000(A|B)_(4|3|2)L,                 \
3966      RF_AAR5000_(2|3)L,RF_AA5000_2L,RF_AAB5000_(2|3|4)L,2*RF_BB4_5100_(2|3|4)L)|                         \
3967      (<RF_DGDC2000C(|L)|RF_DGDC1516(D|E),3*RF_BB5000(A|B)_(2|3|4),RF_AAB4_5100_(2|3|4),RF_AA5000_2,      \
3968      RF_AAR5058,2*RF_BB1_5200_(2|3|4),(RF_DD5000_2|RF_DDT5003_2|RF_DDTCE5015))|                          \
3969      (<(RF_DD5000_2L|RF_DDT5003_2L|RF_DDTCE5015L),2*RF_BB1_5200_(2|3|4)L,RF_AAR5058L,RF_AA5000_2L,       \
3970      RF_AAB4_5100_(2|3|4)L,3*RF_BB5000(A|B)_(2|3|4)L,RF_DGDC1516(D|E)L|RF_DGDC2000C(|L))
3971
3972  # EP 4 Long Distance 1970s
3973  $DEF E4PL7=(<RF_B12R12L,2*RF_B12R11L,RF_A10R02L|RF_A10R03L,RF_A5B501L,RF_B12R13L,RF_D801(|L))|          \
3974      (<(3*RF_(B12R12|B12R11|B10R03|B10R02|B12R03)L),RF_R80(1|2)G0L,RF_A10R02L|RF_A10R03L,RF_A5B501L,     \
3975      RF_B12R13L)|                                                                                        \
3976      (<RF_D801(|L),RF_B12R13,RF_R80(1|2)G0,RF_A5B501,RF_A10R02|RF_A10R03,                                \
3977      (3*RF_(B12R12|B12R11|B10R03|B10R02|B12R03)))|                                                       \
3978      (<RF_8000D8_EST(1|2|3)(|L),2*RF_AA9(100|100A|009|000|000A),RF_AR7T1|RF_AAR9700|RF_BBR9800(|A),      \
3979      4*RF_BB9(241|201|241A|207|201A))|                                                                   \
3980      (<(4*(RF_BB9(241|201|241A|207|201A)L)),RF_AR7T1L|RF_AAR9700L|RF_AR7T1L|RF_BBR9800(|A)L,             \
3981      2*RF_AA9(100|100A|009|000|000A)L,RF_8000D8_EST(1|2|3)(|L))|                                         \
3982      (<RF_D11000A(|L),4*CIWL_T2(01|02),RF_R80(1|2)G0|RF_RRR8000G3,                                       \
3983      6*(RF_BB8500G3|RF_BB8500G13|RF_BBL8100G3|RF_BBL8218G3))|                                            \
3984      (<(6*(RF_BB8500G3|RF_BB8500G13|RF_BBL8100G3|RF_BBL8218G3)L),RF_R80(1|2)G0L|RF_RRR8000G3L,           \
3985      4*CIWL_T2(01|02)L)
3986
3987  # EP 4 Long Distance 1980s
3988  $DEF E4PL8=(<(3*CIWL_T2A),6*RF_1260(0BC10|0BC10X|4BC10X),RF_12800BR6X,RF_12400D12(|L))|                 \
3989      (<(3*RF_WL4601),RF_12000R(1|2),6*RF_12750BC10XO,RF_BBR10800(|A),RF_12400D12)|                       \
3990      (<(3*CIWL_T2A),6*RF_BBL10(601|602),RF_BBR10800(|A),RF_DDE10400(|A))|                                \
3991      (<(3*CIWL_T2AL),6*RF_BBL10(601|602)L,RF_BBR10800(|A)L,RF_DDE10400(|A)L|RF_DGCT20(29|09)(|L))|       \
3992      (<RF_8100D8_EST(|1)L,(6*RF_12(232B12|200B12A|200B12B|300B12X1|301B12X)L),                           \
3993      RF_12850AR5X1L|RF_12800BR6XL,(3*RF_12(000A10|100A10X1|100A10X3|100A10X2|000A12TV1|000A12TV2)L))|    \
3994      (<(3*RF_AA100(00|01|02|02A|02B|22|02O)),RF_BBR10800(|A),6*RF_BB10(200O|218|200|200GC3D|212A),       \
3995      RF_DDE10400(|A)|RF_DGCT20(29|09)(|L))|                                                              \
3996      (<RF_8100D8_EST(|1),(6*RF_12(232B12|200B12A|200B12B|300B12X1|301B12X)),RF_12850AR5X1|RF_12800BR6X,  \
3997      (3*RF_12(000A10|100A10X1|100A10X3|100A10X2|000A12TV1|000A12TV2)))|                                  \
3998      (<RF_DGCT20(29|09)(|L)|RF_12400D12(|L),RF_12800BR6XL,6*RF_1260(0BC10|0BC10X|4BC10X)L,3*CIWL_T2AL,   \
3999      RF_DDE10400(|A)L)|                                                                                  \
4000      (<(3*RF_AA100(00|01|02|02A|02B|22|02O)L),RF_BBR10800(|A)L,6*RF_BB10(200O|218|200|200GC3D|212A)L,    \
4001      RF_DDE10400(|A)L)|                                                                                  \
4002      (<(3*RF_WL4601L),RF_12000R(1|2)L,6*RF_12750BC10XOL,RF_BBR10800(|A)L,RF_12400D12L)|                  \
4003      (<4*RF_T2(01|02|03),RF_R805A,6*(RF_12600BC10|RF_12600BC10X|RF_12604BC10X|RF_12750BC10XO),           \
4004      RF_D11000(C|D)(|L))|                                                                                \
4005      (<RF_DGCT20(29|09)(|L)|RF_D11000(C|D)(|L),RF_R805AL,                                                \
4006      6*(RF_12600BC10L|RF_12600BC10XL|RF_12604BC10XL|RF_12750BC10XOL),4*RF_T2(01|02|03)L)
4007
4008  # EP 4 Train Middle Distance 1980s
4009  $DEF E4PR1=(<(3*RF_BB9201(|A)),RF_R804(|A|B)|RF_R805(|A)|RF_RRR9900(|A),RF_AA9100(|A),RF_8000B12R_NI,   \
4010      (RF_D8_8000PA(|1|2|3|4|5|6)|RF_D8_8100PA(|1|2|5|6)))|                                               \
4011      (<(RF_D8_8000PA(|1|2|3|4|5|6)L|RF_D8_8100PA(|1|2|5|6)L),RF_8000B12R_NIL,RF_AA9100(|A)L,             \
4012      RF_R804(|A|B)L|RF_R805(|A)L|RF_RRR9900(|A)L,(3*RF_BB9201(|A)))
4013  $DEF E4FS=1-5*E_EALOS(|[!E])|E4T|E4G
4014
4015  # EP 4 Freight short
4016  $DEF E4FS1=(3-4*(RF_MMQ_250273E|RF_MMQ_250273))|(3-4*(E_UAS))|(3-4*(E_EALOS(|[!E])))|                   \
4017      (3-4*(RF_T3(|L)))|(3-4*(E_HABIS))|(3-4*(E_SHIM))|(3-4*(RF_J60000(1|2)))|(3-4*(RF_EKKLOS))|          \
4018      (3-4*(RF_RRP_USAF(L)))|(3-4*(RF_PT20017(L)))|(3-4*(RF_TRFS1))|(3-4*(RF_HEE2013))|                   \
4019      (3-4*(RF_J600000(A|C|B|H|HL)|RF_J500000(D|H1|H1L|DRH|DR|DW|DWH)))|                                  \
4020      (3-4*(RF_MMQ_250273E|RF_MMQ_250273))|                                                               \
4021      (RF_RGS1[O:C2R_RF4,8,13][O:C2R_RF4,70,13][O:C2I_SIEMENS1,132,13],                                   \
4022      RF_RGS1[O:C2_OBB,8,13][O:C2_EZ3,70,13][O:C2_DSR,132,13],                                            \
4023      RF_RGS1[O:C2_DEUT1,8,13][O:C2037,70,13][O:C2031,132,13])|                                           \
4024      (3-4*(RF_RGS2[OB:BOILERRINGS,14,13][OB:BOILERRINGS,68,13]|RF_RGS2[OB:BETON2,,13]))|                 \
4025      (3-4*(TF_4_HFHS2148(|F|B)(|L)|TF_4_HCFHS2141(|L)))
4026
4027  # EP 4 Freight long
4028  $DEF E4F0=10-16*(E_UAS|E_EALOS|E_HABIS|E_SHIM)
4029  $DEF E4F1=8-15*E_UAS
4030  $DEF E4F2=10-18*RF_T3(|L)
4031  $DEF E4F3=12-16*E_EALOS(|[!E])
4032  $DEF E4F4=10-15*(RF_EKKLOS|RF_PT20017(L)|RF_RRP_USAF(L)|RF_J60000(1|2)|RF_GS(1|2|3|4|5|6|7|8))
4033  $DEF E4F=E4F(3:0|1|2|3|4)
4034  $DEF E4FL1=5*E4FS1
4035
4036  # EP 5 Long Distance 1994
4037  $DEF E5PL4=(<(RF_WL26XGC_EST(|L)|RF_WL26X_EST(|L)),2*RF_AA100(22|02B|02A)(|L),RF_BBR10800(|A)(|L),      \
4038      5*(RF_BBL9600(|O)(|L)|RF_BBL10(602|601)(|L)|RF_BB10(212|200GC3D|218|200)(|L)),                      \
4039      RF_DGDC3001O|RF_8100D8_EST(|1)|RF_DDE10400(|A)(|L)|RF_DDE10400(|A)(|L)|RF_(DGCT2005|PS2028)(|L))|   \
4040      (<(3*RF_T2L),6*RF_BC11000(D|C|B|A),RF_BBR10800(|A),RF_D11000(C|A|B|D))|                             \
4041      (<(3*RF_WL5302),6*RF_BC11000(D|C|B|A)L,RF_BBR10800(|A)L,RF_D11000(C|A|B|D)L)|                       \
4042      (<(3*RF_WL4601),RF_12000R(1|2),6*RF_12750BC10XO,RF_BBR10800(|A),RF_12400D12)|                       \
4043      (<(3*RF_WL4601L),RF_12000R(1|2),6*RF_12750BC10XO,RF_BBR10800(|A),RF_12400D12)|                      \
4044      (<RF_(DGCT2005|PS2028)(|L)|RF_LR_DG90(1|2)(|L),(2*RF_T2B),RF_LR_R90(1|2|3),                         \
4045      (6*RF_LR_BC10X90(1|2|3)P))|                                                                         \
4046      (<(6*RF_LR_BC10X90(1|2|3)D),RF_LR_R90(1|2|3)L,2*RF_T2B,RF_LR_DG90(1|2)(|L))|                        \
4047      (<(3*RF_LR_A9T0(1|2|3|4|5|6)),RF_LR_AR7T|RF_LR_BR4T|RF_LR_BR3T02|RF_LR_BR3T01,                      \
4048      (6*RF_LR_B1(0|1)T0(101|201|102|202)))|                                                              \
4049      (<(3*RF_LR_A12T0(1|2|3)),(6*RF_LR_B1(0|1)T0(101|201|102|202)))|                                     \
4050      (<(6*RF_LR_B1(0|1)T0(101|201|102|202)L),(3*RF_LR_A12T0(1|2|3)L))|                                   \
4051      (<(6*RF_LR_B1(0|1)T0(101|201|102|202)L),RF_LR_AR7TL|RF_LR_BR4TL|RF_LR_BR3T02L|RF_LR_BR3T01L,        \
4052      3*RF_LR_A9T0(1|2|3|4|5|6)L)|(<3*RF_LR_T20(1|2|3)L,RF_LR_R90(1|2|3)L,6*RF_LR_BC10X90(1|2|3)D)|       \
4053      (<6*RF_LR_BC10X90(1|2|3)P,3*RF_LR_T20(1|2|3))|                                                      \
4054      (<3*RF_LR_T20(1|2|3),6*RF_BC11000(D|C|B|A)L,RF_DDT9450(|A|O)(|L)|RF_(DGCT2005|PS2028)(|L))|         \
4055      (6*RF_BC11000(D|C|B|A),RF_LR_R90(1|2|3),3*RF_LR_T20(1|2|3))
4056
4057  # EP 5 Long Distance 1998
4058  $DEF E5PL8=(<(3*RF_GL_A9T0(1|2|3|4)),RF_GL_AR7T,6*(RF_GL_B1(0|1)T0(101|201|102|202)))|                  \
4059      (<(6*RF_GL_B11T0(101|102|103|104|203)L),RF_GL_BR(4T|3T02|3T01)L,(3*RF_GL_A12T0(1|2|3|4)L))|         \
4060      (<RF_DDT9450(|O|A)(|L),2*RF_T2B,RF_GL_R90(1|2|3),6*(RF_GL_BC10X90(1|2|3)))|                         \
4061      (<(6*RF_GL_B1(0|1)T0(101|201|102|202)L),RF_GL_AR7TL,(3*RF_GL_A9T0(1|2|3|4)L))|                      \
4062      (<(3*(RF_GL_A10X0(1|2|3|4)|RF_GL_A8LV0(1|2))),RF_GL_BR4X0(1|2|3),2*RF_GL_B11X0(1|2|3),              \
4063      2*(RF_GL_BC10X0(1|2|3)))|                                                                           \
4064      (<(3*(RF_GL_A10X0(1|2|3|4)L|RF_GL_A8LV0(1|2)L)),RF_GL_BR4X0(1|2|3)L,2*RF_GL_B11X0(1|2|3)L,          \
4065      2*(RF_GL_BC10X0(1|2|3)L))|                                                                          \
4066      (<(2*(RF_GL_B11X0(1|2|3)L)),2*(RF_GL_B11X0(1|2|3)L),RF_GL_BR4X0(1|2|3)L,                            \
4067      (3*(RF_GL_A10X0(1|2|3|4)L|RF_GL_A8LV0(1|2)L)))|                                                     \
4068      (<(3*RF_GL_A12T0(1|2|3|4)),RF_GL_BR(4T|3T02|3T01),(6*RF_GL_B11T0(101|102|103|104|203)))|            \
4069      (<(6*RF_GL_BC10X90(1|2|3)L),RF_GL_R90(1|2|3)L,2*RF_T2B,RF_DDT9450(|O|A)(|L))|                       \
4070      (<(3*RF_BB10000GL|RF_NBBL10000GL),RF_BBR10000GL,4*RF_AA10000GL,RF_DD10000GL)|                       \
4071      (<3*RF_GL_T20(1|2|3|4|5)L,RF_GL_R90(1|2|3)L,6*(RF_GL_BC10X90(1|2|3)L|RF_BC10R_822(9|8)L),           \
4072      RF_D8_8100LR(|L))|                                                                                  \
4073      (<RF_D8_8100LR(|L),6*(RF_GL_BC10X90(1|2|3)|RF_BC10R_822(9|8)),RF_GL_R90(1|2|3),                     \
4074      3*RF_GL_T20(1|2|3|4|5))
4075
4076  # EP 5 Freight short
4077
4078  $DEF E5FS=(1-3*E_HABIS|E_SHIM)|(1-3*E5C)|(1-3*(E_UAS|E_EALOS|E_HABIS|E_SHIM))|                          \
4079      (1-3*((RF_GBS_267(1154A|1154B|1154C|1154D)(|L))|(RF_GBGS_417(1154A|1154B|1154C|1154D)(|L))))|       \
4080      (1-3*(CP_UACS_CIMPOR|CP_ZAES_TRANSFESA|RF_ZAES))|                                                   \
4081      (1-3*(RF_HABISS1A|RF_HABISS3A|RF_HABISS4A|RF_HABISS2A))|(1-3*(RF_HBIS|RF_G1))|                      \
4082      (1-3*(RF_TAGPPS|RF_TGPPS))|(1-3*(RF_EALOS2|RF_EALOS2B|RF_EALOS2C))|                                 \
4083      (1-3*(RF_SHIMMS4774A|RF_SHIMMS4774B|RF_SHIMMS4768BL|RF_SHIMMS4768B),CP_SGS2[O:C4R_POST_CORREOS])
4084
4085  # EP 5 Freight long
4086  $DEF E5FL1=8-9*E5FS
4087  $DEF E5FL2=14-16*(RF_5SDGKKMSS[OB:(STRAIL_POWERCORE1|STRAIL_PANEUROPA2L|STRAIL_ESTRELLAL|               \
4088      STRAIL_NORFOLKLINEL|STRAIL_COMBIPLANTL),10,4][OB:(STRAILST1),24,9]|                                 \
4089      RF_5SDGKKMSSL[OB:STRAIL_SPAIN|STRAIL_BLUECARGO|STRAIL_ARCESE|STRAIL_CONTINENTAL|                    \
4090      STRAIL_CRAFTRANSPORT,20,4][OB:STRAILST1,137,9])
4091  $DEF E5FLM=5:E5FL1|1:E5FL2
4092
4093  # EP 6 Long Distance
4094  $DEF E6PL1=(<RF_DG9,6*RF_(B11T1|TR_B11T0102|B11T2),RF_AR7T,3*RF_(A9T|TR_A9T02))|                        \
4095      (<RF_RO_A9T0(1|2)L,2*RF_RO_A12T0(1|2)L,RF_RO_BR(3|4)TL,3*RF_RO_B10T0(1|2)01L,3*RF_RO_BC10X90(1|2)L)| \
4096      (<(6*RF_2000(A|B)(_OP)),RF_RO_BR4X0(1|2)L,RF_RO_A8LVL,RF_RO_A10X02L,RF_RO_A10X01L)|                 \
4097      (<RF_WL26X_RO2(|L),3*RF_RO_BC10X90(1|2),2*(RF_RO_B10T0(1|2)01),RF_RO_BR(3|4)T,2*RF_RO_A12T0(1|2),   \
4098      RF_RO_A9T0(1|2))|(<RF_RO_A8LV,RF_RO_A10X02,RF_RO_A10X01,RF_RO_BR4X0(1|2),6*RF_2000BR_OP)|           \
4099      (<(3*RF_(A9T|TR_A9T02)L,RF_AR7TL,6*RF_(B11T1|TR_B11T0102|B11T2)L,RF_DG9L))|                         \
4100      (<(RF_(A9T|TR_A9T02)L),RF_R9L,6*RF_BC10X9L,RF_RO_T20(1|2)L)|                                        \
4101      (<RF_RO_T20(1|2),6*RF_BC10X9,RF_R9,RF_(A9T|TR_A9T02))
4102
4103  # EP 6 Freight Maintenance
4104  $DEF E6FM=(6*RF_MMQ_25027(3|4))|(6*RF_T3(|L))|(6*RF_U1)
4105
4106
4107
4108  #------------------------------------------------------------------------------
4109  #
4110  # ITALY
4111  #
4112  # EP 2 Passenger regional
4113  $DEF I2PR=FS_UM7022|FS_U4023|RA_DQU8602|FS_DUI96000,                                                    \
4114      (<FS_CT43491,FS_CT43223,FS_ABIY58616L|FS_ABIY58616,FS_BY256613)
4115
4116  # EP 2 Passenger long distance verde vagone
4117  $DEF I2PD=FS_DZ80000G,FS_CZ30000GD,FS_ABZ50100(|L),2*FS_BZ20000GD,FS_AZ10000G,CIWL_FS4161,2*FS_CZ30000GD
4118
4119  # EP 3 Treno Azzurro
4120
4121  $DEF I3PTA51W=FS_DUZ93100B(|L),                                                                         \
4122      (<FS_CZ33010B(|L),4*FS_BZ23010B(|L),CIWL_WR2749L,CIWL_WSP4131(|L),4*FS_AZ13010B2(|L))
4123  $DEF I3PTA51O=FS_DUZ93100B(|L),                                                                         \
4124      (<4*FS_AZ13010B2(|L),CIWL_WSP4131(|L),CIWL_WR2749,4*FS_BZ23010B(|L),FS_CZ33010B(|L))
4125  $DEF I3PTA60W=FS_DUZ93100AZU(|L),                                                                       \
4126      (<3*FS_BZ33010AZU(|L),CIWL_WSPC4148L,CIWL_WSP4131(|L),CIWL_WR2749L,3*FS_AZ13010AZU(|L))
4127  $DEF I3PTA60O=FS_DUZ93100AZU(|L),                                                                       \
4128      (<3*FS_AZ13010AZU(|L),CIWL_WR2749,CIWL_WSP4131(|L),CIWL_WSPC4148,3*FS_BZ33010AZU(|L))
4129  $DEF I3PTA62W=FS_DUZ93100AZU(|L),                                                                       \
4130      (<3*FS_BZ45(0|1)00AZU(|L),CIWL_WSPC4148L,CIWL_WSP4131(|L),CIWL_WR2749L,3*FS_AZ23600AZU(|L))
4131  $DEF I3PTA62O=FS_DUZ93100AZU(|L),                                                                       \
4132      (<3*FS_AZ23600AZU(|L),CIWL_WR2749,CIWL_WSP4131(|L),CIWL_WSPC4148,3*FS_BZ45(0|1)00AZU(|L))
4133  $DEF I3PTA6XO=FS_DUZ93100AZU(|L),                                                                       \
4134      (<FS_BRZ45260AZU,3*FS_BZ45(0|1)00AZU(|L),CIWL_WSP4131(|L),CIWL_WSPC4148,CIWL_WR2749,                \
4135      4*FS_AZ23600AZU(|L))
4136  $DEF I3PTA6XW=FS_DUZ93100AZU(|L),                                                                       \
4137      (<4*FS_AZ23600AZU(|L),CIWL_WR2749L,CIWL_WSPC4148L,CIWL_WSP4131(|L),3*FS_BZ45(0|1)00AZU(|L),         \
4138      FS_BRZ45260AZUL)
4139
4140  # EP 2/3 Passenger long Distance 1936-56 castano - isabella
4141  $DEF I3PLA=(<FS_3B_DUZ95000,3*FS_CZ33010B,FS_ABZ53000B,FS_ABZ50100IS,FS_AZ13010B,2*FS_CZ33010B,         \
4142      FS_CZ33000B)|                                                                                       \
4143      (>FS_3B_DUZ95000,3*FS_CZ33010BL,FS_ABZ50100ISL,FS_ABZ53000BL,FS_AZ13010BL,2*FS_CZ33010BL,           \
4144      FS_CZ33000BL)
4145
4146  # EP 3 Passenger long Distance 1956-58 castano - isabella
4147  $DEF I3PB6L=(<FS_DZ83000B,1*FS_AZ20500IS,FS_AZ23500,FS_ABZ64100IS1L,0-1*CIWL_WR3354(|L),2*FS_BZ23010B,  \
4148      2*FS_BZ33010V2,2*FS_BZ330(10|00)BC)|                                                                \
4149      (>FS_DZ83000BL,2*FS_AZ23500L,FS_ABZ64100IS1,0-1*CIWL_WR3354(|L),2*FS_BZ23010BL,2*FS_BZ33010V2L,     \
4150      2*FS_BZ330(10|00)BCL)
4151
4152  # EP 3 Passenger long Distance 1958-60  castano - isabella
4153  $DEF I3PL=(<FS_ABZ53000C(|L)|FS_ABZ52000B(|L),FS_AZ23010C|FS_AZ53010CL|FS_AZ13010CL,                    \
4154      FS_AZ13010C|FS_AZ23010CL|FS_AZ53010C,2*FS_BZ33010CL,3*FS_BZ33010C,FS_DUZ93100C)|                    \
4155      (<FS_3DZ80000BH,FS_BZ32000BC,FS_AZ(32010BC|52010BCL|13010BC),FS_ABZ53000BCL,                        \
4156      CIWL_W(SPC4148|SP4131|R2749)(|L),4*FS_BZ3(3000BC|3010BC|2000BC)L)|                                  \
4157      (>FS_3DZ80000BHL,FS_BZ32000BCL,FS_AZ(32010BCL|52010BC|13010BCL),FS_ABZ53000BC,                      \
4158      CIWL_W(SPC4148|SP4131|R2749)(|L),4*FS_BZ3(3000BC|3010BC|2000BC))|                                   \
4159      (<FS_3DZ80000BH,FS_ABZ64100IS2|FS_ABZ64500IS|FS_ABZ64500IS2|FS_ACBCZ64320,2*FS_AZ20500IS2,          \
4160      0-1*CIWL_3_WR3000F(|L),3*FS_BZ45000IS|FS_BZ45100IS,2*FS_BCZ33901)|                                  \
4161      (>FS_3DZ80000BHL,FS_ABZ64100IS2L|FS_ABZ64500ISL|FS_ABZ64500IS2L|FS_ACBCZ64320L,2*FS_AZ20500IS2L,    \
4162      0-1*CIWL_3_WR3000F(|L),3*FS_BZ45000ISL|FS_BZ45100ISL,2*FS_BCZ33901L)
4163
4164  # EP 3 Passenger long Distance 1960-1964 - castano
4165  $DEF I3PCL=(<FS_DZ83000B2,3*FS_AZ(52010B|32010B|23600CA),FS_ABZ53000B2L|FS_ABZ52000BL,                  \
4166      CIWL_W(SPC4148|SP4131|R2749)(|L),2*FS_BZ32000B,3*FS_BZ33(000B|010B))|                               \
4167      (>FS_DZ83000B2L,3*FS_AZ(52010B|32010B|23600CA)L,FS_ABZ53000B2|FS_ABZ52000B,                         \
4168      CIWL_W(SPC4148|SP4131|R2749)(|L),2*FS_BZ32000BL,3*FS_BZ33(000B|010B)L)|                             \
4169      (<FS_DZ83000B2,2*FS_BZ33010BL,FS_UICY_BZ2099B,FS_UICY_ABZ3099B,FS_UICY_AZ1099B,FS_ABZ53000B2L,      \
4170      FS_BZ33010BL,FS_BZ32000B)|                                                                          \
4171      (>FS_DZ83000B2L,2*FS_BZ33010B,FS_UICY_BZ2099BL,FS_UICY_ABZ3099BL,FS_UICY_AZ1099BL,FS_ABZ53000B2L,   \
4172      FS_BZ33010B,FS_BZ32000BL)
4173
4174  # EP 3 Passenger long Distance 1966
4175  $DEF I3PC6L=(<FS_DZ83000D(|L),4*FS_BZ33010D,FS_BRZ45260E,2*FS_4AZE,FS_4ABZ64100E)|                      \
4176      (>FS_DZ83000D(|L),4*FS_BZ33010DL,FS_BRZ45260EL,2*FS_4AZEL,FS_4ABZ64100EL)|                          \
4177      (<FS_DUZ93100DL,4*(FS_30000E|FS_4BZ20000E|FS_32000E|FS_4BZ50100E),FS_BZ33010D,                      \
4178      2*(FS_4AZ21000E|FS_4AZ20000E|FS_ABZ50100E),FS_4A_ABZ50100)|                                         \
4179      (>FS_DUZ93100D,4*(FS_30000EL|FS_4BZ20000EL|FS_32000EL|FS_4BZ50100EL),FS_BZ33010DL,                  \
4180      2*(FS_4AZ21000EL|FS_4AZ20000EL|FS_ABZ50100EL),FS_4A_ABZ50100L)
4181
4182  # EP 3 Passenger regional
4183  $DEF I3PR=(<FS_EACIZ669202L|FS_EACIZ669202|FS_BCZ69100L|FS_BCZ69100|FS_BCZ69700L|FS_BCZ69700,           \
4184      FS_CI35300DL|FS_CI35300D|FS_ECIZ634730D|FS_ECIZ634730DL|FS_ECIZ734800D|FS_BZ34100D|FS_BZ34100DL|    \
4185      FS_BI35300D,                                                                                        \
4186      FS_CZ34700DL|FS_CZ38000DL|FS_CZ38000D|FS_CZ38244DL|FS_CZ38244D|FS_ECI735850DL|FS_ECI735850D|        \
4187      FS_ECIZ734800DL,FS_TERR_BCDT2C|FS_TERR_BCDT3C)|                                                     \
4188      (<FS_BZ39000A,FS_BZ27000A,FS_ABZ66502,FS_BIY34000A,FS_BDIY67400A,FS_DI92000B)|                      \
4189      ((0-1*FS_DUZ93000V0),FS_30000IS|FS_31000IS,FS_BZ27000IS,FS_BZ32000CA|FS_BZ33010V2L,                 \
4190      FS_BI35300DL|FS_BZ38244DL,FS_BZ42000A|FS_AZ13000V0,FS_AZ13010BCL)|                                  \
4191      (<(3*(FS_BZ34100NL|FS_BZ34100N|FS_BZ38000NL|FS_BZ38000N|FS_BZ38244N|FS_BZ69100NL|FS_BZ69100N|       \
4192      FS_BZ69700NL|FS_BZ69700N)),FS_EABZ669202NL|FS_EABZ669202N,FS_BZ38900NL|FS_BZ38900N,FS_DUZ93100CL)
4193
4194  # EP 3 Freight short
4195  $DEF I3FS1=(2-3*(FS_HE2(A|B|C)))|(2-3*(FS_HCCKRSUV(A|B|C)))|(2-3*(FS_HFHS(|2)(A|B|C)))|                 \
4196      (2-3*(FS_HG4|FS_HGB|FSE_3GS029(|L)))|(2-3*(FS_TRAMOG(1|2)))|(2-3*(FS_DMB))|(2-3*(FS_L|FS_LH))|      \
4197      (2-3*(FS_GHMS(A|7|2A|3A|3C|7C|8A|9A|10A|10C|11A|11C|4A|4C|6A|5A|6AL)))|                             \
4198      (2-3*FS_3_F(010|011(|L)|013(|L)|013R(|L)|014U|014(|L)|014R(|L)|034(|L)|035(|L)|MA037(|L)|MA038|     \
4199      101(|L)|014RU|028(|L)|028E(|L)|029(|L)|029E(|L)|032(|L)|032E(|L)|033(|L)|033E(|L)))|                \
4200      (2-3*FS_3_G00(3|4)(|L))|(2-3*FS_3_FB_F02(0|1)(|L))|(2-3*FS_3_HGB_H0(31|28|28T1|29|29T1)(|L))|       \
4201      (2-3*FS_3_(HIS_H022|HG_H018(|V)|HG_H021|HG_H026|HG_H027|HG_H037)(|L))|                              \
4202      (2*(FS_FDIA(|L)|FS_HCCRSUZ(B|A|C)|FS_HCCQRSZ(B|A|C)))|(2-3*(FS_KS[O:(BOX6|BOX33|PIPE24),,17]))|     \
4203      (2-3*((FS_E|FS_E_C(|1|2|3|4)|FS_L1|FS_EH_C1|FS_E_C5)))|(2-3*FS_HBILLNS(3|2)(|L))|                   \
4204      (2-3*(FS_M(4|3|1|2)))|(2-3*(FS_GS(A|C|2A)))|(2-3*(FS_3OHW[OB:WOOD105,,12]))|                        \
4205      (2-3*(FS_3B_(HG_MOT|GMHS1)(|L)))|(2-4*(FS_3_L1056(|H)(|A)(|L)[OB:FR_KO44,8,22]))|                   \
4206      (2-3*FS_3F(029Z1|029Z1E2|029Z2E1|029A|029AE2)(|L))|                                                 \
4207      (2-3*FS_3F(029Z1E1|029Z2|029Z2E2|029AE1|029AS)(|L))|(2-3*FS_3FI1403(|L))    
4208
4209
4210  $DEF I3FS=2*I3FS1
4211
4212  # EP 3 Freight long
4213  $DEF I3F1=6-7*I3FS1
4214
4215  # EP 4 Passenger long distance
4216  $DEF I4PL=(0-1*(FS_XDR|FS_DXE)),(1-2*(FS_4B_A1100KTL|FS_1070GA)),0-1*(FS_4B_AB3100KTL|FS_4B_BR8550T),   \
4217      (3-5*(FS_4B_B2100K|FS_BZXB))|                                                                       \
4218      (<(FS_DUZ93100D|FS_4A_UICX70DZ|FS_4A_UICX70UMIZ1)L|FS_4UIZ1550E,FS_4A_UICX68DZ,FS_4BCZ33901E,       \
4219      2*(FS_4_UICX75AL|FS_4A_AUICX64B1L|FS_4A_UICX68A2L|FS_4A_UICX70AL),                                  \
4220      (FS_4A_UICX75ABL|FS_4A_ABUICX64(A|B)1L|FS_4B_UICX70ABL),(FS_4A_BRUICX64AL|FS_4A_UICX70BR(1|2)L),    \
4221      5*(FS_4_UICX75BL|FS_4A_UICX68B1L|FS_4A_UICX70B1L|FS_4A_BUICX64BL|FS_4A_UICX68B2L),FS_KZ48600)|      \
4222      (<FS_KZ48600L,5*(FS_4_UICX75B|FS_4A_UICX70B1|FS_4A_BUICX64B|FS_4A_UICX68B1|FS_4A_UICX68B2),         \
4223      (FS_4A_BRUICX64A|FS_4A_UICX70BR(1|2)),(FS_4A_ABUICX64(A|B)1|FS_4B_UICX70AB|FS_4A_UICX75AB),         \
4224      2*(FS_4A_AUICX64B1|FS_4A_UICX68A2|FS_4A_UICX70A|FS_4_UICX75A),FS_4BCZ33901EL,FS_4A_UICX68DZL,       \
4225      FS_4UIZ1550E,(FS_DUZ93100D|FS_4A_UICX70DZ|FS_4A_UICX70UMIZ1|FS_4A_UICX76UMIZ))|                     \
4226      (3*(FS_4A_BZ2102TL|FS_4A_BZ2102T|FS_4A_BZ2102KTL|FS_4A_BZ2102KT|FS_4A_BZ2103TL),                    \
4227      (FS_4A_AZ1101TL|FS_4A_AZ1101T|FS_4A_AZ1101KTL|FS_4A_AZ1101KT),FS_4A_BR8551K,                        \
4228      2*(FS_4A_BZ2102L|FS_4A_BZ2102|FS_4A_BZ2102KL|FS_4A_BZ2102K|FS_4A_BZ2103L),                          \
4229      (FS_4A_AB3100L|FS_4A_AB3100),FS_DZ83000DL)|                                                         \
4230      (<FS_DZ83000D|FS_DUZ93100D,FS_AZ23010D|FS_AZ20500|FS_AZ53010D|FS_4AZ23500E,                         \
4231      FS_AZ13010G|FS_AZ23010D,4*(FS_BZ33010G|FS_4ACBCZ64300E),FS_ABZ53000G|FS_4ABZ64100E,FS_4BZ33000E,    \
4232      FS_4ACBCZ64300E)|                                                                                   \
4233      (<FS_4ACBCZ64300EL,FS_4BZ33000EL,FS_ABZ53000GL|FS_4ABZ64100EL,4*(FS_BZ33010GL|FS_4BZ33000EL),       \
4234      FS_AZ13010GL|FS_AZ23010DL,|FS_AZ53010DL|FS_AZ53010DL|FS_4AZ23500EL,FS_DZ83000DL|FS_DUZ93100DL)|     \
4235      (<FS_DUZ93100DL,3*FS_4A_B2100K,FS_4A_BR8550L,FS_4A_AZ1101L,FS_4A_AZ1101KL,3*FS_4A_BZ2103KL)|        \
4236      (<2*FS_4B_UICX80BC,3*FS_4A_UICX68BC,                                                                \
4237      (FS_4ACBCZ64302EL|FS_4ACBCZ64320EL,FS_4ACBCZ64302E)|(2*FS_4A_UICX75ACBCL),FS_4_MU81L,               \
4238      FS_4_T2S|FS_4_MU72L,FS_4_T2SL,CIWL_4_UH2,FS_4ABZ64191E,2*FS_4B_UICX80BCL,FS_4BRZ45991EL)|           \
4239      (<FS_4BRZ45991E,2*FS_4B_UICX80BC,FS_4ABZ64191EL,CIWL_4_UH2L,FS_4_T2S,FS_4_T2SL,                     \
4240      FS_4_MU81|FS_4_MU72,(FS_4ACBCZ64302EL,FS_4ACBCZ64302E|FS_4ACBCZ64320E)|(2*FS_4A_UICX75ACBC),        \
4241      3*FS_4A_UICX68BCL,2*FS_4B_UICX80BCL)|                                                               \
4242      (<FS_4BZ45100E[BC:-20,20,2,8,232],2*FS_4A_B2100KL,FS_UICX64WR,                                      \
4243      FS_AZ52010G|FS_AZ32010G|FS_AZ32010TRF2|FS_AZ32010TRF1,                                              \
4244      FS_UICY_AZ1099GC|FS_UICY_AZ1099G|FS_UICY_AZ1099R|FS_UICY_AZ1099,                                    \
4245      FS_UICY_ABZ3099GL|FS_UICY_ABZ3099GL|FS_UICY_ACBCZ4099GL,FS_UICY_BZ2099G,FS_UICY_BCZ5099G)|          \
4246      (>FS_4BZ45100EL[BC:-20,20,2,8,232],2*FS_4A_B2100K,FS_UICX64WR,                                      \
4247      FS_AZ52010GL|FS_AZ32010GL|FS_AZ32010TRF2L|FS_AZ32010TRF1L,                                          \
4248      FS_UICY_AZ1099GCL|FS_UICY_AZ1099GL|FS_UICY_AZ1099RL|FS_UICY_AZ1099L,                                \
4249      FS_UICY_ABZ3099G|FS_UICY_ABZ3099G|FS_UICY_ACBCZ4099G,FS_UICY_BZ2099GL,FS_UICY_BCZ5099GL)
4250
4251  # EP 4 Passenger regional
4252  $DEF I4PR=((1-2)*FS_BZ36000,FS_BZ38244E|FS_BZ69700E)|                                                   \
4253      ((3-5*(FS_BZ38244E|FS_BZ36000|FS_BZ69100EL)),FS_AZ50000E,(0-1*FS_DUZ93100E),(0-2*FS_GS))|           \
4254      (3*FS_B36000C,FS_BZ38244E,FS_AZ50000E,0-1*(FS_4DZ88200E|FS_4UMIZ8500E(|L)|FS_DZ83000D(|L)))|        \
4255      (FS_AZ_R,FS_BZ_G,FS_BZ38244E,FS_BZ32000E,                                                           \
4256      0-1*((FS_4DZ78RE|FS_4DZ80000E|FS_4UZ1315E|FS_4UZ1300E|FS_4DUZ93200E|FS_4DUZ93250E)(|L)))|           \
4257      (4*(FS_BZ33010GL|FS_4B_B2100K|FS_4A_B2100T|FS_ABZ64000R(|L)|FS_AZ32010TRG(|L)))|                    \
4258      (3*FS_4BZ30800R(|L),FS_4AZ20500R(|L),0-1*FS_4R_DZ80200(|L))|                                        \
4259      (<FS_4UIZ(1550|1582|1450|1400)E(|L),FS_4DI92000EL,FS_4DI90000E,FS_4DI90000EL,FS_4A_AZ50000,         \
4260      2*FS_BZ39000C,FS_4A_ABZ52000L,FS_ABZ66504,FS_32000EL)|                                              \
4261      (<FS_32000E,FS_ABZ66504,FS_4A_ABZ52000,2*FS_BZ39000C,FS_4A_AZ50000,FS_4DI90000E,FS_4DI90000EL,      \
4262      FS_4DI92000E,FS_4UIZ(1550|1582|1450|1400)E(|L))|((1-2)*FS_BZ36000,FS_BZ38244E|FS_BZ69700E)|         \
4263      (<4*FS_4A_BUICX64A1,FS_4A_AUICX64A1,FS_4DUZ932(00|50)E(|L))|                                        \
4264      (<FS_4DUZ932(00|50)E(|L),FS_4A_AUICX64A1L,4*FS_4A_BUICX64A1L)|                                      \
4265      (<FS_4DZ80200LE,FS_BZ39000C,FS_4AZ20000E|FS_4AZ11000E|FS_4AZ21000E,FS_BZ38244EL,FS_4DI92000EL)|     \
4266      (<FS_4DI92000E,FS_BZ38244E,FS_4AZ20000EL|FS_4AZ11000EL|FS_4AZ21000EL,FS_BZ39000C,FS_4DZ80200E)|     \
4267      (<2*FS_4BZ30800E(|L),FS_4AZ20500E(|L),2*FS_4BZ30800E(|L))
4268
4269  $DEF SERVDIRETTI_IV=(1-2*SBB_4_2170,SBB_4_1970)|(DB_BCOH257,DB_4ABM225BBL,(0-1*DB_BM234PK))|            \
4270      (2-3*FS_4B2071EUL)
4271
4272  # EP 4 Freight short
4273  $DEF I4FS1=(2-3*FS_GABS(|1|2|3|4))|(2-3*(FS_FCC1[O:FR_KO(13|12)(|[M])]))|                               \
4274      (2-3*(FS_MIGROS_GO|FS_4HABFISH23(|L)))|(2-3*(FNM_GBHS|FSE_GS))|                                     \
4275      (2-3*(FS_HCRS_UVY|FS_4_HCRSUYA|FS_4_HCKRUVY))|(2-3*FS_4_TMS210I(|L))|                               \
4276      (2-3*(FS_4_HFHS021(|L)|FSE_4GS029(|L)|FS_4_IBFS153))|(2-3*(FALCK_E[OB:FR_UHLI,,26]))|               \
4277      (2-3*(FS_4E(|2)[O:(OMM_KOHLE_02|COAL9)(|[M]),,28]))|(3-4*CFL_FCS2M[OB:FER(3|4)M(|[M]),,40])|        \
4278      (2-3*(FS_GHMS(2A|A|3A|3C|7C|8A|9A|10A|10C|11A|11C)|FS_GMA|FS_GM2C|FS_G(|L)M(|S)A|FS_GMS3A))|        \
4279      (2-3*(FS_VSZ(|L)))|(2-3*FS_4_E220(M|N)(|L)[OB:COAL(40|42|20)(|[M]),,27])|                           \
4280      (2-4*(FS_4_ELMO1056(|A)(|H)(|L)[OB:FR_KO44,8,22]))|(2-4*FS_4A_G(S029Z2|S029A|S029C|HS1600)(|L))|    \
4281      (2-4*FS_4_G(HK007|HK011(|L)|HM038|HMS014D1(|L)|HMS013D2(|L)|HMS037(|L)|HKKMS029(|L)|HMS033(|L)))|   \
4282      (2-4*FS_4_G(HM014|HM014D2|M102(|L)|HKKMS028(|L)|LM101(|L)|M004(|L)|HMS032(|L)|HMS033A(|L)))|        \
4283      (2-3*FS_4(_IBS145|_IBS148C|A_IMS150|A_IBES150D|A_IBES150D1)(|L))|(2-3*FS_4HCRSUVY2121(|L))
4284
4285
4286  $DEF I4FS=3*I4FS1
4287
4288  # EP 4 Freight long
4289  $DEF I4FL1=8*I4FS1
4290
4291  # EP 5 Intercity
4292  $DEF I5PI=(<FS_D9590G,FS_B42071GL,FS_B42071C,FS_B42071G,FS_B42071CL,FS_4A1971O,FS_5A1971GL)|            \
4293      (<FS_5A1971G,FS_4A1971OL,FS_B42071C,FS_B42071GL,FS_B42071CL,FS_B42071G,FS_D9590GL)
4294
4295  # EP 5 Freight short
4296  $DEF I5GS1=(3-4*(FS_RGMMS[OB:PIPE(33|10),15,12][OB:PIPE(33|10),75,12]))|                                \
4297      (3-4*(FS_SHIMMNS|FS_SHIMMS1|FS_SGNSS|                                                               \
4298      FS_SGNSS[O:BOX745H_SPINELLI(1|2|3),5,13][O:BOX745H_SPINELLI(1|2|3),119,13]))|                       \
4299      (3-4*(FS_SGNS_GLOBAL_SAINT|FS_SGS[OB:SAND(9|11|10)(|[M]),,16]))|(3-4*FS_FCC1M)|                     \
4300      (3-4*((FS_UASCITA(|L)|FS_UASSMG(|L)|FS_UAS_CITA2)))|(3-4*(FS_SPNNS[OB:WOOD33(|[M]),,13]))|          \
4301      (3-4*(FS_HBBILLNS(|2|3)|FS_HABIS1|FS_HABBINSS_XMPR|FS_HBILLNS1))|                                   \
4302      (3-4*FS_EANOS3[OB:SCRAP(4|5)(|[M]),,33])|(3-4*(FS_AUSILIARE_MILANO|FS_Z_AUSMIL2))|                  \
4303      (3-4*(FS_IBBEHKS|FS_5HABFISH23)(|L))|(3-4*(FS_UC_MONTEDISON))|(3-4*(FS_GABS|FS_GABS5))|             \
4304      (3-4*(FS_TADGNS|FS_TAEMS))|(3-4*(FS_RGS(|L)))|(3-4*(FS_HBCCQ_W))|                                   \
4305      (3-4*FS_4E(|2)[O:FR_KO14(|[M]),,28])|(3-4*(FS_GSC|GT08F|FS_RGS(|L)|FS_RGS|FS_SDGKKMMS|GT08OMV))
4306
4307  # EP 5 Freight long
4308  $DEF I5GMIX=5*I5GS1
4309
4310  # EP 6 Long distance Train
4311  $DEF I6PS=(<FS_9590X|FS_9590XNL|FS_9590XN,5*(FS_2190XN2|FS_2890XNL|FS_2890XN),                          \
4312      (FS_8890XL|FS_8890X|FS_8890XNL|FS_8890SXL|FS_8890SX),3*(FS_1990XL|FS_1990XNL))
4313
4314  # EP 6 Intercity
4315  $DEF I6PI=(<FS_6B2071B,FS_6B2071,FS_6A1971,FS_6A1971B,FS_6B2071L,2*FS_6B2071BL)|                        \
4316      (<(3*(FS_1898XL|FS_1898X|FS_1898XDL|FS_1898XD|FS_1898XNL|FS_1898XN|FS_1898XNDL|FS_1898XND|          \
4317      FS_1898SXL|FS_1898SX|FS_1898SXDL|FS_1898SXD|FS_1898SXNL|FS_1898SXN|FS_1898SXNDL|FS_1898SXND|        \
4318      FS_1898PL|FS_1898P|FS_1898PDL|FS_1898PD|FS_1898SPL|FS_1898SP|FS_1898SPDL|FS_1898SPD)),              \
4319      (FS_8898XL|FS_8898X|FS_8898XDL|FS_8898XD|FS_8898XNL|FS_8898XN|FS_8898XNDL|FS_8898XND),              \
4320      5*(FS_6B2171CL|FS_6A1971C|FS_6A1971CL))
4321
4322
4323  # EP 6 Regional Double Deck push left
4324  $DEF I6PRDL=(<FS_ADP_NPB_XL,3*FS_ADP_NB_XL,FS_E633XMPR)|                                                \
4325      (<FS_ADP_NPB_XNL,3*(FS_ADP_NB_XNL|FS_ADP_NB36XNL))|(<FS_ADP_NPBH_XAL,3*(FS_ADP_NB_XA|FS_ADP_NA_XA))
4326
4327  # EP 6 Regional Double Deck push right
4328  $DEF I6PRDR=(<(3*(FS_ADP_NB_X)),FS_ADP_NPB_X)|(<(3*(FS_ADP_NB_XN|FS_ADP_NB36XN)),FS_ADP_NPB_XN)|        \
4329      (<(3*(FS_ADP_NB_XAL|FS_ADP_NA_XAL)),FS_ADP_NPBH_XA)
4330
4331  # EP 6 Regional
4332  $DEF I6PRU=(<FS_5_A1100(R|KR|RR|KRR)L,(FS_5_AB3100RRL|FS_5_AB3100KRRL),5*(FS_5_B2100RRL|FS_5_B2100KRRL))| \
4333      (<(5*(FS_5_B2100RR|FS_5_B2100KRR)),FS_5_A1100(R|KR|RR|KRR),(FS_5_AB3100RR|FS_5_AB3100KRR))
4334
4335  # EP 6 Freight short
4336  $DEF I6GS1=(3-4*(FS_RGMMS[OB:PIPE(33|10),15,12][OB:PIPE(33|10),75,12]))|                                \
4337      (3-4*(FS_SHIMMNS|FS_SHIMMS1|FS_SGNSS|(3-4*FS_UAGPPS_MONFERM)|                                       \
4338      FS_SGNSS[O:BOX745H_SPINELLI(1|2|3),5,13][O:BOX745H_SPINELLI(1|2|3),119,13]))|                       \
4339      (3-4*(FS_SGNS_GLOBAL_SAINT|FS_SGS[OB:SAND(9|11|10)(|[M]),,16]))|                                    \
4340      (3-4*((FS_UASCITA(|L)|FS_UASSMG(|L)|FS_UAS_CITA2)))|(3-4*(FS_SPNNS[OB:WOOD33(|[M]),,13]))|          \
4341      (3-4*(FS_HBBILLNS(|2|3)|FS_HABIS1|FS_HABBINSS_XMPR|FS_HBILLNS1))|                                   \
4342      (3-4*FS_EANOS3[OB:SCRAP(4|5)(|[M]),,33])|(3-4*(FS_AUSILIARE_MILANO|FS_Z_AUSMIL2))|                  \
4343      (3-4*(FS_LAADGRS(1|2)[OB:RENAULT_KERAX(6R|8Y),34,8][OB:RENAULT_KERAX(6R|8Y),160,8]))|               \
4344      (3-4*(FS_IBBEHKS(|L)))|(3-4*(FS_UC_MONTEDISON))|(3-4*(FS_GABS|FS_GABS5))|                           \
4345      (3-4*(FS_TADGNS|FS_TAEMS))|(3-4*(FS_RGS(|L)))|(3-4*(FS_HBCCQ_W))
4346
4347  # EP 6 Freight long
4348  $DEF I6GMIX=5*I6GS1
4349
4350  $DEF I6GCA=(12*SITFA_LAAERS(1|2)[OB:FIAT_PUNTO(|YG),10,10][OB:FIAT_PUNTO(|YG),54,10]                    \
4351      [OB:FIAT_PUNTO(|YG),96,10][OB:FIAT_PUNTO(|YG),138,10][OB:FIAT_PUNTO(|YG),180,10]                    \
4352      [OB:FIAT_PUNTO(|YG),224,10][OB:FIAT_PUNTO(|YG),139,29][OB:FIAT_PUNTO(|YG),182,29]                   \
4353      [OB:FIAT_PUNTO(|YG),224,29][OB:FIAT_PUNTO(|YG),10,29][OB:FIAT_PUNTO(|YG),54,29]                     \
4354      [OB:FIAT_PUNTO(|YG),96,29]),                                                                        \
4355      6*(FS_TA1[OB:FIAT_PUNTO(|YG),10,10][OB:FIAT_PUNTO(|YG),52,10][OB:FIAT_PUNTO(|YG),10,29]             \
4356      [OB:FIAT_PUNTO(|YG),51,29][OB:FIAT_PUNTO(|YG),93,10][OB:FIAT_PUNTO(|YG),94,29])
4357
4358  $DEF I6GCO=15*(FS_SGNSS[O:BOX745H_SPINELLI(1|2|3),5,13][O:BOX745H_SPINELLI(1|2|3),119,13]|              \
4359      FS_SAAGGNSS(2|1)[O:C20B,7,13][O:C20B,99,13][O:C20B,180,13][O:C20B,241,13][O:C20B,323,13]            \
4360      [O:C20B,417,13]|                                                                                    \
4361      FS_SAAGGNSS(2|1)[O:C20B,7,13][O:C20B,99,13][O:C40B,180,13][O:C20B,323,13][O:C20B,417,13]|           \
4362      FS_SAAGGNSS(2|1)[O:C40B,7,13][O:C40B,180,13][O:C40B,357,13]|                                        \
4363      FS_SAAGGNSS(2|1)[O:C30A,7,13][O:C20B,99,13][O:C40B,180,13][O:C20B,323,13][O:C30A,387,13]|           \
4364      (FS_SGGMRSS_CEMAT[O:C3P_EWALS12|C3P_FERCAM4|C3O_KEITEL2|C3IP_02|C3IP_EWALS4|C3IP_EWALS7|            \
4365      C3IP_EWALS12|C3IP_RIWO1|C3IB_DE_VRIES1|C3IB_DE_VRIES2|C3P_EWALS01,8,11]                             \
4366      [O:C2R20|C2R_CAP|C2R_CAPITAL1|C2R_CMACGM2|C2R_COSCO2|C2R_DELMAS2|C2R_GOLD|C2R_HAPAG4|C2R_HYUNDAI3|  \
4367      C2RT_DONATI,99,11]                                                                                  \
4368      [O:C3O_KEITEL1|C3B_RIWA|C3014|C3006|C3_LOBLEIN3|C3_LOBLEIN5|C3P_EWALS01|C3P_EWALS13|C3_HANG|        \
4369      NORFOLKLINE,174,11]                                                                                 \
4370      [O:C2RT_GIEZENDANNER|C2R_EG7|C2R_EIMSKIP|C2R_HALINE|C2R_HAPAG3|C2R_HYUNDAI2|C2R_HYUNDAI3|           \
4371      C2R_HYUNDAI5|C2R_JRF1|C2R_KMTC|C2R_MAV|C2RT11|C2RT18,265,11])|                                      \
4372      (FS_SGGMRSS_XN[O:C2RT_DE_RIJKE|C2RT_HSFOOD1|C2T_INTERFLOW1|C2RT_SASOL|C2RT_VAN_DEN_BOSCH1|C2061|    \
4373      C2_ANL|C2_HAPAG1|C2_IPEC,14,11]                                                                     \
4374      [O:C3005|C3002|C3_BERTSCHI6|C3_BULKHAUL|C3_IBC3|C3_IFF4|C3_LOBLEIN2|C3_MVT|C3_SCHMIDT2,75,11]       \
4375      [O:C2R_EIMSKIP|C2R_HYUNDAI4|C2R_KLINE|C2R_MAERSK1|C2R_MSC4|C2R_NORASIA1|C2R_OOCL3|C2R_OOCL1|        \
4376      C2R_PO7|C2R_PONL1|C2R_TRITON,180,11]                                                                \
4377      [O:C3_BERTSCHI6|C3015|C3_BERTSCHI3|C3_VOS1|C3_EVALS1|C3P_EWALS06|C3P_EWALS11|C3P_KEITEL|C3_BELL1|   \
4378      C3O_KEITEL1|C3O_LOEBLEIN3|C3_EUROFER,241,11])|(FS_SFFGGMRRSS1[O:C120H,21,9][O:C120H,176,9])|        \
4379      (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C20A,17,11][O:C20A,78,11][O:C20A,202,11][O:C20A,263,11])|             \
4380      (FS_SGGMRSS(|_X|_CEMAT|_XN)[O:C40B,17,11][O:C40B,202,11]))
4381
4382  $DEF I6G1=1:I6GCA|2:I6GCO|2:I6GMIX
4383
4384  # EP 6 Freight short
4385  $DEF I6G2=(<FS_H,FS_MIGROS_F|FS_MIGROS_G,FS_KS,FS_RGS1,FS_IBES615L,FS_IBES615,FS_HBBILLNS,FS_HABISB)
4386  # EP 6 Freight shunting
4387  $DEF I6GR=FS_HBBILLNS,FS_KS,ERMEWA_5_ZAEFS7899(|L)
4388
4389  # EP 6 Maintenance
4390  $DEF I6FM1=(6*(RFI_VRTZ(2|4A|4B)(|L)[O:RAIL6(|[M]),,12]))|(8*FS_4VT2)|(8*FS_Z5)|                        \
4391      (5*((FS_RGS1|FS_RGS2)[OB:RAIL_16M,,12]))|(6*ILVA_RMMS[OB:PYLON3,,12],G_G2)|                         \
4392      (5*((FS_RES1[OB:PYLON3,16,12][OB:PYLON3,103,12])|(FS_RES1[OB:FR_ST0(1|5|2|4|3),,16])))
4393
4394
4395  #------------------------------------------------------------------------------
4396  #
4397  # TSCHECHIEN
4398  #
4399  # EP 2 Freight short
4400  $DEF CS2FS=(1-3*CSD_UZ5_859)|(3-5*(CSD_Z(|1_75473A|L|1_75473|1_52|1_52HL|1_1HL|1_1H)))|                 \
4401      (3-5*(WUE_NI3(S|V)_KWG))|(2*CSD_R8(|A|B|C))|(3-5*(WUE_OMKVN(|L)[OT:AG50D,,24]))|                    \
4402      (2*(CSD_PT[O:BOX(1|4|5)]))
4403
4404  # EP 2 Freight long
4405  $DEF CS2F=6*CS2FS
4406
4407  # EP 3 Freight short
4408  $DEF CS3G2=(2-3*CSD_3_Z(T107741|T190927|R|TR|TRH|R_B|R_H)(|L))|(2-3*(CSD_3_ZTFF(|_L)|CSD_3_ZT190618))|  \
4409      (2-3*(CSD_UT[O:(FR_KO18|FR_KO18)]))|(2-3*(CSD_VTU4B[O:(FR_KO15|#FR_KO15),,27]))|                    \
4410      (2-3*(CSD_BUDVAR4(|L)|CSD_UHBROD|CSD_BUDVAR3))|                                                     \
4411      (2-3*(CSD_Z1_75473|CSD_Z1_75473A|CSD_Z|CSD_ZHL|CSD_ZH))|(2-3*(CSD_VUTC|CSD_VUTD))|                  \
4412      (2-3*(CSD_OK9_246W))|(2-3*(CSD_ND3_391PL|CSD_ND3_391P))|(2-3*(CSD_R8|CSD_R8C|CSD_R578347))|         \
4413      (2-3*(CSD_UL6_68A))|(2-3*(CSD_ZSAB|CSD_ZDV2))|(2-3*(CSD_ST23))|(2-3*(CSD_UZ5_859))|                 \
4414      (2-3*(CSD_VZ4A[O:(FR_KO43|#FR_KO43),,26]))|(2-3*(CSD_VTDBL[OB:PIPE25,20,20]))|                      \
4415      (2-3*(CSD_VTD[OB:BARREL1,10,20][OB:BARREL6,35,20]))|(2-3*(CSD_PD1))|                                \
4416      (2-3*(CSD_PAOV[OB:SCRAP13(|[M]),,22]|CSD_PAOV2[OB:FR_MIX1,,22]|                                     \
4417      CSD_PAOV1[OB:WOOD(228|114),12,11][OB:WOOD22(8|7),78,11]))|(2-3*(CSD_GA))|                           \
4418      (2-3*CSD_3ZTR(N|2|C|B1H)(|L))
4419
4420  # EP 3 Freight long
4421  $DEF CS3G1=CSD_DAAK,8*CS3G2
4422
4423  # EP 3 Passenger long distance
4424  $DEF CS3P1=(<2*CSD_BA65AL,3*CSD_3_BAIML,2*CSD_AA67L,3*CSD_3_BAIM,CSD_BDMS81L)|                          \
4425      (<CSD_3_AA50L,CSD_3_ABA50L,CSD_3_BRA59L,CSD_3_BA5(8|0)L)|                                           \
4426      (<5*CSD_3_BA5(8|0),CSD_3_BRA59,CSD_3_ABA50,CSD_3_AA50)
4427
4428  # EP 4 Passenger regional short
4429  $DEF CS4PRS=(<CSD_Y4BDS,CSD_Y4BM(|L))|(<CSD_Y4BM(|L),CSD_Y4BDSL),                                       \
4430      0-1*CSD_4_GBKKQS(1|2)|(<CSD_DSD~CD,3*CSD_4_BAI60(|A))|(3*CSD_BAP(1|2)(|L))|                         \
4431      ((<CSD_BDMEER87L,3*CSD_BMEE86)|(<(3*CSD_BMEE86L),CSD_BDMEER87))
4432
4433  # EP 4 Passenger long distance
4434  $DEF CS4PL1=CSD_DPOST|CSD_DMSPOST76L|CSD_DS74(|L),                                                      \
4435      (<(4*CSD_B(M65B|M65C|M77|M65A)L),CSD_WRM69AL,CSD_AB(65|84|84A)L,2*CSD_A(M67A|M67B|M72)L)|           \
4436      (<(2*CSD_A(67|M67A|M67B|M72|M72A)),CSD_AB(65|84|84A),CSD_WRM69A,CSD_BR,                             \
4437      4*CSD_B(M65B|M65C|M77|M65A|A65B))|                                                                  \
4438      (<CSD_4_DA60,CSD_POST61,3*CSD_BPZL,2*CSD_BA58,CSD_BRA59,2*CSD_AA58,CSD_ABA52,CSD_ABA58EXLAL)
4439
4440  # EP 4 Freight short
4441  $DEF CS4GS=(2-3*(CSD_4_HF2401(|L)))|(2-3*(CSD_4A_ZR1(13|13B|13H)|CSD_4GLM(U|NU|B1H|H|D|))(|L))|         \
4442      ((CSD_HX(8|10|16)[O:(TARP10|TARP11|SZD_LOAD2),,8]),CSD_4_GBKKQS1,CD_ZTS)|(3*CSD_4_GLS1336U(|L))|    \
4443      (3*(CSD_4_ES20(45B|45H|17)(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|                             \
4444      (2-3*(CSD_4_RES11(|L)[OB:BOX(16|28|18|22),14,15][OB:BOX(16|28|18|22),73,15]                         \
4445      [OB:BOX(16|28|18|22),133,15]))|(2-3*(CSD_UA|CSD_ND1937))|(2-3*(CSD_PAOJ1|CSD_RAJ1))|                \
4446      (2-3*(CSD_SA7|CSD_ST23))|(2-3*(CSD_4_HF2401|CSD_LA_AB))|(2-3*(CSD_RAHI|CSD_RA_LOUH|CSD_RA1(|A|B)))
4447  $DEF CS4GS1=3*CS4GS
4448
4449  # EP 4 Freight long
4450  $DEF CS4GL1=7*CS4GS
4451  $DEF CS4GL2=16*(CSD_WAP[O:COAL32(|[M]),,41])
4452
4453  # EP 5 Freight short
4454  $DEF TS5GS=(2-3*(CD_5_ES9110(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|(2-3*CD_LP(1|2|3))|            \
4455      (2-3*(CD_ZTS_OR|CD_ZTS))|(3-5*CD_GBGS(1|2|3|4))|                                                    \
4456      (2-3*(CD_5_RES11(|L)[OB:BOX(16|28|18|22),14,15][OB:BOX(16|28|18|22),73,15]                          \
4457      [OB:BOX(16|28|18|22),133,15]))|(2-3*CD_RESDSM[OB:GRAVEL1(|[M])])
4458  # EP 5 Freight long
4459  $DEF TS5F1=7*TS5GS|(12*(CD_FALLS1|CD_FALLS2|CD_FALLS3|CD_FALLS4|CD_WAP1|CD_WAP2|VIA_WAP))
4460
4461  # EP 6 Freight short
4462  $DEF CS6F1S=(4-6*CD_EAS(2|1))|(4-5*CD_UA(418|S428)(|L))|(4*CD_(HBBILLNS|HABBILLNS))|                    \
4463      (4*(CDC_RESDS|CDC_RES))|(2-3*CDC_RESDSM[OB:GRAVEL1(|[M])])|(4-5*(CDC_HBBILLNSS|ZSR_245HBBILLNNS))
4464
4465  # EP 6 Freight long
4466  $DEF CS6F1=5*CS6F1S
4467
4468  #------------------------------------------------------------------------------
4469  #
4470  # Slovak Republic
4471  #
4472
4473  # EP 5 Freight short
4474  $DEF SK5GS=(2-3*(ZSR_5_(UX|ES)9110(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|                         \
4475      (2-3*(ZSR_245HBBILLNNS,CFR_245HBBILLNNS,HENKEL03,G_EAS1A,G_EAS1E,G_EAS2B,M_595EAS1,SBB_5KS1,        \
4476      DBAG_5_EALSX063EL,HENKEL04,SBB_HBILS_PONS,SBB_HBILS_PLING,G_HBBILLNS,M_246HBBILLNNS2,G_HABIS_WASA,  \
4477      G_014))|(ZSSKC_HBIS2445108L|ZSSKC_HBIS2445108)|                                                     \
4478      (2-3*(ZSR_5_RES11(A|B)(|L)[OB:BOX(16|28|18|22),14,15][OB:BOX(16|28|18|22),73,15]                    \
4479      [OB:BOX(16|28|18|22),133,15]))
4480
4481  # EP 5 Freight long
4482  $DEF SK5F1=7*SK5GS
4483
4484  # EP 5 Passenger long distance
4485  $DEF SK5PD1=(<ZSSK_BDSL,3*ZSSK_A,ZSR_WRRM_M,5*ZSSK_B,                                                   \
4486      0-1*(ZSR_DS_ZB|ZSR_DPOST_ZB|ZSR_POSTW_MB|ZSR_POSTW_ZM95))|                                          \
4487      (<(4*ZSSK_BC),ZSR_WRRM_ML,2*ZSSK_WLAB,ZSSK_BH2118(|L),ZS_B77,2*ZSSK_B)
4488
4489  # EP 5 Passenger regional
4490  $DEF SK5PR1=(<(3*(ZSSK_BDMTEE|ZSSK_BDGTMEE|ZSSK_BDTMEE2244L|ZSSK_BDTMEE2244)),                          \
4491      ZSSK_BDMSHEE|ZSSK_BDSHMEE|ZSSK_BDSHMEER)|(4*ZSR_BTE_CB)
4492
4493  # EP 6 Passenger long distance
4494  $DEF SK6PD1=(<ZSSK_AMEERL,ZSSK_AMPEER1970EL,ZSSK_WGMEER8970L|ZSSK_WRRMEER8870,                          \
4495      5*(ZSSK_BMPEER2070|ZSSK_BMEER|ZSSK_BMEER1|ZSSK_BMPEER2070E),ZSSK_BDGHMEER2870)|                     \
4496      (<ZSSK_BDGHMEER2870L,5*(ZSSK_BMEERL|ZSSK_BMEER1L|ZSSK_BMPEER2070L|ZSSK_BMPEER2070EL),               \
4497      ZSSK_WRRMEER8870|ZSSK_WRRMEER8870L,ZSSK_AMEER,ZSSK_AMPEER1970E)|                                    \
4498      (<ZSSK_BDSHEER61L,3*ZSSK_B1L,2*ZSSK_BEER61A,ZSSK_BDTEER1,3*ZSSK_APEER61L,0-1*ZSR_D(|S)POST_CB)
4499
4500
4501  #------------------------------------------------------------------------------
4502  #
4503  # POLAND
4504
4505  # EP 3 Passenger long distance 3A
4506  $DEF PL3PDA=(<PKP_3A_F(|L),2*PKP_3A_CHUXZ,PKP_3A_ASHX|PKP_3A_ABHUXZ,PKP_3A_BHUXZ,PKP_3A_CHUXZ,          \
4507      PKP_3A_BCHUXZ|PKP_3A_ABC4HUXZ)|                                                                     \
4508      (<PKP_3A_ABC4HUXZL|PKP_3A_BCHUXZL,PKP_3A_CHUXZL,PKP_3A_ABHUXZL|PKP_3A_ASHXL,PKP_3A_BHUXZL,          \
4509      2*PKP_3A_CHUXZL,PKP_3A_F(|L))
4510
4511  # EP 3 Passenger long distance 3B
4512  $DEF PL3PDB=(<PKP_3PW4U29,(2*PKP_3HECHT_B),PKP_3HECHT_AB|PKP_3B_ABSHXZ,PKP_3HECHT_A,PKP_3HECHT_B)|      \
4513      (<PKP_3HECHT_BL,PKP_3HECHT_AL,PKP_3HECHT_ABL|PKP_3B_ABSHXZL,2*PKP_3HECHT_B,PKP_3PW4U29)
4514
4515  # EP 3 Passenger regional
4516  $DEF PL3PG=((<PKP_BIPAL,2*PKP_BIPAM,PKP_BIPA),PKP_4_PDN101CH1(|L))|                                     \
4517      (PKP_BH_RYFL3,PKP_BH_RYFL2A,PKP_BH_RYFL3,PKP_3A_F(|L))
4518
4519  $DEF PL3FC=(2-4*PKP_WDDO[O:AG80,,29])|(2-4*PKP_(3_KPL(|V1|U|L|UV1|V1L)|GAGST))|                         \
4520      (2-4*PKP_3_KD(DN(|L)|TH_U(|L)|TH(|L)|TH_H(|L)|DN(|L)|N(|L)|NU|T(|L)|TH_U(|L)|TH_H(|L)|TU))|         \
4521      (2-4*PKP_3B_KD(DT_B(|L)|DT(|L)|TH_H(|L)|TH(|L)|TH_U(|L)))|(2-4*PKP_23_KDT(U|VH(|L)|V(|L)))|         \
4522      (2-3*PKP_3_KK(Z|S|UHO5)(|L))|                                                                       \
4523      (2-4*PKP_3_KD(STO(|L)|DET105226(|L)|DET158205|DT104516|DT104534|DT153046(|L)|ST(|L)|STH(|L)))
4524
4525  # EP 3 Freight short
4526  $DEF PL3FK=2-3*PL3FC
4527
4528  # EP 3 Freight long
4529  $DEF PL3FL=6*PL3FC
4530
4531
4532  # EP 4 Passenger long distance old cars
4533  $DEF PL4PH=(<PKP_3PW4U29,2*PKP_4HECHT_B,                                                                \
4534      (PKP_4HECHT_AL,PKP_4ABSHXZL|PKP_4HECHT_ABL)|(PKP_4ABSHXZ|PKP_4HECHT_AB,PKP_4HECHT_A),               \
4535      2*PKP_4HECHT_BL)
4536
4537  # EP 4 Passenger long distance new cars
4538  $DEF PL4PD=(<PKP_4_PDN101CH1L|PKP_4_PDN101CH1),2*(PKP_4_ADU112AG1L|PKP_4_ADU112AG1),                    \
4539      (PKP_4WRBD1L|PKP_4WRBD1|PKP_4WRBD2L|PKP_4WRBD2|PKP_WR_JHIX),                                        \
4540      5*(PKP_4_BDU111A1L|PKP_4_BDU111A1|PKP_4_BWXZD1L|PKP_4_BWXZD1)
4541
4542  $DEF PL4PG=(<PKP_4B_BHPD1L,2*PKP_4B_BHPM,PKP_4B_BHPD1)|(<PKP_4B_BHPL,2*PKP_4B_BHPM,PKP_4B_BHP)|         \
4543      (<PKP_4_BHPL,2*PKP_4_BHPM,PKP_4_BHP)|(<PKP_4_BHPA1L,2*PKP_4_BHPMA1,PKP_4_BHPA1)|                    \
4544      (<PKP_4_BHPA1D1L,2*PKP_4_BHPMA1,PKP_4_BHPA1D1)|(2*(<PKP_4_BHPD1L,PKP_4_BHPD1))|                     \
4545      (2*(<PKP_4A_BIPD1L,PKP_4A_BIPD1))
4546
4547  # EP 4 Freight shunting
4548  $DEF PL4FK1=(2-3*(PKP_FD(1|2|3|4|5|6)(|L)))|(2-3*PKP_4A_EAMOS401ZB(|L))|                                \
4549      (2-3*(PKP_4A_GHST(|_H)(|L)|PKP_4A_GKKM(|_H|_VH|_V|_U|_HL|_VHL|_VL|L)|PKP_4A_GHST(|_H|_U)(|L)|       \
4550      PKP_4A_GKLMR(|_B)(|L)|PKP_GBSL))|(2-3*PKP_UGPS)|(2-3*(PKP_4_HF2040(|L)))|(2-3*(DR_4A_Z8021(|L)))|   \
4551      (2-3*(PKP_4_U(|TX)(|L)))|(2-3*(PKP_4_(G1003|GLTRHS|GLTRHSH|HBKR)(|L)))|                             \
4552      (2-3*((PKP_4_ZACS422R|PKP_4_ZAC408RB|PKP_4_ZACES408R|PKP_4_ZAES406RA|PKP_4_ZAES406RG)(|L)))|        \
4553      (2-3*PKP_ES[O:AG85,,28])|(2-3*DR_IBHQSSZ(|2|3|4|5))|(2-3*PKP_4_HBK(|L|U|UV1|V1L|V1|UV2|V2L|V2))|    \
4554      (2-3*PKP_4GB(ST1553|S1555|S1516|S1514|KKSX1755|KKS1755|KKS1536)(|L))|                               \
4555      (2-3*PKP_4A_RMMP401ZE(|L)[OB:STEEL(26|27|28|29|30|31|32|25),,12])
4556
4557  # EP 4 Freight short
4558  $DEF PL4FK=2-3*PL4FK1
4559
4560  # EP 4 Freight long
4561  $DEF PL4FL=7-8*PL4FK1
4562
4563  # EP 5 Passenger long distance new cars
4564  $DEF PL5PD=(<PKP_5_DS209C1,2*PKP_BDUNL,PKP_BDUNGL,2*PKP_BDUNG,PKP_5WRBD,PKP_ADMNUL,PKP_ADMNU)
4565
4566  # EP 5 Freight Z
4567  $DEF PL5FZ=15*((PKP_5_ZAESJT620_DEC|PKP_5_ZAES406RA_CTL|PKP_5_ZACS422R_AZIS|PKP_5_ZAES406RA_DEC|        \
4568      PKP_5_ZAES406RA_GFR|PKP_5_ZAES406RA|PKP_5_ZAESRT500_KVG|PKP_5_ZAESRT500_PCC|PKP_5_ZAESJT620_GATX|   \
4569      PKP_5_ZAESJT620_ABID)(|L))
4570
4571  # EP 5 Freight long coal
4572  $DEF PL5FF=(15*(((PKP_FALNS4|PKPC_FALS_452V_B1A|PKPC_FALS_452V_B2C|PKPC_FALS_452V_B3B|                  \
4573      PKPC_FALS_452V_E1A|PKPC_FALS_452V_E1B|PKPC_FALS_452V_E2A|PKPC_FALS_452V_E3C|PKPC_FALS_452V_E1E|     \
4574      PKPC_FALS_452V_E1F|PKPC_FALS_452V_E2B)(|L))|                                                        \
4575      ((PKPC_FALNS40L|PKPC_FALNS38|PKPC_FALNS42|PKPC_FALNS19L|PKPC_FALNS22|PKPC_FALNS20L|PKPC_FALNS35|    \
4576      PKPC_FALNS29L|PKPC_FALNS31L|PKPC_FALNS23)[O:COAL(32|28|27|30|31)(|[M])])))|                         \
4577      (15*(PKPC_FALNS(37|39|41|43|44|45|21|22|24|25|26|27|18|28|30|32|33|34|36)(|L)                       \
4578      [O:COAL(32|28|27|30)(|[M])]))
4579
4580  # EP 5 Freight Side Dump
4581  $DEF PL5FD=(12*((PKPC_WIEBE_FAS|PKP_FAS1|PKP_FAS2|PTK_FAS3092|PKPC_FAS2151|PCCA_FAS|PTK_FAS3092|        \
4582      PCCA_FAS1|CTL_FAS2|CTL_FAS1|PCCA_FAS2)(|L))[O:GRAVEL(3|4|5|9)(|[M])])
4583
4584  # EP 5 Freight Shunting
4585  $DEF PL5FS=(2-3*(PKP_SMMS|PKP_45_EAMOS401ZB(|L)|PKP_5_EAMS401ZL(|L)|PKP_5EAMOS401ZK(|L))),PKP_5_SIKKPS_4636131(|L),PKP_SIKKPS(|L),              \
4586      2*(PKP_4A_RMMP401ZE(|L)[OB:STEEL(26|27|28|29|30|31|32|25),,12])
4587
4588
4589  # EP 6 Freight Container
4590  $DEF PL6FC=15-18*((PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C30A,7,11][OT:C30A,99,11])|                      \
4591      (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C20A,7,11][OT:C40B,68,11])|                                    \
4592      (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C20A,7,11][OT:C20A,68,11][OT:C20A,128,11])|                    \
4593      (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C40B,7,11][OT:C20A,128,11])|                                   \
4594      (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C40B,7,11])|                                                   \
4595      (PKPC_SGNSS_(G|R|SW|SWR|EKKR)(|L)[OT:C40B,68,11])|                                                  \
4596      (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11)[O:C20A,9,11][O:C20A,70,11][O:C20A,164,11][O:C20A,226,11])|       \
4597      (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11)[O:C40B,9,11][O:C40B,164,11])|                                    \
4598      (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11)[O:C40B,9,11][O:C20A,164,11][O:C20A,226,11])|                     \
4599      (G_SGGMRSG(|2|3|4|5|6|7|8|9|10|11)[O:C20A,9,11][O:C20A,70,11][O:C40B,164,11])|                      \
4600      (G_SGGMRSG(|L|2|3|4|5|6|7|8|9|10|11|2L|3L|4L|5L|7L|11L)[O:C20A,(9|164),11]))
4601
4602  # EP 6 Freight short
4603  $DEF PL6FS=(3-5*(PKPC_EANOS_B(1|2|3|4|5)(|L)[OB:SCRAP(5|6|13|14|15)(|[M]),,32]))|                       \
4604      (3-5*PKP(|C)_6EAMOS401ZP(|L)[OB:SAND(5|15)(|[M])])|                                                 \
4605      (3-5*((PKPC_FAS2151|PKPC_WIEBE_FAS|PTK_FAS3092)(|L)[OB:SAND(5|15)(|[M]),,31]))|(2-3*PKP_SMMS)|      \
4606      (3-5*(PKPC_EA(NOS415W|NOS445W|NS_WBL|NS_WBR|OS)(|L)[OB:SCRAP(7|_13|_14|_15)(|[M]),,32]))|           \
4607      (2-4*(PKPC_6GBST1553|PKP_6U9415)(|L))|(2-4*(PKPC_6_SIKKPS4636003|PKP_6SIS4738_RENTRANS)(|L))
4608
4609  # EP 6 Freight mixed long
4610  $DEF PL6FM=6*PL6FS
4611
4612  # EP 6 Passenger regional
4613  $DEF PL6PR=PKP_EU07_2003,(3@PKP_BDHPUMN4M2(|L))|(3@PKPPR_BMNOPUX1(|L))
4614
4615  # EP 6 Passenger IC
4616  $DEF PL6PIC=(<PKP_B10NOUYBSUPERNET,PKP_B11MNOUZ136A_IC6W3,PKP_B11MNOUZ136AIC6WIFI4,                     \
4617      PKP_B10NOUZ141ANEWAGSUPERNET,PKP_BNOPUVZ111AROW1SUPERNET,PKP_BNOPUVZ111AROW2SUPERNET,               \
4618      PKP_BNOPUVZ111AROW2WIFI4,PKP_A9MNOUZZ2AMGFPSSUPERNET,PKP_WRMNOUZ_NEWAG,PKP_A9MNOUZZ2AMG2FPSWIFI4,   \
4619      PKP_BMNOPUZ152ASUPERNET)|                                                                           \
4620      (<PKP_A9MNOUZ_166A(|L),PKP_A9MNOUZZ2AMGFPSWIFI4,PKP_A9MNOUZZ2AMG2FPSSUPERNET,PKP_WRIC1(|L),         \
4621      PKP_B11MNOUZXBMGFPSSUPERNET,PKP_B11MNOUZ_Z2B_NEWAGW3,PKP_BMNOUZ2170,PKP_BMNOUZ2170,                 \
4622      PKP_B11MNOUZ_144A,PKP_BBMNOUZ_157A)
4623
4624  #------------------------------------------------------------------------------
4625  #
4626  # Romania
4627  #
4628  $DEF CFR_ESX=CFR_ESX(1|2|3|4|5)[#E!OB:AG85,*50,27]
4629  $DEF CFR_EAS4=CFR_EAOS(1|2|3|5|6|7)
4630  $DEF CFR_KS=CFR_KS(1|2|3|4|5|6|7|8)(|3:[OB:LD125,*69,12])
4631  $DEF CFR_FALS=CFR_FALS0(1|2|3|4|5)(|L)
4632  $DEF CFR_GAG=CFR_GAGS0(1|2|3|4|5|6)(|L)
4633  $DEF CFR_GSD=CFR_3_GSD(FWHV165H|HFWV1618|FWHV165)(|L)
4634  $DEF CFR_RGS=CFR_RGS(1|2)(|3:[OB:LD180,*100,12])
4635  $DEF CFR_TALS=CFR_TALS0(1|2|3|4)(|L)
4636  $DEF CFR_UAGPS=CFR_UAGPS(1|2|3|4|5|6|7)(|L)
4637  $DEF CFR_UCS=CFR_UCS1_(1|2|3|4|5)
4638  $DEF CFR_ZES=CFR_ZES(1|2|3|4|5)
4639  $DEF CFR_ZAS=CFR_ZAS(1|1L|2|2L|3|4|5|6|7|8)
4640  $DEF CFR_IA=CFR_IA(IIS|EGHS1|EGHS2|EGHS3)
4641  $DEF CFR_FOR=DR_3GMM14(A|B)|CD_VTDR(4|5|6)|CSD_VTU4(A|B|C)(|3:[OB:AG70,*43,27])|DR_GAGSV1994(|B)(|L)|   \
4642      G_GGS|G_ES(1|2|B|BL)(|3:[OB:AG85,*49,27])
4643  $DEF RO3MIX=1-4*CFR_(FOR|IA|FALS|GAG|GSD|RGS|TALS|UAGPS|UCS|ZAS|ZES|KS|EAS4|ESX|GSD)
4644
4645  $DEF CFR_3DD=(<CSD_BP930A[B:68,22,95,9],2*CSD_BP930B[B:35,22,97,9],CSD_BP930C[B:35,22,97,9])
4646
4647  # EP 3 Freight long
4648  $DEF RO3F=[MAXP:1600]8-12*RO3MIX
4649
4650  # EP 4 Freight short
4651  $DEF RO4FS=(2-3*CFR_4_GGS147(5|5H|5D|5DH|6|6H|6A1|6A2|6A2H|9|9H)(|L))|                                  \
4652      (2-3*(CFR_GAGS06(|L)|CFR_GAGS05(|L)|CFR_KS9|CFR_RGS3|CFR_RGS4|CFR_RGS5))|                           \
4653      (2-3*(CFR_FALS01L|CFR_FALS01|CFR_FALS02L|CFR_FALS02|CFR_FALS03L|CFR_FALS03|CFR_FALS04L|CFR_FALS04|  \
4654      CFR_FALS05L|CFR_FALS05))|                                                                           \
4655      (2-3*((CFR_EAOS(1|2|3|5|6|7)|CFR_EACS01(|L))[OB:SCRAP_1(2|3|4|5)(|[M]),,30]))
4656
4657  #EP 4 Freight long
4658  $DEF RO4FL=6-8*RO4FS
4659
4660  # EP 4 Passenger regional
4661  $DEF RO4PR1=(4*CFR_BMX2921,CFR_AMX1426,4*CFR_BFM2427)|(<4*CFR_BAFLD2991,CFR_AALD1722,3*CFR_BAFLD2921)|  \
4662      (<CFR_AAFLD1722B1,CFR_AAFLD1722B2,5*CFR_2920DM(|L))|                                                \
4663      (<CFR_BAFLD2921A,CFR_AAFLD1722,5*CFR_BAFLD2921A)|                                                   \
4664      (CFR_BAFMD2157A,CFR_BAFMD2147P,CFR_AAFMD1147G,CFR_BARBAFMD,2*CFR_BAFMD2147P,CFR_TFA9157G)|          \
4665      (CFR_1947_01,CFR_2047_01)|(3*CFR_2147_01,CFR_1147_01,CFR_2147_01)|                                  \
4666      (3*CFR_2147_01L,CFR_1147_01L,CFR_2147_01L)|(3*CFR_2047_02,CFR_1147_02,CFR_2147_02)|                 \
4667      (3*CFR_2147_02L,CFR_1147_02L,CFR_2147_02L)
4668
4669  # EP 4 Passenger long distance
4670  $DEF RO4PL1=(<CFR_4AM1950L,CFR_4ABM3950L,5*CFR_4BM2050L,CFR_POST1L)|                                    \
4671      (<CFR_WLABMEEA,CFR_WRLM,5*CFR_4BCM5950L)|(<(5*CFR_4BM2050),CFR_4ABM3950,CFR_4AM1950)|               \
4672      (<(5*CFR_4BCM5950),CFR_WLABMEE2,CFR_WLABMEEB)|                                                      \
4673      (<0-1*CFR_POST9257,4*(CFR_BA2057G|CFR_B2057IVA),CFR_WR8849,                                         \
4674      2*(CFR_AAFLD1040G|CFR_A1947G|CFR_A1957IVA),CFR_ABAFLD3957GL|CFR_ABAFLD3040GL,                       \
4675      CFR_FAFMD9257G|CFR_TFA9160G)|                                                                       \
4676      (<0-1*(CFR_DPOST9157|CFR_D9247),5*CFR_BA2921,CFR_ABAFLD3723H,CFR_AAFLD1722H)|                       \
4677      (<3*CFR_6BCM5950B,CFR_5941E(|L),CFR_7041(|L),3*CFR_2047C,CFR_3951ABL,CFR_2051M1)|                   \
4678      (3*CFR_2047_01,2*CFR_1947_01,3*CFR_2047_01)|(3*CFR_2047_01L,2*CFR_1947_01L,3*CFR_2047_01L)
4679
4680
4681  # EP 5 Freight short
4682  $DEF RO5FS=(2-3*CFR_45_GGS147(5|5H|5D|5DH|6|6H|6A1|6A2|6A2H|9|9H)(|L))|                                 \
4683      (2-3*CFR_5_GGS147(5|5H|5D|5DH|6|6H|6A1|6A2|6A2H|9|9H)(|L))|                                         \
4684      (2-3*(CFR_EAOS4|CFR_EAOS8|CFR_KS9|CFR_RGS3|CFR_RGS4|CFR_RGS5|CFR_RILS|CFR_354RILS))|                \
4685      (2-3*(CFR_EACS0(2|3)(|L)[OB:SCRAP_1(2|3|4|5)(|[M]),,30]))
4686
4687
4688  # EP 5 Freight long
4689  $DEF RO5FL=6-8*RO5FS
4690
4691
4692  # EP 5 Passenger long distance
4693  $DEF RO5PL1=(5*CFR_5BCM5950L,CFR_2051BL,CFR_5AM1950L)|(CFR_2051B,CFR_5AM1950,5*CFR_5BCM5950)|           \
4694      (4*CFR_2041AL,CFR_WR2,CFR_3941A,CFR_1941AL,CFR_DPOST_MB0)|                                          \
4695      (3*CFR_2047_03,2*CFR_1947_03,3*CFR_2047_03)|(3*CFR_2047_03L,2*CFR_1947_03L,3*CFR_2047_03L)|         \
4696      (3*CFR_2047_02,2*CFR_1947_02,3*CFR_2047_02)|(3*CFR_2047_02L,2*CFR_1947_02L,3*CFR_2047_02L)|         \
4697      (3*CFR_2047R1,2*CFR_1947_07,3*CFR_2047R(1|2))|(3*CFR_2047R1L,2*CFR_1947_07L,3*CFR_2047R(1|2)L)|     \
4698      (3*CFR_2047_05,2*CFR_1947_05,3*CFR_2047_05)|(3*CFR_2047_05L,2*CFR_1947_05L,3*CFR_2047_05L)
4699
4700  # EP 5 Passenger Short
4701  $DEF RO5PS1=(3*CFR_2147_03,CFR_1147_03,2*CFR_2147_03)|(3*CFR_2147_03L,CFR_1147_03L,2*CFR_2147_03L)
4702
4703
4704  # EP 6 Freight short
4705  $DEF RO6FS=(3-4*((PKP_ES|CFR_ESX1|CFR_ESX2|CFR_ESX3|CFR_ESX4)[O:(FER3|FER4|FR_SUTR),,27]))|             \
4706      (3-4*CFR_GAGS05L|CFR_GAGS05|CFR_GAGS06L|CFR_GAGS06)|(3-4*CFR_KS(2|4)[OB:TARP(14|_BBCL),,14])|       \
4707      (3-4*CFR_RGS(1|2)[OB:WOOD5(6|7),,12])|(3-4*CFR_354RILS|CFR_UAGPS2L|CFR_UAGPS2)|                     \
4708      (3-4*CFR_TALS02L|CFR_TALS02|CFR_TALS03L|CFR_TALS03|CFR_TALS04L|CFR_TALS04|CFR_UAGPS1L|CFR_UAGPS1|   \
4709      CFR_UAGPS3L)|(3-4*(CFR_EAOS3|CFR_EAOS4|CFR_EAOS8|CFR_EAOS1|CFR_EAOS5)[O:(SCRAP6|SCRAP5)])|          \
4710      (3-4*CFR_UACS|CFR_UCS1_1|CFR_UCS1_5|CFR_245HBBILLNNS)|                                              \
4711      (2-3*(CFR_EACS0(4|5|6|7)(|L)[OB:SCRAP2(0|1)(|[M]),,30]))|                                           \
4712      (2-3*((DBSR_RGSSO02|CFR_RGSSO02|CFR_RGSSO04|GFR_RGSSO02|SVT_RGSSO02|CTV_RGSSO02)(|L)                \
4713      ([O:(BETON3(|[M]),40,BETON3(|[M])),,13]|[O:(BETON4(|[M]),40,BETON4(|[M])),,13]|[O:BETON2(|[M]),,13])))| \
4714      (2-3*((DBSR_RGSSO01|CFR_RGSSO01|CFR_RGSSO03|GFR_RGSSO01|SVT_RGSSO01|CTV_RGSSO01)(|L)                \
4715      ([OB:(PIPE34,20,PIPE34,20,PIPE34,20,PIPE34),,13]|                                                   \
4716      [OB:(BOILERPARTS1,20,BOILERPARTS1,20,BOILERPARTS1),,13]|[OB:BOILERRINGS(|[M]),,13])))
4717
4718
4719  # EP 6 Freight long 1
4720  $DEF RO6F1=6*RO6FS
4721
4722  # EP 6 Freight long coal transport
4723  $DEF RO6F3=12*CFR_FALS[OB:(FR_KO37|FR_COAL(1|2)(|[M])|COAL(33|34|35|3)(|[M]))]
4724
4725  # EP 6 Freight short
4726  $DEF RO6F2=(2*(CFR_ZAS7|CFR_ZAS8|G_ZAES_HR)),                                                           \
4727      4*(CFR_UAGPS4L|CFR_UAGPS4|CFR_UAGPS5L|CFR_UAGPS5|CFR_UAGPS6L|CFR_UAGPS6|CFR_UAGPS7L|CFR_UAGPS7)
4728
4729  # EP 6 Freight Tank
4730  $DEF RO6FT=20*((EEST|GFR|RP|RSCO|TIS|UFT|UTZ|VMET)_ZAES60SO01)(|L)                                      \
4731      (|[BC:-15,-40,10,12,102]|[BC:-8,-20,10,12,102])|                                                    \
4732      (CFR_ZAES67SO0(1|2|3|4|5)(|L)(|[BC:-15,-40,9,12,115]|[BC:-8,-20,9,12,115])|                         \
4733      CFR_ZAS73SO0(1|2|3|4)(|L)(|[BC:-15,-40,9,12,115]|[BC:-8,-20,9,12,115])|                             \
4734      (GFR_ZAES67SO01|RP_ZAES67SO01|RSCO_ZAES67SO01|VMET_ZAES67SO01|GFR_ZAES67SO02|RSCO_ZAES67SO02|       \
4735      GFR_ZAES67SO03)(|L)(|[BC:-15,-40,9,12,115]|[BC:-8,-20,9,12,115])|                                   \
4736      CFR_ZAES60SO0(1|2|3|4|5|6|7|8)(|L)(|[BC:-15,-40,10,12,102]|[BC:-8,-20,10,12,102]))
4737
4738  # EP 6 Freight cerales short
4739  $DEF RO6FGS=8*((CFR_UAGPSSO01|CFR_UAGPSSO02|CFR_UAGPSSO03|CFR_UAGPSSO04|CFR_UAGPSSO06|CFR_UAGPSSO07|    \
4740      CFR_UAGPSSO08|CFR_UAGPSSO09|CFR_UAGPSSO10|CFR_UAGPS7|RSTK_UAGPS01|RSCO_UAGPSSO02|CTV_UAGPSSO03|     \
4741      CTV_UAGPS01|TRCR_UAGPSSO01|SVT_UAGPS01|VMET_UAGPS01)(|L)                                            \
4742      (|[BC:-10,-40,8,12,131]|[BC:-5,-20,8,12,131]))
4743
4744  # EP 6 Freight cerales long
4745  $DEF RO6FGL=2*RO6FGS
4746
4747  # EP 6 Freight Scrap short
4748  $DEF RO6FRS=6*(CTV|UFT|TFG|SVT|GFR)_EACS01(|L)[OB:SCRAP2(0|1)(|[M]),,30]
4749
4750  # EP 6 Freight Scrap long
4751  $DEF RO6FRL=2*RO6FRS
4752
4753  # EP 6 Freight FALS
4754  $DEF RO6FR=16*((CFR_FALS05|CFR_FALSSO01|CFR_FALSSO02|CFR_FALSSO03|CTF_FALSSO01|DBSR_FALSSO01|           \
4755      DBSR_FALSSO02|GFR_FALSSO01|GFR_FALSMSO01|GFR_FALSMSO02|LSD_FALS|RSCO_FALSSO01|SVT_FALS01|           \
4756      SVT_FALSSO02|SVT_FALSSO03|SVT_FALSSO04|TFG_FALSSO01|UFT_FALS01|UTZ_FALSSO01|VMET_FALSSO01)(|L)      \
4757      (|[BC:-10,-40,5,9,140]|[BC:-5,-20,5,9,140]))
4758
4759  # EP 6 Freight Bauzug
4760  $DEF RO6FB=(5*(CFR_KSSO(02|06|10)(|L)[O:BALLAST4(8|9)(|[M]),,18]),                                      \
4761      4*(CFR_RESSO0(4|2|6)(|L)[O:SAND(4|23|3),,18]))|(6*(CFR_RESSO0(3|1|5)(|L)[OB:RAIL7,,16]))|           \
4762      (2*(CFR_KSSO(01|05|09)(|L)[OB:PYLON3(|[M]),,16]),                                                   \
4763      3*(CFR_KSSO(08|04|12)(|L)[O:SIGNAL2,14,13][O:SIGNAL1,81,13]),                                       \
4764      2*(CFR_KSSO(07|03|11)(|L)[OB:TRAVERSES01,13,13][OB:TRAVERSES01,42,13][OB:TRAVERSES01,71,13]         \
4765      [OB:TRAVERSES01,99,13]))
4766
4767
4768  # EP 6 Passenger short
4769  $DEF RO6P1=(4*(CFR_2047C|CFR_6BM2050(|L)),CFR_6AM1950,CFR_POST(|L))|                                    \
4770      (3*CFR_2047_05,CFR_1947_05,CFR_2047_05)|(3*CFR_2047_05L,CFR_1947_05L,CFR_2047_05L)|                 \
4771      (3*CFR_2047B(1|2),CFR_1947B1,CFR_2047B(1|2))|(3*CFR_2047B(1|2)L,CFR_1947B1L,CFR_2047B(1|2)L)|       \
4772      (3*CFR_2047R3,CFR_1947R3,CFR_2047R3)|(3*CFR_2047R3L,CFR_1947R3L,CFR_2047R3L)|                       \
4773      (3*CFR_2047R2,CFR_1947_07,CFR_2047R2)|(3*CFR_2047R2L,CFR_1947_07L,CFR_2047R2L)
4774
4775
4776  # EP 6 Passenger short double
4777  $DEF RO6PD=(<CFR_4_BHPD1L,2*CFR_4_BHPM,CFR_4_BHPD1)|(<CFR_4_AHPL,2*CFR_4_BHPM,CFR_4_BHPL)|              \
4778      (<CFR_4_AHP,2*CFR_4_BHPM,CFR_4_BHP)|(<CFR_4_BHPD2L,2*CFR_4_BHPM2,CFR_4_BHPD2)|                      \
4779      (<CFR_4_BHP2L,2*CFR_4_BHPM2,CFR_4_AHP2)|(<CFR_4_AHP2L,2*CFR_4_BHPM2,CFR_4_BHP2)|                    \
4780      (4*CFR_B2626MB|JZ_ZGLJ_ABM)
4781
4782  #------------------------------------------------------------------------------
4783  #
4784  # Yugoslavia / Serbia
4785  #
4786
4787  # EP 3 Passenger regional
4788  $DEF YU3PS1=JZ_3_GDV_HL,4@M_3_AAF1200(|L)
4789
4790  # EP 3 Freight short
4791  $DEF YU3FS1=(4-5*JZ_3_GDV(|_H)(|L))|(4-5*JZ_GDOVG(|L))|(4-5*JZ_3_GDRVY(|L|U))
4792
4793  # EP 3 Freight long
4794  $DEF YU3FL1=(4-5*YU3FS1)
4795
4796  # EP 4 Freight short
4797  $DEF YU4FS1=(4-5*JZ_4(_ES|EZ5002H)(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27])|                          \
4798      (4-5*(JZ_3_GDVL|JZ_3_GDV|JZ_3_GDV_HL|JZ_3_GDV_H|JZ_GBSZ2D|JZ_GBSZ1A|JZ_GBSZ1B|JZ_GBSZ1C|JZ_GBSZ1D,  \
4799      JZ_GBSZ2A|JZ_GBSZ2B|JZ_GBSZ2C))|(4-5*JZ_GAS(|L))|(4-5*JZ_4A_GMRS(|L|U))
4800
4801  # EP 4 Freight long
4802  $DEF YU4FL1=(4-5*YU4FS1)
4803
4804  # EP 5 Freight long
4805  $DEF YU5FL1=7-9*(JZ_5_ES(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]),5-7*(JZ_GAS(|L))
4806
4807  #------------------------------------------------------------------------------
4808  #
4809  # Slovenia
4810  #
4811  # EP 5 Freight
4812
4813  $DEF SLO5FS=(3-5*SZ_GAS(1|2))|(3-5*(SZ_GAS(1|2)(|L)))|                                                  \
4814      (3-5*(SZ_5_ES(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|(3-5*SZ_292HIMRRSZ)|(3-5*SZ_HBBILLNS)
4815
4816  $DEF SLO5F1=5*SLO5FS
4817
4818  #------------------------------------------------------------------------------
4819  #
4820  # Croatia
4821  #
4822  # EP 5 Freight short
4823  $DEF HR5F1=3*HZ_5EAOSZ530(|L)|HZ_EASZL|HZ_5EASZ597(|L)[OB:SCRAP(6|7)(|[M])],HZ_5RILSZ354(|L),\
4824        HZ_5RSZ390(|L)[OB:WOOD129,,12],HZ_5RSZ390S(|L)
4825
4826  # EP 6 Passenger
4827  $DEF HR6P1=5*(HZ_2017|HZ_2100(|L)|HZ_2100|HZ_2100A(|L))
4828
4829  # EP 6 Freight short
4830  $DEF HR6F1=10-15*((HZ_EASZ|JZ_EAS|JZ_EAS_B|ZRS_EAS)[OB:SCRAP(6|7)(|[M]),,32]|ZSR_245HBBILLNNS|          \
4831      SZ_GAS(1|2)|SZ_HBBINS_LASKO(1|2)|SZ_HBBILLNS|SZ_292HIMRRSZ)
4832
4833  #------------------------------------------------------------------------------
4834  #
4835  # Bulgaria
4836  #
4837  # EP 3 Freight long
4838  $DEF BG3FL=4*((4-5*(JZ_3_GDVL|JZ_3_GDV|JZ_3_GDV_HL|JZ_3_GDV_H))|                                        \
4839      (4-5*(CSD_VTD|CSD_VTDBL|CSD_VTD4_705|CSD_VTD4_70))|                                                 \
4840      (4-5*(DR_4A_Z8021|DR_ZSW7361B|CSD_NP1A,CSD_NB|CSD_R8A|CSD_R56))|                                    \
4841      (4-5*BDZ_3_F (F2_450|443B|443H|443|417B5V|417B2|417B1|F2_450L|443BL|443HL|443L|417B5VL|417B2L|      \
4842      417B1L))|(4-5*BDZ_3_F2(47642|48646|46375|46226)(|L)))
4843
4844  # EP 4 Freight short
4845  $DEF BG4FS=(3-4*DR_GBS1500(E|F|G|H|I|J|K))|(3-4*DR_IBHQSSZ(5|4))|(3-4*DR_FCS1(A|B|C|D|E)(|L))|          \
4846      (3-4*(JZ_GBSZ1(C|D)|BDZ_4A_GKGLM1190))|(3-4*BDZ_4_GS1(470|690)(|L))|                                \
4847      (3-4*BDZ_4A_GKLM1(191A|090|191B)(|L))|(3-4*(DR_4A_ZAGK7716|CSD_RA1A|DR_ZAEKK1|M_788ZAES_2))|        \
4848      (3-4*CFR_ESX(1|2|3|4|5))
4849
4850  # EP 4 Freight long
4851  $DEF BG4FL=6-7*BG4FS
4852
4853
4854  # EP 4 Passenger long distance
4855  $DEF BG4PL1=(<BDZ_4A_DLM1A,BDZ_4AM19(40A|50A|50050A),BDZ_4WRME1A,,4*BDZ_4BM2040A,2*BDZ_4BCM5940A,       \
4856      BDZ_POST)|                                                                                          \
4857      (<2*BDZ_4BCM5940AL,4*BDZ_4BM2040AL,BDZ_4WRME1AL,BDZ_4AM19(40A|50A|50050A)L,BDZ_4A_DLM1AL)|          \
4858      (<BDZ_4A_BM1AL,BDZ_4A_BM2AL,BDZ_4A_AM1AL,BDZ_4A_AM1A,BDZ_4WRME1AL,BDZ_4WRME1A|BDZ_4A_BM1A,          \
4859      BDZ_4A_BM2A,BDZ_4A_DLM1AL|BDZ_4A_DLM1A)|                                                            \
4860      (<BDZ_BCM_Z2,BDZ_4BCM5940A,BDZ_4BM2040A,BDZ_4BM2040A,BDZ_4BM2040A,BDZ_4BM2040A,BDZ_4AM1940A,        \
4861      BDZ_4AM1950050A,BDZ_POST)
4862
4863  # EP 5 Passenger long distance
4864  $DEF BG5PL1=(<2*(BDZ_5AME1A),BDZ_5ABME1A,BDZ_5WRME1A|BDZ_5BRME1AL,4*(BDZ_5BME1A|BDZ_BM2974))|           \
4865      (<(4*BDZ_5BME1AL),BDZ_5WRME1AL|BDZ_5BRME1AL,BDZ_5ABME1AL,2*(BDZ_5AME1AL|BDZ_AME1940L))
4866
4867  #------------------------------------------------------------------------------
4868  #
4869  # Greece
4870  #
4871
4872  # EP 3 Freight short
4873  $DEF GR3FS=(3-5*OSE_3_Z(PT6101H|1_28501|1_104752)(|L))
4874
4875  # EP 3 Freight long
4876  $DEF GR3F1=GR3FS
4877
4878  # EP 4 Freight short
4879  $DEF GR4FS=(3-5*OSE_4_GGLM1077(|L))|(3-5*(OSE_4_E1007(|L)[OB:COAL(37|43|45|44|40|57)(|[M]),,27]))|      \
4880      (3-5*OSE_4_HFG2044(|L))|(3-5*OSE_4_Z2GGS149(5|7H|7B1|7B2|7D1H|7D1B2|7D1B1)(|L))
4881
4882  # EP 4 Freight long
4883  $DEF GR4F1=GR4FS
4884
4885
4886  #------------------------------------------------------------------------------
4887  #
4888  # Turkey
4889  #
4890
4891  # EP 3 Freight long
4892  $DEF TK3F1=(20*TCDD_FALSWU(1|2|3)[O:COAL(41|40|42)(|[M])])|                                             \
4893      (5*TCDD_GBSU1,6*(G_K1|G_4631|G_G1|G_ES(2|1)),(5-6*TCDD_3_K(W_D2|W_D2L|W|WL|_D2U|U)))
4894
4895
4896  # EP 4 Freight short
4897  $DEF TK4F1K=(5-6*TCDD_45_GBSWU15(12|11|107|105|102|00)(|L))|(5-6*(TCDD_4GLMV1030(|L)|TCDD_GBSU1))
4898
4899  # EP 4 Freight long
4900  $DEF TK4F1=4*TK4F1K
4901
4902
4903
4904  # EP 4 Passenger
4905  $DEF TK4P1=TCDD_A1PEF2,TCDD_1014,2*TCDD_YSE,2*TCDD_4CU
4906
4907  # EP 5 Freight short
4908  $DEF TK5F1K=(5-6*TCDD_5_HABIS(|5|2|3|4)(|L))|(5-6*TCDD_UADGSWU(1|2|3))|(5-6*TCDD_FA(1|2|3|4)(|L))|      \
4909      (5-6*TCDD_45_GBSWU15(12|11|107|105|102|00)(|L))
4910
4911  # EP 5 Freight long
4912  $DEF TK5F1=4*TK5F1K
4913
4914
4915  # EP 6 Freight short
4916  $DEF TK6F1K=(5-6*TCDD_UADGSWU(1|2|3))|(5-6*TCDD_FA(1|2|3|4)(|L))|                                       \
4917      (5-6*TCDD_6GBSWU15(12|11|107|105|102|00)(|L))|(5-6*TCDD_6HBBILLNS(|L))
4918
4919  # EP 6 Freight long
4920  $DEF TK6F1=4*TK6F1K
4921
4922
4923  #------------------------------------------------------------------------------
4924  #
4925  # Sovietunion / GUS broad gauge
4926  #
4927  # Sovietunion / Russia
4928  $DEF SUO1=SZD_31661(A|B|C|D|E|F|G|H|I)(|L)[O:SAND100]
4929  $DEF SUT1=SZD_15TS862(A|B|BH|C|D)(|L)
4930  $DEF SUT2=SZD_151443(A|B|C)(|L)
4931  $DEF SUT3=RZD_151443(B|C)(|L)
4932  $DEF SUT4=RZD_151443UT(1|2|3|4)_SFAT(|L)
4933
4934  $DEF SUF=(15-25*SUO1)|(10-20*SUT1)|(15-25*SUT(2|3|4))
4935
4936  # EP 1 Freight long Russia
4937  $DEF SU1F1=15-18*(((NZD_1B_NTV125B|NZD_1C_NTV180|NZD_1C_NTV180B|SIBZD_1C_NVR125B|YUZZD_1C_NTV125B)(|L))| \
4938      (NZD_1B_NTV125|NZD_1C_NTV180U|SIBZD_1C_NVR125|YUZZD_1C_NTV125|ZKV_1_449(|L)|RU_1_15731(|L)|         \
4939      SZVM_1_34891(|L)))
4940
4941  # EP 2/3 Freight long Soviet Union Buffer
4942  $DEF SU2FLB=15*(SZD_T2_(2|4)(|L)|SZD_G1BUF(1|2|3)(|L)|SZD_GB(1|2|3)BUF(|L)|SZD_G)
4943
4944  # EP 3 Freight long Soviet Union
4945  $DEF SU3FL=6*((4-5*SZD_11066(A|AL|B|C|D|E|F|G|H))|(4-5*SZD_11K001(A|B|C|D|E|F|G))|                      \
4946      (4-5*SZD_11K001(A|B|C|D|E|F|G))|                                                                    \
4947      (4-5*SZD_12119(A|B|C|D|E|F|G|H))[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL34)(|[M])]|                       \
4948      (4-5*SZD_15TS862(A|B)(|H)(|L)))
4949
4950  # EP 4 Freight long Soviet Union
4951  $DEF SU4FL1=(15-20*SUO1)|(15-20*(SUT1|SUT2))|                                                           \
4952      (3-5*(SZD_11287(A|B|C|D)),2-3*SZD_ZB5651MK(4B|4A),1-2*SZD_KLEIMYONOVA(|L),                          \
4953      2-3*SZD_11066(_Y25|Y25A|Y25B|Y25C|Y25D),                                                            \
4954      3-4*(SZD_GAGSV|SZD_11K001A|SZD_11K001B|SZD_11K001D|SZD_11K001E|SZD_11K001F|SZD_11K001G|             \
4955      SZD_11270BBL|SZD_11270BB|SZD_11270CB|SZD_11270DBL|SZD_11270DB|SZD_GAGSVL),4-5*SZD_17431(A|B|C),     \
4956      3-4*SZD_12P152(F|E|D|C|B|A))|(15-20*(SZD_19752(D|C|B|A)(|L)))
4957
4958  # EP 4 Passenger long Soviet Union
4959  $DEF SU4PL1=(6-10*SZD2COACH)|(<SZD_SKKL,(7*SZD_3WLAB(1|2)))|(<(7*SZD_3WLAB(1|2)L),SZD_SKK,SZD_TVER)
4960
4961  # EP 5 Passenger long RUSSIA
4962  $DEF RUS5PL1=(6-10*(RZD_TVER|RZD_Y)),                                                                   \
4963      (<RZD_614177_V1_PERESVETL,2*RZD_614177_V2_PERESVETL,3*RZD_KRK_PERESVETL,RZD_BAG_PERESVETL)
4964
4965  # EP 5 Freight short RUSSIA
4966  $DEF RUS5FS1=(3-5*(RZD_31656SO0(3|2|1|4|6|5|7|8)(|L)))|(3-5*(RZD_11217(RMA|B|A)(|L)))|                  \
4967      (3-5*(RZD_114164))|(3-5*(RZD_15P761_BZHRK|RZD_ZB5651MK4))|(3-5*(RZD_151597(|L)|SUT(3|4)))
4968
4969  # EP 5 Freight long RUSSIA
4970  $DEF RUS5FL1=4-5*RUS5FS1
4971
4972  # EP 6 Freight short RUSSIA
4973  $DEF RUS6FS1=3-4*(SUT3|SUT4)
4974  $DEF RUS6FS2=3-4*(SZD_119553|RZD_114164|RZD_132114|RZD_11217RMA(|L)|RZD_11217A(|L)|RZD_11217B(|L)|      \
4975      RZD_ZB5651MK4)
4976  $DEF RUS6FS3=3-4*(RZD_31634SO0(1|2|3|4|5|6|7|8)(|L)|RZD_31656SO0(1|2|3|4|5|6|7|8)(|L))
4977  $DEF RUS6FS4=3-4*(RZD_TANK8_08|RZD_TANK8_12(|L)|RZD_TANK8_10(|L)|RZD_151597(|L)|RZD_151408(|L))
4978  $DEF RUS6FS5=3-4*RZD_151500(A|B|C|D|E)
4979
4980
4981  # EP 6 Freight long RUSSIA
4982  $DEF RUS6FL1=1:(6*RUS6FS1)|3:(6*RUS6FS(2|3|4|5))
4983
4984  # EP 6 Passenger long distance
4985  $DEF RUS6PL1=(<RZD_6WLABM2~JMD,RZD_WLABMEE62A,3*RZD_WLABMEE62,3*RZD_WLSRMEE1,RZD_WRMNOUZ)|              \
4986      (<(4*RZD_KRK_BAIKAL),RZD_61828_BAIKAL,5*RZD_KRK_BAIKAL)|                                            \
4987      (<(5*RZD_KRK_BAIKALL),RZD_61828_BAIKALL,4*RZD_KRK_BAIKALL)|                                         \
4988      (<RZD_6WLABM2L|RZD_WLABM_S,RZD_WLABMEE62AL,3*RZD_WLABMEE62L,3*RZD_WLSRMEE1L,RZD_WRMNOUZ)|           \
4989      (<RZD_KB_SC,RZD_VR_SC245,(6*(RZD_6WLSRMEE1L|RZD_6WLABM52|RZD_6WLABMEE1L)))|                         \
4990      (<(5*RZD_6WLSRMEE1,RZD_6WLABMEE1),RZD_VR_SC245,(6*RZD_6WLABM(1|2)),RZD_K_SC)|                       \
4991      (<4*RZD_W_AUTO_SC,(6*(RZD_6WLSRMEE1L|RZD_6WLABM52|RZD_6WLABMEE1L)))|                                \
4992      (<2*RZD_A_NEVSKY,3*RZD_B_NEVSKY,RZD_WR_NEVSKY,3*(RZD_WL_NEVSKY2|RZD_WL_NEVSKY))
4993  #------------------------------------------------------------------------------
4994  #
4995  # Belarus
4996  #
4997  # EP 5 Passenger long
4998  $DEF BER5PL1=4*BCH_5WLABMEE(|L),4*BCH_WLABMEE62(|L)
4999
5000  #------------------------------------------------------------------------------
5001  #
5002  # Estonia
5003  #
5004  # EP 6 Freight long Estland
5005  $DEF EST6FL1=(15-20*(EVR_151500AL|EVR_151500A|EVR_151500BL|EVR_151500B|EVR_151500C|EVR_151500CL~JMD))
5006
5007  #------------------------------------------------------------------------------
5008  #
5009  # Georgia
5010  #
5011  # EP 6 Freight long Georgia
5012  $DEF GEO6FL1=RUS6FL1
5013
5014  #------------------------------------------------------------------------------
5015  #
5016  # Ukraine
5017  #
5018  # EP 5 Passenger long
5019  $DEF UZ5PL1=4-5*UZ_KRK(|L),UZ_KRK_WRW(|L),2*UZ_Y,UZ_KRK_DY(|L)|(8*(UZ_WLABM_(3|3)))
5020
5021  # EP 6 Passenger long
5022  $DEF UZ6PL1=(<UZ_WLABM4,UZ_WL1,2*UZ_WLABM2,UZ_KRK_WRW,4*UZ_KRK_Y)|                                      \
5023      (<UZ_WLABD_3502358,UZ_617034RIC,(3*UZ_61788B),UZ_61788WR,3*UZ_61788B,UZ_61778)
5024
5025
5026  #------------------------------------------------------------------------------
5027  #
5028  # Kasachstan Bogatyr
5029  #
5030  # EP 6 Freight Coal Bogatyr
5031  $DEF KAZ6FBO1=BOGATYR_COALCAR(|2)[O:COAL(5|3|3|34|35)(|[M])]
5032
5033
5034  #------------------------------------------------------------------------------
5035  #
5036  # USA
5037  #
5038
5039  # universal trains
5040
5041  # freight E2 Wood
5042  $DEF USA2FWOODK=4-6*(WEYT_3FLAT[O:WOOD1(96|95|91|97|98|92|94|93)]),WEYT_3CAB
5043
5044  # freight E2
5045  $DEF USA2FMIXKS=(PRR_CH30|PRR_CH30Y)|SOU_CATTLE(1|2|3|4|8|7|6|5)|(CWC_1290_VAO13|MPA_510_XM)|           \
5046      (VL_10320_XL1912|WLER_25050_ARA1923)(|L)|FGEX_RF_36000S(2|3|1|1R|1R2)(|L)|                          \
5047      SAL_(13055_PRE1932_B4|15747_PRE1932_B5|12399_PRE1932_B3)(|L)|                                       \
5048      (FGEX_40532_RF1922|NX_R7_MATHEISON|NX_R7_8852_MATHEISON|FGEX_R7_43500|EKSX_1046_RF)|                \
5049      NWP_1927_XM_USRADS|NWP_1952_XM_USRADS|NWP_1958_XM_USRADS|NWP_1978_XM_USRADS|PM_80742_XM_USRADS|     \
5050      PM_81068_XM_USRADS|PM_81319_XM_USRADS|TOC_14029_XM_USRADS|AARB_12055_XM_USRASS|                     \
5051      AARB_90024_XM_USRASS|AARB_90117_XM_USRASS|CCO_8064_XM_USRASS|CCO_8137_XM_USRASS|                    \
5052      MCRR_80605_XM_USRASS|PMCKY_S81280_XM_USRASS|PREA_5136_XM_USRASS|LNE_8208_ARA1923|LNE_8263_ARA1923|  \
5053      HPTD_400_ARA1923|CCCSTL_57500_XM_USRA|CCCSTL_59499_XM_USRA|CNOR_S4396_XM_USRA|HCRR_954_XM_USRAAB|   \
5054      ((HCRR_954_XM_USRAK|MCRR_96371_XM_USRAAB|MCRR_96371_XM_USRAK|MCRR_S81674_XM_USRA|                   \
5055      PAE_3605_XM_USRAAB|PAE_3605_XM_USRAK)(|L))|BARR_(50312_XM_AB|50312_XM_K)(|L)|                       \
5056      (GARX_37_(ABRAHAM1|DUBUQUE1|DUBUQUE3|DUGDALE1|EMGE1|ESTHERVILLE1|KINGAN1|KINGAN2|SUPERIOR1|TOBIN1)  \
5057      (|L))|(PRLW_611023_RF1915|PRLW_611072_RFUL1903|PRLW_611077_RFUL1915|NX_R7_8145)(|L)|                \
5058      CWC_O14C_9042(|L)|((CHAX_107_TM_ACF11|CRWX_224_TM_ACF11|TCX_2890_TM_ACF11)(|L))|                    \
5059      MPA_(531|513|713|729)_XM|CAC_710_XL1909|CVRR_1232_XL1912|MPA_1150_XM|MPA_1153_XM|NCR_14068_XL1903|  \
5060      PRLW_559941_XLSL1903|CCCSTL_56524_XM_USRADS|(CMO_36508_XM_USRADS|CMO_1720_XM|CMO_37095_XM_USRADS)|  \
5061      (DTI_11049_XM_USRADS|DTI_11560_XM|DTI_11699_XM|DTI_11273_XM_USRADS)|                                \
5062      ((KNGX_3102_HYGRADE1|SRLX_GATC37_SWIFT1|SRLX_GATC37_SWIFT2|SRLX_GATC37_SWIFT3|URTX_5357_MAYER1|     \
5063      URTX_63061)(|L))|PRLW_XA_278(|L)|CWC_1939_XMO18(|L)|AD_SU_524(|L)|                                  \
5064      DMN_U14_22081[O:FR_KO46(|[M]),,31](|L)|(THB_FOWLER_4259|PGE_FOWLER_3530)(|L)|                       \
5065      WMR_(27001|27780|27007|27790|27010|27623)_XM_ARA1932(|L)|                                           \
5066      ((ART_1911RS_11995|URT_1911RS_1599|WFEX_1911RS_54198|URTX_RS_4975|URTX_RS_88194|MDT_RS_7253)(|L))|  \
5067      ((PFE_R302_1906|PFE_R302_1909|PFE_R302_1923|PFE_R302_1925|PFE_R304_1913|PFE_R304_1923|              \
5068      PFE_R304_1925)(|L))|                                                                                \
5069      ((PFE_R306_1913|PFE_R306_1923|PFE_R306_1925|PFE_R3011_1917|PFE_R3011_1923|PFE_R3011_1925)(|L))|     \
5070      ((PFE_R3012_1920|PFE_R3012_1923|PFE_R3012_1925|PFE_R3013_1923|PFE_R3013_1925|PFE_R3013_1923WP|      \
5071      PFE_R3013_1925WP)(|L))|                                                                             \
5072      ((APPX_RS_327|MDT_RS_9308|MDT_RS_9884|MDT_RS_10465|MDT_RS_10886|MDT_RS_12027|MDT_RS_12072)(|L))|    \
5073      ((MDT_RS_12498|MDT_RS_13325|MDT_RS_13373|MDT_RS_14205|NRC_RS_16211|NRC_RS_16326|NRC_RS_16557|       \
5074      NRC_RS_20014)(|L))
5075
5076  $DEF USA2FMIXK=3-5*USA2FMIXKS
5077
5078  $DEF USA2FMIX=6*USA2FMIXK,(PMCKY_164|BN_10107|SMVR_210|ATSF_CAB3|CHW_6)(|L)
5079
5080  # Pullmann Passenger E3
5081  $DEF USAP3PU=(9-11*(PULL_63(COLE|GLENARBOR|GLENBAY|GLENCANYON|GLENCRAG|GLENCREEK|GLENDEVON|GLENDOLL|    \
5082      GLENEAGLES|GLENROY|GLENTILT|HOLBEIN|MICHELANGELO|RUBENS)))|                                         \
5083      (9-11*(PULL_63(COLE|GLENARBOR|GLENBAY|GLENCANYON|GLENCRAG|GLENCREEK|GLENDEVON|GLENDOLL|GLENEAGLES|  \
5084      GLENROY|GLENTILT|HOLBEIN|MICHELANGELO|RUBENS)L))|                                                   \
5085      (9-11*(PULL_66(POPLARJUNCTION|POPLARLANE|POPLARROAD|POPLARTERRACE|POPLARVALLEY|POPLARWOODS)))|      \
5086      (9-11*(PULL_66(POPLARJUNCTION|POPLARLANE|POPLARROAD|POPLARTERRACE|POPLARVALLEY|POPLARWOODS)L))|     \
5087      (9-11*(PULL_(ARCHPEAK|LONEPEAK|PINTOPEAK|REDWOODPEAK|ALEXANDERHENRY|CENTIDA|CENTSALVA|              \
5088      GENERALCANBY|ISAACISTEVENS|STGOTHARDPASS)))|                                                        \
5089      (9-11*(PULL_(ARCHPEAK|LONEPEAK|PINTOPEAK|REDWOODPEAK|ALEXANDERHENRY|CENTIDA|CENTSALVA|              \
5090      GENERALCANBY|ISAACISTEVENS|STGOTHARDPASS)L))|                                                       \
5091      (9-11*((PULL_84(EMERALDPARK|EMERALDVALE))|                                                          \
5092      (PULL_831(BOKTOWER|BRESLINTOWER|CHIMESTOWER|DROMEDARYTOWER|KILCULLENTOWER|RATHAUSTOWER|ROUNDTOWER|  \
5093      SIEBERSTOWER|TAITSTOWER))))|                                                                        \
5094      (9-11*((PULL_84(EMERALDPARK|EMERALDVALE)L)|                                                         \
5095      (PULL_831(BOKTOWER|BRESLINTOWER|CHIMESTOWER|DROMEDARYTOWER|KILCULLENTOWER|RATHAUSTOWER|ROUNDTOWER|  \
5096      SIEBERSTOWER|TAITSTOWER)L)))|                                                                       \
5097      (9-11*(PULL_1012(FORTANDREWS|FORTBLISS|FORTCANBY|FORTCASEY|FORTCLARK|FORTCROOK|FORTDADE|FORTDAVIS|  \
5098      FORTFOSTER|FORTGAINES|FORTGIBBON|FORTGRANT|FORTGREBLE|FORTKEOGH|FORTLISCUM|FORTMEADE|FORTPICKENS|   \
5099      FORTSLOCUM|FORTTRAVIS|LAKEAINSLIE|LAKEAPOPKA|LAKEARIANA|LAKEARTHUR|LAKEBENTON|LAKEBUFFUM|           \
5100      LAKECALLIOU|LAKECALUMET|LAKECHARLES|LAKEDRUMMOND|LAKEELMO|LAKEEUNICE|LAKEEUSTIS|LAKEFERGUSON|       \
5101      LAKEFORTUNA|LAKEGEORGE|LAKEHANCOCK|LAKEHARNEY|LAKEHARRIET|LAKEHARRIS|LAKEHENDERSON|LAKEHURON|       \
5102      LAKEJOE|LAKELONG|LAKEMAITLAND|LAKEMERRITT|LAKEMILTONA|LAKEMINNETONKA|LAKEMONROE|LAKEMOREAU|         \
5103      LAKEPEARL|LAKEPEIGNEU|LAKEPONCHARTRAIN|LAKEVALE|LAKEWINNEBAGO)))|                                   \
5104      (9-11*(PULL_1012(FORTANDREWS|FORTBLISS|FORTCANBY|FORTCASEY|FORTCLARK|FORTCROOK|FORTDADE|FORTDAVIS|  \
5105      FORTFOSTER|FORTGAINES|FORTGIBBON|FORTGRANT|FORTGREBLE|FORTKEOGH|FORTLISCUM|FORTMEADE|FORTPICKENS|   \
5106      FORTSLOCUM|FORTTRAVIS|LAKEAINSLIE|LAKEAPOPKA|LAKEARIANA|LAKEARTHUR|LAKEBENTON|LAKEBUFFUM|           \
5107      LAKECALLIOU|LAKECALUMET|LAKECHARLES|LAKEDRUMMOND|LAKEELMO|LAKEEUNICE|LAKEEUSTIS|LAKEFERGUSON|       \
5108      LAKEFORTUNA|LAKEGEORGE|LAKEHANCOCK|LAKEHARNEY|LAKEHARRIET|LAKEHARRIS|LAKEHENDERSON|LAKEHURON|       \
5109      LAKEJOE|LAKELONG|LAKEMAITLAND|LAKEMERRITT|LAKEMILTONA|LAKEMINNETONKA|LAKEMONROE|LAKEMOREAU|         \
5110      LAKEPEARL|LAKEPEIGNEU|LAKEPONCHARTRAIN|LAKEVALE|LAKEWINNEBAGO)L))|                                  \
5111      (9-11*(PULL_121(ALHAMBRA|BARONROCHAMBEAU|BARONVONSTEUBEN|BERTHOLD|CHINOOK|EASTALHAMBRA|             \
5112      EASTALLEGHANY|EASTALLENTOWN|EASTANGUS|EASTASCOT|EASTBANGOR|EASTBETHANY|EASTBRANCH|EASTCANDIA|       \
5113      EASTCLINTON|EASTEND|FERRYFARM|LEWIS|LORDCORNWALLIS|LORDFAIRFAX|MARQUISLAFAYETTE|MCADAM|MCAFEE|      \
5114      MCANDREWS|MCANNA|MCANULTY|MCARA|MCARTHUR|MCBETH|MCBRIDE|MCCAFFREY|MCCARR|MCCRANEY|MCCREADYVILLE|    \
5115      MCCULLOUGH|MCCUNE|MCDANIEL|MCDONALD|MCGINTY|MCGIRR|MCGIVNEY|MCGRADY|MCKINLEY|MCKINLEYVILLE|         \
5116      MCKOWEN|MCLOON|MCMARTINVILLE|MCMINNVILLE|MCPHETRES|MCQUEEN|MCSHERRYSTOWN|MCTAGGART|MCTAVISH|        \
5117      MONMOUTH|SEATTLE|STALEXIS|STANTHONY|STAUBERT|STBRIDES|STCLOUD|STCROIX|STDENIS|STEVENS|STGENEVIEVE|  \
5118      STGEORGE|STGERMAIN|STHELENA|STHILAIRE|STJOSEPH|STLEONARD|STLOUIS|STNICHOLAS|STNORBERT|STPIERRE|     \
5119      STSERVAN|STTHOMAS|STVICTOR|SUPERIOR|UTICA|VANCOUVER|WAHPETON|WAKEFIELD|WILLISTON|WINNIPEG)))|       \
5120      (9-11*(PULL_121(ALHAMBRA|BARONROCHAMBEAU|BARONVONSTEUBEN|BERTHOLD|CHINOOK|EASTALHAMBRA|             \
5121      EASTALLEGHANY|EASTALLENTOWN|EASTANGUS|EASTASCOT|EASTBANGOR|EASTBETHANY|EASTBRANCH|EASTCANDIA|       \
5122      EASTCLINTON|EASTEND|FERRYFARM|LEWIS|LORDCORNWALLIS|LORDFAIRFAX|MARQUISLAFAYETTE|MCADAM|MCAFEE|      \
5123      MCANDREWS|MCANNA|MCANULTY|MCARA|MCARTHUR|MCBETH|MCBRIDE|MCCAFFREY|MCCARR|MCCRANEY|MCCREADYVILLE|    \
5124      MCCULLOUGH|MCCUNE|MCDANIEL|MCDONALD|MCGINTY|MCGIRR|MCGIVNEY|MCGRADY|MCKINLEY|MCKINLEYVILLE|         \
5125      MCKOWEN|MCLOON|MCMARTINVILLE|MCMINNVILLE|MCPHETRES|MCQUEEN|MCSHERRYSTOWN|MCTAGGART|MCTAVISH|        \
5126      MONMOUTH|SEATTLE|STALEXIS|STANTHONY|STAUBERT|STBRIDES|STCLOUD|STCROIX|STDENIS|STEVENS|STGENEVIEVE|  \
5127      STGEORGE|STGERMAIN|STHELENA|STHILAIRE|STJOSEPH|STLEONARD|STLOUIS|STNICHOLAS|STNORBERT|STPIERRE|     \
5128      STSERVAN|STTHOMAS|STVICTOR|SUPERIOR|UTICA|VANCOUVER|WAHPETON|WAKEFIELD|WILLISTON|WINNIPEG)L))|      \
5129      (9-11*(PULL_121BLACKSTOCKSL|PULL_121BROCKWAYL|PULL_121CAHOKIAL|PULL_121CULEBRAL|PULL_121DESERETL|   \
5130      PULL_121DORCHESTERL|PULL_121EASTBUFFALOL|PULL_121EASTCLARENCEL|PULL_121EASTOSWEGOL|                 \
5131      PULL_121EASTPEMBROKEL|PULL_121ESPANOLAL|PULL_121ESSEXL|PULL_121FREMONTL|PULL_121FRESNOL|            \
5132      PULL_121KASKASKIAL|PULL_121KNOLLWOODL|PULL_121LACONIAL|PULL_121MANITOUL|PULL_121MARIANAL|           \
5133      PULL_121MONTAUKL|PULL_121ORANGEBLOSSOML|PULL_121ORANGECITYL|PULL_121ORANGECOVEL|                    \
5134      PULL_121ORANGEHEIGHTSL|PULL_121ORANGEHILLL|PULL_121ORANGESPRINGSL|PULL_121ORANGEVALLEYL|            \
5135      PULL_121ORANGEVILLEL|PULL_121PONTIACL|PULL_121REDASHL|PULL_121REDBLUFFL|PULL_121REDBRANCHL|         \
5136      PULL_121REDBUDL|PULL_121REDCLIFFL|PULL_121REDFORKL|PULL_121REDLEVELL|PULL_121REDLODGEL|             \
5137      PULL_121REDRIVERL|PULL_121SAMOSETL|PULL_121SUSQUEHANNAL|PULL_121TUSCALOOSAL|PULL_121WIGWAML|        \
5138      PULL_121COLUSAL|PULL_121EAUCLAIREL|PULL_121ECHOL|PULL_121PLACERVILLEL|PULL_121WHEATONL|             \
5139      PULL_1211CLANDONALDL|PULL_1211VILLAALTAL|PULL_1211VILLACHEERL|PULL_1211VILLACOMFORTL|               \
5140      PULL_1211VILLAPARKL))|                                                                              \
5141      (9-11*(PULL_121BLACKSTOCKS|PULL_121BROCKWAY|PULL_121CAHOKIA|PULL_121CULEBRA|PULL_121DESERETL|       \
5142      PULL_121DORCHESTER|PULL_121EASTBUFFALO|PULL_121EASTCLARENCE|PULL_121EASTOSWEGOL|                    \
5143      PULL_121EASTPEMBROKE|PULL_121ESPANOLA|PULL_121ESSEX|PULL_121FREMONT|PULL_121FRESNOL|                \
5144      PULL_121KASKASKIA|PULL_121KNOLLWOOD|PULL_121LACONIA|PULL_121MANITOU|PULL_121MARIANAL|               \
5145      PULL_121MONTAUK|PULL_121ORANGEBLOSSOM|PULL_121ORANGECITY|PULL_121ORANGECOVEL|                       \
5146      PULL_121ORANGEHEIGHTS|PULL_121ORANGEHILL|PULL_121ORANGESPRINGS|PULL_121ORANGEVALLEYL|               \
5147      PULL_121ORANGEVILLE|PULL_121PONTIAC|PULL_121REDASH|PULL_121REDBLUFF|PULL_121REDBRANCHL|             \
5148      PULL_121REDBUD|PULL_121REDCLIFF|PULL_121REDFORK|PULL_121REDLEVEL|PULL_121REDLODGEL|                 \
5149      PULL_121REDRIVER|PULL_121SAMOSET|PULL_121SUSQUEHANNA|PULL_121TUSCALOOSA|PULL_121WIGWAML|            \
5150      PULL_121COLUSA|PULL_121EAUCLAIRE|PULL_121ECHO|PULL_121PLACERVILLE|PULL_121WHEATONL|                 \
5151      PULL_1211CLANDONALD|PULL_1211VILLAALTA|PULL_1211VILLACHEER|PULL_1211VILLACOMFORTL|                  \
5152      PULL_1211VILLAPARK))|(9-11*(PULL_1214OAKRUNL|PULL_1214OAKSHADEL|PULL_1214OAKWOODL))|                \
5153      (9-11*(PULL_1214OAKRUN|PULL_1214OAKSHADE|PULL_1214OAKWOOD))|                                        \
5154      (9-11*(PULL_16SALSUMAL|PULL_16SATASCADEROL|PULL_16SETNAL|PULL_16SGLEASONL|PULL_16SKAMSINL|          \
5155      PULL_16SNANTESL|PULL_16SNEWCASTLEL|PULL_16SORIANNAL|PULL_16SRANKINL|PULL_16SRIVERDALEL|             \
5156      PULL_16SSARDONYXL|PULL_16SSUPREMEL|PULL_16STROLLOPEL|PULL_16SVERDUNL|PULL_16SWANNASKAL))|           \
5157      (9-11*(PULL_16SALSUMA|PULL_16SATASCADERO|PULL_16SETNA|PULL_16SGLEASON|PULL_16SKAMSIN|               \
5158      PULL_16SNANTES|PULL_16SNEWCASTLE|PULL_16SORIANNA|PULL_16SRANKIN|PULL_16SRIVERDALE|                  \
5159      PULL_16SSARDONYX|PULL_16SSUPREME|PULL_16STROLLOPE|PULL_16SVERDUN|PULL_16SWANNASKA))
5160
5161  # USA Freigt E3 mixed hopper
5162  $DEF USA3FMIXH=(25-30*((CCCSTL_79262_HM_USRA|CCCSTL_79823_HM_USRA|CCO_43973_HM_USRA|CS_18067_HM_USRA|   \
5163      FRDX_1800_HM_USRA|IHCX_396_HM_USRA|MTRR_15301_HM_USRA|MTRR_16042_HM_USRA|MTRR_17144_HM_USRA|        \
5164      CI_454_HM|WLER_61445_HM|LSI_5161_HM|MTRR_18158_HM|MTRR_534_HM|TC_9499_HM|OW_696_HM_USRA|            \
5165      PWV_3101_HM_USRA|CI_4750_HM|PWV_5000_HM_USRA|RDG_73592_HM_USRA|NSA_9149_HM|WA_11017_HM_USRA)(|L)    \
5166      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]))|               \
5167      (25-30*((FCI_3HOPN|FCI_3HOPE|UP_3HOPN|US_3HOPN|US_3HOPE)(|L)                                        \
5168      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M])]))|                   \
5169      (25-30*((DMIR_Q8_4971_PS2003|EJE_LO_3223_PS2003|FJLCX_34018_PS2003|LC_410_PS2003|LC_411_PS2003|     \
5170      LNE_18167_PS2003|NAHX_LO_31060_PS2003|NAHX_LO_31110_PS2003|NAHX_LO_31323_PS2003|                    \
5171      PWV_LO_1955_PS2003|SLSF_84031_PS2003|SOU_280243_PS2003|SOU_319248_PS2003|SSW_77167_PS2003|          \
5172      SSW_77131_PS2003|SSW_LO_77088_PS2003)(|L)))
5173
5174
5175  # USA Freigt E3 Short mixed
5176  $DEF USA3FMIXK=(3-5*REXA_6(774|859|055)_BR(|L))|(3-5*SP_59830(1|2|3))|(3-5*LC_SU_503(|L))|              \
5177      (3-5*(NOTM_17469|MI_4125|IGN_17156|LARW_15077|LARW_15027)_XM_ARA1932(|L))|                          \
5178      (3-5*((AESX_23_TM_ACF11|CHAX_107_TM_ACF11|CMCX_143_TM_ACF11|COSX_1018_TM_ACF11|CRWX_224_TM_ACF11|   \
5179      LARW_8000_TM_ACF11|LTLX_3023_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11|STLBM_20041_TM_ACF11|     \
5180      SVX_558_TM_ACF11|TCX_2792_TM_ACF11|TCX_2890_TM_ACF11|TCX_4119_TM_ACF11|WOCX_217_TM_ACF11|           \
5181      CDLX_763_TMI_ACF27|SHPX_4039_TMI_ACF27|SHPX_6117_TM_ACF27|SHPX_20605_TM_ACF27|LNAC_XM_10254|        \
5182      MKT_XM_PS1_5585|WRNX_2840_TMPI_ACF27|UTLX_9871_TMVANDYKE|AESX_23_TM_ACF11|CHAX_107_TM_ACF11|        \
5183      CMCX_143_TM_ACF11|CRWX_224_TM_ACF11|LARW_8000_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11|         \
5184      TCX_2890_TM_ACF11|CDLX_763_TMI_ACF27|SHPX_6117_TM_ACF27|UTLX_9871_TMVANDYKE)(|L)))|                 \
5185      (3-5*CCLX_LO_2045(|L))|(3-5*(COPR_XM_PS1_4010(|L)|SRCR_BOX1))|                                      \
5186      (3-5*(CBQ_SK_50048|GSX_SK_4012|NISX_SK_479)(|L))|(3-5*(LC_XM_PS1_1008)(|L))|                        \
5187      (3-5*((MPA_(531|513|713|729)_XM|CAC_710_XL1909|CVRR_1232_XL1912|MPA_1150_XM|MPA_1153_XM|            \
5188      NCR_14068_XL1903|PRLW_559941_XLSL1903|CCCSTL_56524_XM_USRADS|CMO_36508_XM_USRADS|                   \
5189      CMO_37095_XM_USRADS|DTI_11049_XM_USRADS|DTI_11273_XM_USRADS|NWP_1927_XM_USRADS|NWP_1952_XM_USRADS|  \
5190      NWP_1958_XM_USRADS|NWP_1978_XM_USRADS|PM_80742_XM_USRADS|PM_1937AAR_XM_84202|PM_81068_XM_USRADS|    \
5191      PM_81319_XM_USRADS|TOC_14029_XM_USRADS|AARB_12055_XM_USRASS|AARB_90024_XM_USRASS|                   \
5192      AARB_90117_XM_USRASS|CCO_8064_XM_USRASS|MWR_1341_XM|CCO_8137_XM_USRASS|MCRR_80605_XM_USRASS|        \
5193      PMCKY_S81280_XM_USRASS|PREA_5136_XM_USRASS|LNE_8208_ARA1923|LNE_8263_ARA1923|HPTD_400_ARA1923|      \
5194      CCCSTL_57500_XM_USRA|CCCSTL_59499_XM_USRA|SP_B5020_54394|CNOR_S4396_XM_USRA|HCRR_954_XM_USRAAB|     \
5195      HCRR_954_XM_USRAK|MCRR_96371_XM_USRAAB|MCRR_96371_XM_USRAK|MCRR_S81674_XM_USRA|PAE_3605_XM_USRAAB|  \
5196      PAE_3605_XM_USRAK)(|L)))|(3-5*TC_1937AAR_XM_7957(|L))|                                              \
5197      (3-5*(OW_696_HM_USRA[O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),  \
5198      ,33]))|(3-5*MPA_115(1|2)_XM(ORIG|LATE)(|L))|(3-5*FDDMS_XM_PS1_12304(|L))|                           \
5199      (3-5*(HPTD_424_ARA1923(|L)|WIF_104_XM_ARA1923(|L)|TS_504_PS1(|L)|WP_(36001|3017)_PS1(|L)))|         \
5200      (3-5*(PHD_XM_1275|TC_XM_7756)(|L))|(3-5*(WFEX_RF_67000S3(|L)))|                                     \
5201      (3-5*SNA_GB_4500(|L)[O:SCRAP(5|6)(|[M])])|(3-5*ELS_GB_5033(|L)[O:SCRAP(4|5|6)(|[M])])|              \
5202      (3-5*((CBQ_188850_GB_USRA|HVR_12412_GB_USRA|TNO_G5017_44277|MC_12200_GB_USRA)(|L)                   \
5203      [O:BALLAST(29|27|25|31)(|[M])]))|(3-5*(FCI_GON(|L)[O:SCRAP(14|15)(|[M])]))|                         \
5204      (3-5*(CWC_O14C_9042|FDDMS_15177_XM)(|L))|                                                           \
5205      (3-5*GARX_37_(ABRAHAM1|DUBUQUE1|DUBUQUE3|DUGDALE1|EMGE1|ESTHERVILLE1|KINGAN1|KINGAN2|SUPERIOR1|     \
5206      TOBIN1)(|L))|(3-5*(MRSR_XM_(80|75)00|MWR_XM_(1287|1138))(|L))|                                      \
5207      (3-5*(KNGX_3102_HYGRADE1|SRLX_GATC37_SWIFT1|SRLX_GATC37_SWIFT2|SRLX_GATC37_SWIFT3|                  \
5208      URTX_5357_MAYER1|URTX_63061)(|L))|(3-5*LAPX_XT_(3040|3019|2061|306|298)(|L))|                       \
5209      (3-5*(SHPX_6608_TMI|CDLX_764_TMI|CDLX_335_TMI|NATX_6604_TMI)(|L))
5210
5211  # USA Freigt E3 Car transport
5212  $DEF USA3FCAR=20*((BTTX_RFP_F89CH_904796|BTTX_RFP_F89CH_904797|KTTX_ACL_F89CH_903427|                   \
5213      KTTX_NYC_F89CH_902766|KTTX_PRR_F89CH_902180|TTKX_SCL_F89CH_904042|TTX_NW_F89CH_904697|              \
5214      TTX_SOU_F89CH_904636)(|L))
5215
5216
5217  # USA Freigt E3 long mixed
5218  $DEF USA3FMIXL=6*USA3FMIXK
5219  $DEF USA3FMIX=4:USA3FMIXL|1:USA3FMIXH|1:USA3FCAR
5220
5221  # USA Freigt E3/E4 Tank
5222  $DEF USA4FTANK=20-30*(((AESX_23_TM_ACF11|CHAX_107_TM_ACF11|CMCX_143_TM_ACF11|COSX_1018_TM_ACF11|        \
5223      CRWX_224_TM_ACF11|LARW_8000_TM_ACF11|LTLX_3023_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11|        \
5224      STLBM_20041_TM_ACF11|SVX_558_TM_ACF11|TCX_2792_TM_ACF11|TCX_2890_TM_ACF11|TCX_4119_TM_ACF11|        \
5225      WOCX_217_TM_ACF11|CDLX_763_TMI_ACF27|SHPX_4039_TMI_ACF27|SHPX_6117_TM_ACF27|SHPX_20605_TM_ACF27|    \
5226      WRNX_2840_TMPI_ACF27|UTLX_9871_TMVANDYKE)(|L)|AESX_23_TM_ACF11|CHAX_107_TM_ACF11|                   \
5227      CMCX_143_TM_ACF11|CRWX_224_TM_ACF11|LARW_8000_TM_ACF11|NOX_8027_TM_ACF11|SRDX_409_TM_ACF11|         \
5228      TCX_2890_TM_ACF11|CDLX_763_TMI_ACF27|SHPX_6117_TM_ACF27|UTLX_9871_TMVANDYKE(|L))|                   \
5229      GATX_TM_(71603|54532)(|L)|NYC_16017_TM_GATC12K(|L)|GATX_TM_98455(|L)|GATX_TM_98468(|L))|SCCX_T2|    \
5230      GATX_T1|HOKX_T1|SVX_T5|SHPX_T4|SHPX_T5|GATX_T2|SCCX_T1|SHPX_T3|WRNX_T1|SVX_T6|SCCX_T3|SHPX_T2|      \
5231      TROX_T1
5232
5233  # USA Freigt short E4
5234  $DEF USA4FMIXK=((3-4*(MP_58678_HM_USRA|PWV_3025_HM_USRA|RDG_73593_HM_USRA)(|L)))|                       \
5235      (4-5*((ATWR_50333|CTRN_501091|GWWR_3050|MVRY_4003)(|L)[O:SCRAP(6|4|5)(|[M])]))|                     \
5236      (4-5*(SHAY_GON(1|2|3|4|5|6)))|(4-5*((SP_LO_2600_1965A|SP_LO_2600_1965B)(|L)))|                      \
5237      (3-4*(RDG_74170_HM_USRA(|L)|TC_9099_HM_USRA(|L)|VGN_3233_HM_USRA(|L)|WABR_74050_HM_USRA(|L)))|      \
5238      (3-4*(CPAA_XP_A302_204452|GNWR_XP_A302_300007|AGRW_XP_A302_1164|VC_XP_A302_9093)(|L))|              \
5239      (3-4*(VTR_617|BN_5188|ATSF_3178|ADN_XP_A403_5889|ADN_XP_A403_5889L|GAEX_BOX1))|                     \
5240      (3-4*(WA_PS50C_5101|TLCX_PS50C_1001|PAE_PS150_4630)(|L))|                                           \
5241      (3-4*GONX_GB_(310040|310080|310099|310100|310029)(|L))|                                             \
5242      (3-4*((LSBC_XM_PS1_1(100|69809)|COPR_XM_PS1_4010|MSC_XM_PS1_5055|MB_XM_4202|MSE_XM_811)(|L)))|      \
5243      (4-5*(TTX_F39(C_471100|C_471099|C_470930|A_470600|_470430|_470420|_470410)[OB:SEMI_USA4L,12,10]     \
5244      [OB:SEMI_USA4L,121,10]))|                                                                           \
5245      (4-5*(POTB_XM_159|RBOX_XAF10_12588|RBOX_XAF20A_32583|RBOX_XAF20A_32612)(|L))|                       \
5246      (3-4*(FUS_XM_1308|SBC_XM_3505|SBC_XM_3559|FUS_XM_1209|LRS_XM_7245|TLDX_PS50C_33|TLDX_PS50C_36)(|L))| \
5247      (3-4*(HBS_XM_39631|OPE_XM_1023|CSS_XM_1526|GAEX_XME_100000|GAEX_XM_74015|GMO_XM_103003|MNS_XM_563|  \
5248      PAE_883B_4519|PLE_X44C_31700|RSP_XM_100015|TAG_XM_7001|TAG_XM_7029|TSE_XM_147)(|L))|                \
5249      (4-5*(TTX_F39(C_471100|C_471099|C_470930|_470420|_470430|_470410)L[OB:SEMI_USA4R,12,10]             \
5250      [OB:SEMI_USA4R,121,10]))|(4-5*(AECX|CEFX|KGLX|MBKX|MRDX)_AFLOOD2(|L))|                              \
5251      (3-4*(PHD_PS40(|L)|GN_35028|CPR_200055|WA_5000_PS1(|L)|DTI_15292_PS1(|L)|SN_2401_PS1(|L)|           \
5252      LRS_XP_A302_4081(|L)|WCCL_XP_A302_25119(|L)|WLO_XP_A302_504460(|L)|ANRR_XP_A302_6018(|L)|           \
5253      ANRR_XP_A302_6019(|L)|CNA_XP_A302_549304(|L)|LC_XP_A302_239(|L)|LEF_XP_A302_1436(|L)|               \
5254      LOAM_XP_A302_88095(|L)|NHIR_XP_A302_721(|L)|WSOR_XP_A302_101501(|L)|WVRC_XP_A302_820(|L)|           \
5255      NOPB_XP_3329(|L)|NOPB_XP_3447(|L)|NOKL_XP_525121(|L)|VR_XP_3135(|L)|AARB_XP_5199(|L)|               \
5256      AGRW_XP_184(|L)|AGRW_XP_196|AGRW_XP_291(|L)|AGRW_XP_620(|L)|AGRW_XP_1796(|L)|AGRW_XP_2036(|L)|      \
5257      ALAB_XP_13011(|L)|ALM_XP_531561(|L)|EEC_XP_5013(|L)|GRN_XP_8050(|L)|GTRA_XP_2044(|L)|               \
5258      HS_XP_2170(|L)|HS_XP_4398(|L)|HS_XP_6328(|L)|LVRC_XP_5044(|L)|NLG_XP_5493(|L)|NOPB_XP_3896(|L)|     \
5259      NOPB_XP_3897(|L)|SBVR_XP_2035(|L)|TASD_XP_9118(|L)|TNR_XP_6005(|L)))|                               \
5260      (4-5*(CDLX_763_TMI_ACF27(|L)|SHPX_4039_TMI_ACF27(|L)|SHPX_6117_TM_ACF27(|L)|                        \
5261      SHPX_20605_TM_ACF27(|L)|STLBM_20041_TM_ACF11(|L)|SVX_558_TM_ACF11(|L)|TCX_2792_TM_ACF11(|L)|        \
5262      NOX_8027_TM_ACF11(|L)))|(4-5*TTX_F30D_(475264|475263)L[OB:SEMI_USA4R,,12])|                         \
5263      (4-5*TTX_F30D_(475264|475263)[OB:SEMI_USA4L,,12])|                                                  \
5264      (3-4*(BM_PS40|BO_PS40S|BO_PS40TS|CBQ_PS40|CBQ_120537_XM_USRADS|GRN_XM_8040)(|L))|                   \
5265      (3-4*(ITC_XM_7291|SLSF_XM_41298|AARB_XM_5072|ATWR_XF_1000|CAGY_XM_21500|CHP_XM_8170|HN_XF_5000|     \
5266      WLO_XM_503462)(|L))|                                                                                \
5267      (3-4*(CHP_XM_8170|IATR_XM_1810|JEFW_XM_1033|MCSA_XM_7104|NDEM_XM_102046|NDEM_XM_102465|             \
5268      NDEM_XM_108556)(|L))|                                                                               \
5269      (3-4*(RR_XM_458|TPW_XM_70006|VC_XP_1182|GMRC_XM_11092|HCRC_XM_818|WLO_XM_503462|NYSW_XF_104)(|L))
5270
5271  $DEF USA4FS=3-4*USA4FMIXK
5272
5273  # USA Freigt car trasport E4
5274  $DEF USA4CAR=20*ETTX_FA_907765_GT(|L)|ETTX_FA_902966_BN(|L)|UP_89AR2
5275
5276  # USA Freigt mixed long E4
5277  $DEF USA4FMIX=4:(6*USA4FMIXK)|1:USA4CAR
5278
5279  # USA Freigt short E5
5280  $DEF USA5FS=(3-4*ARR_FM12838)|                                                                          \
5281      (3-4*(CEI_XL_253016|ADN_XM_8005|AGRW_XM_5193|AMR_XM_1010|ANRR_XM_5037|ASAB_XM_7120|ASAB_XM_7122|    \
5282      AWP_XM_51428)(|L))|                                                                                 \
5283      (3-4*(WM_LO_604960|CEI_LO_706323|DRGW_LO_10070|PLE_LO_1875|SLSF_LO_78748|ROCK_LO_512076|            \
5284      ROCK_LO_512011)(|L))|(3-4*(PGEX_BETHGON2(|L)|UP_BETHGON2(|L)|PSCX_BETHGON2(|L)|SOM_BETHGON2(|L)))|  \
5285      (3-4*(KGLX_AFLOOD2(|L)|CEFX_AFLOOD2(|L)|MBKX_AFLOOD2(|L)|CNW_AFLOOD3(|L)|UCEX_RD6TRI(|L)))|         \
5286      (3-4*(BM_PS40(|L)|BO_PS40S(|L)|BO_PS40TS(|L)|CBQ_120537_XM_USRADS(|L)|CPR_PS40(|L)))|               \
5287      (3-4*(CENT_CBF1[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9]))|                                               \
5288      (3-4*(CNA_XP_A302_549402|MNJ_XP_A302_120949|NSL_XP_A302_101262|NSL_XP_101893))|                     \
5289      (3-4*(ACFX_ACF4650C|ACFX_ACF4650B|ACFX_LO_44071|NAHX_LO_35818|GFCX_LO_7|BCAX_TRI3281SO01|           \
5290      CEFX_TRI3281SO01|HWCX_TRI3281SO01|MCEX_TRI3281SO01|TILX_TRI3281SO01|TILX_TRI3281SO02)(|L))|         \
5291      (3-4*(TTZXW|CW_5147(|L)|NDYX_320798(|L)))|                                                          \
5292      (3-4*TTWX_PSH10A_993041[OB:SEMI_USA5R,16,11][OB:SEMI_USA5R,155,11])|                                \
5293      (3-4*TTWX_PSH10A_993041L[OB:SEMI_USA5L,18,11][OB:SEMI_USA5L,157,11])|                               \
5294      (3-4*KTTX_F89GH_912378(|L)[OB:SEMI_USA5L,12,11][OB:SEMI_USA5R,156,11])|                             \
5295      (3-4*(EACH_FMC50(|L)|CSX_XL_A332_486083(|L)|CNW_XP_A302_717253(|L)|CCR_FMC50(|L)|                   \
5296      BN_XP_A302_249762(|L)))|(3-4*CNA_PS50C_794383(|L))|                                                 \
5297      (3-4*(CHE_ACF4650(|L)|BN_ACF4650(|L)|VC_RBL_5200|VC_XM_5200L|GN_ACF4650(|L)|MRL_ACF4650(|L)|        \
5298      NCLX_ACF4650(|L)|PCC_ACF4650(|L)|SHPX_ACF4650(|L)|SP_ACF4650(|L)|SSW_ACF4650(|L)))|                 \
5299      (5-6*(ADMX_TANK43(|L)|GATX_TANK43K(|L)|HOKX_TANK43(|L)|UTLX_TANK43B(|L)|KCPX_TANK54(|L)|            \
5300      SHPX_TANK54(|L)|SUNX_TANK54(|L)))|(4-5*(CNA_PS50C_794383|DH_PS50C_50000|DTI_PS50C_81000)(|L))|      \
5301      (3-4*(AMC_LU_552|AMR_LU_5016|BCHY_LU_733|BCHY_LU_817|FJG_LU_29018|LNAC_LU_6045|LOAM_LU_11381|       \
5302      USLX_LU_50289)(|L))|                                                                                \
5303      (3-4*(FGCX_RPL_11698|ARMN_R7020_765036|ARMN_R7020_765037|FGMR_RPL_13398|PFE_R7020H_457404|          \
5304      VCY_RPL_25289)(|L))|                                                                                \
5305      (3-4*(PFE_R7020K_457632|PFE_R7020H_456904|PFE_R7020K_467633|SPFE_R7020_456909|SPFE_R7020_456923|    \
5306      UPFE_R7020_457980)(|L))|                                                                            \
5307      (3-4*(SPFE_R7020_457232|LNAC_RBL_5046|SPFE_R7020_457233|UPFE_R7020_457508|UPFE_R7020_457533|        \
5308      UPFE_R7020_457979)(|L))|                                                                            \
5309      (3-4*(BCIT_RBL_800480|LNAC_RBL_5257|LNAC_RBL_5257|LRLX_RBL_222|RPCX_RBL_159|TPW_RBL_50567)(|L))|    \
5310      (3-4*(TPW_RBL_50582|USLX_RBL_17097|WSOR_RBL_503052|WSOR_RBL_503056|WSOR_RBL_503081)(|L))
5311
5312  # USA Freigt E6 Car transport
5313  $DEF USA6FCAR=(20*(ATSF_AUTORACK|BN_AUTORACK~BC|BNSF_AUTORACK1|BNSF_AUTORACK2|BNSF_AUTORACK3))|         \
5314      (20*(ARTAUTOMAX|BNSF_ARTAUTO|CSX_ARTAUTO|AUTOMAX|BNSF_AUTOMAX|BNSF_AUTOMAX2|CP_AUTOMAX|             \
5315      CSX_AUTOMAX|KCS_AUTOMAX|UP_AUTOMAX))|                                                               \
5316      (20*(CTTX_MULTIMAX_NSA|AMTK_FA_9200|AMTK_FA_9208|CTTX_MULTIMAX_BNSF1|CTTX_MULTIMAX_BNSF2|           \
5317      CTTX_MULTIMAX_CNR|CTTX_MULTIMAX_CSX|CTTX_MULTIMAX_KCS)(|L))
5318
5319  # USA Freigt E6 Container
5320  $DEF USA6FCON1=7*((2-4*TTX_INTER[OB:C40B,,4][O:C40B,,30])|(2-4*DTTX_SINGLE[OB:C40B,,4][O:C40B,,30])|    \
5321      (2-4*(FEC|AWXX)_TW85(|L)[O:C40B,17,12][O:C40B,137,12])|(2-4*SP_GUMS48(|L)[OB:C40B,,3][OB:C40B])|    \
5322      (2-4*TTX_GUMS48(|L)[OB:C40B,,3][OB:C40B])|                                                          \
5323      (2-4*(FEC|AWXX)_TW85(|L)[O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),14,13]                                \
5324      [O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),75,13][O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),136,13]           \
5325      [O:(LWT|USWX|DSEU|AWIU)_TRASHCONT(|L),197,13])|                                                     \
5326      (<(SP_GUMS48(A|B)L[OB:C40B,,3][OB:C40B]),((1|3)*SP_GUMS48M(|L)[OB:C40B,,3][OB:C40B]),               \
5327      (SP_GUMS48(A|B)[OB:C40B,,3][OB:C40B]))|                                                             \
5328      (<(DTTX_3PACKEL[OB:C40B,46,4][O:C40B,46,30]),((1|3)*DTTX_3PACKM[OB:C40B,29,4][O:C40B,29,30]),       \
5329      (DTTX_3PACKE[OB:C40B,29,4][O:C40B,29,30]))|                                                         \
5330      (<(BRAN_GUMS48(A|B)L[OB:C40B,,3][OB:C40B]),((1|3)*BRAN_GUMS48M(|L)[OB:C40B,,3][OB:C40B]),           \
5331      (BRAN_GUMS48(A|B)[OB:C40B,,3][OB:C40B]))|                                                           \
5332      (<(DTTX_GUMS48(A|B)L[OB:C40B,,3][OB:C40B]),((1|3)*DTTX_GUMS48M(|L)[OB:C40B,,3][OB:C40B]),           \
5333      (DTTX_GUMS48(A|B)[OB:C40B,,3][OB:C40B]))|(2-4*OTTX_E(1|2)[O:C30A,6,10][O:C30A,97,10])|              \
5334      (2-4*(CPR_524176|DTTX_25064|DTTX_CONT1)                                                             \
5335      (([O:C30A,20,13][O:C30A,111,13])|([O:C40A,20,13][O:C20A,141,13])|([O:C20A,20,13][O:C40A,81,13]))))
5336
5337  # USA Road-railer
5338  $DEF USA6FRRA1=(<TCSZ_HEADL,14*(TCSZ_TRAILER(1|2|3|4|5)(|L)),TCSZ_HEAD)
5339
5340  # USA Freigt E6 Tank
5341  $DEF USA6FTANK=20-30*(((ADMX|AFPX|CCLX|CRGX|DMIX|HOKX|PROX|SBLX|STSX)_TANK43(|L))|                      \
5342      ((UTLX_TANK43(A|B|T)|GATX_TANK43(H|K|E)|PROX_TANK43A|GATX_TANK54(A|B))(|L))|                        \
5343      ((ACFX|ACTX|ATSF|CPCX|EAGX|KCPX|OWIX|RACX|SHPX|SUNX)_TANK54(|L))|                                   \
5344      ((WPHX_2009|PUBX_138|PUBX_151|WPHX_215)_T679(|L))|SHPX_206830_TM(|L)|                               \
5345      ((ADMX|AGPX|CCBX|BRCX|CGTX|CHSX|DNAX|GATX|MQPX|PROX|SHPX|UTLX)_TANK55(|L))|                         \
5346      ((PROX|ARPX|NATX)_TANK65(|L))|((VPCX|ACSX|ACFX|CITX|JJJX|GATX|PROX|GLNX|UTLX)_TANK67(|L))|          \
5347      ((CNTX_TANK67(A|B)|PLMX_TANK65A|SHPX_TANK67A)(|L))|(STAX|ACFX|CGW|HCPX|HOKX|SP)_TANK50)
5348
5349  # USA Freigt E6 mixed short
5350  $DEF USA6FMIXK=(4-5*CEFX_3(2892|0288)(|L)[O:BALLAST_OLD1(|[M])])|                                       \
5351      (4-5*(ACFX_LO_49369|FWD_LO_3190|GMO_LO_81028|CEI_LO_718519|ACY_LO_448|AEX_LO_7515|                  \
5352      ACFX_38806_LO5800|SEAB_LO_248664|VTR_LO_6003|FXE_TRI5161SO01|IAIS_TRI5161SO01|SIRX_TRI5161SO01|     \
5353      DME_5161TRI)(|L))|(4-5*DSEX_TW85(|L)[O:(GIRDER_BELL|STEEL23),,12])|(4-5*AMGX_6028(|L))|             \
5354      (4-5*(CNA_PS50C_794383|DH_PS50C_50000|DTI_PS50C_81000)(|L))|                                        \
5355      (4-5*((ICER_320052(|L)|JTIX_9001(|L)|DMER_80197(|L)|MBKX_287011(|L))[O:SCRAP(6|4|5)(|[M])]))|       \
5356      (4-5*(AOK_65420TRI3281|AGPX_TRI5161|FLIX_TRI5161)(|L))|                                             \
5357      (4-5*(PRR_LO_260177|SHPX_LO_60419|SHPX_LO_60928|SHPX_LO_61066|TRLX_LO_5344)(|L))|                   \
5358      (4-5*((CRLE_8667_XPA|PRR_110126_XPA|MP_272009_XPA|CR_293792_XPA|BO_492069_XPA)(|L)))|               \
5359      (4-5*TTPX_(GSH72A|NSH72)(|L)[OB:CELLULOSE(|[M]),,11])|                                              \
5360      (4-5*(UTCX_PS4740SO01|TLCX_4700PS2|PLCX_PS4740SO0(1|2)|PTLX_PS4740SO01|PVGX_PS4740SO01|             \
5361      PTLX_PS4750SO01|CATX_PS4740SO01|CRLE_PS4740SO01|GLCX_PS4740SO0(1|2)|IMRL_PS4740SO01)(|L))|          \
5362      (4-5*(DME_PS4750SO01|DJTX_PS4750SO0(1|2)|CRDX_PS4750(|A|SO02|SO03|SO04|SO05)|CBRW_PS4750SO01|       \
5363      CGRX_PS4750SO01|ATW_PS4750SO01|BCOL_PS4750SO0(1|2)|ACOX_PS4750SO01|ADMX_PS4750SO0(2|1)|             \
5364      AGPX_PS4750SO02|AJPX_PS4750SO01|AM_PS4750SO0(2|1)|MNS_PS4740SO0(1|2)|MNS_PS4750SO01|                \
5365      MOCX_PS4750SO01|MWCX_PS4750SO01)(|L))|(4-5*TPIX_2(10_RPL|20_RPL|30_RPL)(|L))|                       \
5366      (4-5*TLCX_PS4740SO(20|19|18|17|16|15|14|13|12|11|10|09|08|07|06|05|04|03|02)(|L))|                  \
5367      (4-5*(LCGX_PS4750SO01|LGIX_PS4750SO01|ITC_PS4750SO01|FGIX_PS4750SO01|FLIX_PS4750SO0(1|2|3)|         \
5368      FPFX_PS4750SO01|FURX_PS4750SO01|GACX_PS4750SO0(1|2)|GELX_PS4750SO01|GLCX_PS4750SO01|                \
5369      GNBC_PS4750SO0(1|2|3|4)|ITFX_PS4750SO01|JRSX_PS4750SO01|JWFX_PS4750SO01|GRPX_PS4750SO01|            \
5370      MPA_126_MWF)(|L))|(4-5*TLDX_PS4740SO(09|08|07|06|05|04|03|02|01)(|L))|                              \
5371      (4-5*(SRY_NSC73CB(|L)[O:LUMBER(3|5)(|[M]),12,12][O:LUMBER(3|5)(|[M]),100,12]                        \
5372      [O:LUMBER4(|[M]),188,12]|SGLR_NSC73CB(|L)[O:LUMBER(1|2)(|[M]),12,12][O:WOOD30(|[M]),143,12]))|      \
5373      (4-5*TTX_TW89(|L)[OB:#STRAIL_14,16,10][OB:STRAIL_14,143,10])|                                       \
5374      (4-5*(AARB_PS4700|CBRW_PS4700|TCAX_PS47(00|40SO02|40SO03)|TLCX_4700PS2|AGPX_PS4750|UTCX_PS4750)(|L))| \
5375      (4-5*(SIRX_HS4550SO01|NOKL_HS4550SO01|KPLX_HS4550SO01|GTAX_HS4550SO01|ENDX_HS4550SO01|              \
5376      FLIX_HS4550SO01|GCCX_HS4550SO01|SKPX_HS4550SO1|THB_HS4550SO01|SCOX_HS4550|GWIX_HS4550|              \
5377      NAHX_HS4550(|SO02)|IMCX_HS4550)(|L))|(4-6*NP_(REF50WFE|REF60|PS4740SO01(|L)))|                      \
5378      (4-5*NAHX_PS4750SO(30|29|28|27|26|25|24|23|22|21|20|19|18|17|16|15|14|13|12|11|10|09|08|07|06|05|   \
5379      04|03|02)(|L))|                                                                                     \
5380      (4-5*(MPA_XM_A302_7517|MPA_XP_A302_203|MPA_XM_A302_9248|MPA_300_PS1|MPA_7200_PS1|MPA_7300_PS1)(|L))| \
5381      (4-5*(BSEX_TRI6351SO01|CITX_TRI6351SO01|CRDX_TRI6351SO01|FURX_TRI6351SO01|MWTX_TRI6351SO01|         \
5382      NAHX_TRI6351SO01|TILX_TRI6351SO02|TSAX_TRI6351SO01)(|L))|                                           \
5383      (4-5*(ADMX_TRI5161SO02|ADMX_TRI5161SO03|BORX_TRI5161SO01|DJTX_TRI5161SO01|GACX_TRI5161SO02|         \
5384      GACX_TRI5161SO03|GACX_TRI5161SO04|SIRX_TRI5161SO02|SOYX_TRI5161|SOYX_TRI5161SO02|TILX_TRI5161SO01|  \
5385      TILX_TRI5161SO02|TIMX_TRI5161SO01)(|L))|                                                            \
5386      (4-5*(UNPX_HS4550SO0(2|1)|ALPX_HS4550(|SO02|SO03)|ACFX_LO_88|SHPX_LO_46011|NAHX_LO_38154|           \
5387      SHPX_LO_6(0419|1066)|TRLX_LO_5344)(|L))|                                                            \
5388      (4-5*(USLX_PS4750SO0(1|2|3|4)|TPW_PS4750SO01|TRGX_PS4750SO01|UNPX_PS4750SO0(1|2)|                   \
5389      USLX_PS4750SO0(1|2|3|4|5)|PVGX_PS4750SO01|PCC_PS4750SO01|PLCX_PS4750SO0(1|2|3|4|5)|                 \
5390      SEAB_PS4750SO01|PLWX_PS4750SO0(1|2|3)|RRVW_PS4740SO01|NAHX_PS4750SO01)(|L))|                        \
5391      (4-5*PTLX_PS4750SO(44|43|42|41|40|39|38|37|36|35|34|33|32|31|30|29|28|27|26|25|24|23|22|21|20|19|   \
5392      18|17|16|15|14|13|12|11|10|09|08|07|06|05|04|03|02)(|L))|                                           \
5393      ((4-5*((AEX_4023_THRALL4000|DLWR_7042_THRALL4000|AMGX_4130_THRALL4000|AMGX_4184_THRALL4000|         \
5394      ECXX_2135_THRALL4000|EAMX_5017_THRALL4000|LEF_4502_THRALL4000|PEPX_21_THRALL4000|                   \
5395      PEPX_80_THRALL4000|PMGX_5201_THRALL4000|PSCX_520_THRALL4000|SVGX_1010_THRALL4000|                   \
5396      APAX_550_THRALL4000|CUOH_3028_THRALL4000|DJJX_2407_THRALL4000|DJJX_10228_THRALL4000|                \
5397      DJJX_18007_THRALL4000)(|L)[O:SAND(7|8|2)(|[M])])))|(4-5*(PRR_H45_259802|KRIX_TRI5161)(|L))|         \
5398      (4-5*((NADX_RBL_60508(|L)|CRDX_20837TRI3281|ERCX_7008TRI3281|GACX_8593TRI3281|NRLX_TRI3281)))|      \
5399      (4-5*((SSIX_ACF4650|ACFX_ACF4650A|AEX_8380_LO4650)(|L)))|(4-5*((CEFX_30276|CW_5136)(|L)))|          \
5400      (4-5*((PDRR_XP_1083|PHD_XP_3001|PHD_XP_5029|SAN_XP_13065|RBOX_XP_15000|MSDR_XP_195473|ATW_XP_3385)  \
5401      (|L)))|(4-5*(ALY_91686(|L)[O:WOOD1(29|24),,11]))|(4-5*((CEFX_30276|CW_5136)(|L)))|                  \
5402      (4-5*((AOK_THR73CB|BCOL_THR73CB|NOKL_THR73CB)(|L)[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9]))|             \
5403      (4-5*((CBRY_THR73CB|CRLE_TW73CB|CBRY_THR73CB)(|L)[O:WRAPLUMBER(1|2|3),,10]))|                       \
5404      (4-5*(TTX_AUTORACK2|BN_AUTORACK~BC|ATSF_AUTORACK|BNSF_AUTORACK1))|                                  \
5405      (TTAX_RAF53[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5)L,190,8]                              \
5406      [OB:VAN53_0(1|2|3|4|5)L,373,8][OB:VAN53_0(1|2|3|4|5)L,559,8][OB:VAN53_0(1|2|3|4|5),783,8])|         \
5407      (TTAX_RAF53L[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5),230,8]                              \
5408      [OB:VAN53_0(1|2|3|4|5),413,8][OB:VAN53_0(1|2|3|4|5),599,8][OB:VAN53_0(1|2|3|4|5),783,8])|           \
5409      (2*((TTAX_RAF33L[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5),230,8]                          \
5410      [OB:VAN53_0(1|2|3|4|5),409,8])|                                                                     \
5411      (TTAX_RAF33[OB:VAN53_0(1|2|3|4|5)L,16,8][OB:VAN53_0(1|2|3|4|5)L,190,8][OB:VAN53_0(1|2|3|4|5),409,8])))| \
5412      (4-5*((DETX_BETHGON2|DJLX_BETHGON2|GEMX_BETHGON2|GSNX_BETHGON2|JECX_BETHGON2|KCLX_BETHGON2|         \
5413      LLCX_BETHGON2)(|L)[OB:SPRUCE1(|[M]),,39]))|(4-5*((AGPX_PS4750|TLCX_4700PS2|TCAX_PS4700|CBRW_PS4700)))
5414  # USA Freigt E6 mixed long
5415  $DEF USA6FMIX=7*USA6FMIXK
5416  # USA Freigt E6 mixed long all
5417  $DEF USA6FREIGT=3:USA6FMIX|1:USA6FRRA1|3:USA6FTANK|3:USA6FCON1|2:USA6FCAR
5418
5419  # Railway companies
5420
5421  # USA Alaska AAR
5422  #  Freight E2 short
5423  $DEF USA2FAARS=(4-5*ARR_11700_RF(|L))|2*USA2FMIXK|(5*(ARR_13200E_GB(|L)[O:(COAL7|FR32|COAL1)(|[M])]))
5424  #  Freight E2 long
5425  $DEF USA2FAAR=4-5*USA2FAARS,AR_NE_309(|L)
5426  #  freight E4 shunting;
5427  $DEF USA4FAARS=(4-5*ARR_FM12838[O:HIPRES_BURNER,,11])|USA4FMIXK|(4-5*ARR_BOX(2|1))|                     \
5428      (4-5*(ARR_13200(E|L)_GB(|L)[O:(COAL7|FR32|COAL1)(|[M])]))|(4-5*ARR_XP_10923(|L))|                   \
5429      (4-5*(ARR_13800(E|L)_GB(|L)[O:FR_ST(02|01)(|[M])]))|(4-5*ARR_HT_14301(|L))|                         \
5430      (4-5*ARR_XM(10708|10438|10240|10207|1552E|8000|8027|8012)(|L))|(4-5*ARR_BOX(3|5|4))
5431  #  freight E4 long;
5432  $DEF USA4FAAR=5-6*USA4FAARS,ARR_CAB(|2|1|3)
5433  #  freight E5 shunting;
5434  $DEF USA5FAARS=(4-5*ARR_11520_BR(|L))|(4-5*ARR_10800_RBL(1|2)(|L))|(4-5*WRNX_2840_TMPI_ACF27(|L))|      \
5435      (4-5*ARR_13200L_GB(|L)[OB:SCRAP(1|2|3|4|5)(|[M]),,22])|USA5FS
5436  #  Freight E5 long
5437  $DEF USA5FAAR=(25*(ARR_PS4700(|L)|ARR_LO4750))|(25*(ARR_HOP[O:(COAL7|FR32|COAL1)(|[M])]))|              \
5438      (5-6*USA5FAARS)
5439
5440  # USA Ann Arbor
5441  #  freight E3 shunting;
5442  $DEF USA3FAARBS=(4-5*AARB_(12055|90024|90117)_XM_USRASS(|L))|                                           \
5443      (4-5*AARB_XM_PS1_(371|400)(|L)(0-1*[O:PANEL7_SUP_6FOOT,54,8]))|USA3FMIXK
5444  #  freight E3 long;
5445  $DEF USA3FAARB=5-6*USA3FAARBS,WEYT_3CAB
5446  #  freight E4 shunting;
5447  $DEF USA4FAARBS=(4-5*(AARB_XM_5072(|L)|AARB_BOX1))|(4-5*AARB_PS4700(|L))|USA2FMIXK
5448  #  freight E4 long;
5449  $DEF USA4FAARB=5-6*USA4FAARBS,WEYT_3CAB
5450
5451  # USA Atlantic Coast Line
5452  #  freight E3 shunting;
5453  $DEF USA3FACLS=(4-5*ACL_O25_200(00|25)(|L))|(4-5*ACY_3693_PS1(|L))|(4-5*ACL_XM_25200(|L))|              \
5454      (4-5*(ACL_K1(1_93600|1_93696|2_93900|2_94249))(|L)[OB:BALLAST(24|44)(|[M])])|                       \
5455      (4-5*(ACL_17199_VAO17|ACL_17862_VAO17|ACL_17863_VAO17)(|L))|(4-5*ACL_K21_84073(|L))|                \
5456      (4-5*(ACL_O17_ORIG|ACL_O14A_46000)(|L))|(4-5*(ACL_46751_XM_USRADS|ACL_46930_XM_USRADS))|            \
5457      (4-5*(ACL_FM_760(2|0)(|L)[O:CABLE9,,11]))|(4-5*ACL_PS50C_35400,ACL_LC_PS1_28711(|L))|               \
5458      (4-5*ACL_PS50C_35400(|L))|(4-5*ACL_O14B_18(87|54)(|L))|(4-5*ACL_GB_98027(|L)[O:SCRAP(5|6)(|[M])])
5459  #  freight E3 long;
5460  $DEF USA3FACL=4-5*USA3FACLS,ACL_M5_0710(|L)
5461
5462  # USA Akron, Canton & Youngstown Railroad
5463  # freight E3 shunting;
5464  $DEF USA3FACYS=(4-5*ACY_XM_(1260|3000)(|L))|(4-5*ACY_XM_PS1_(757|726|845)(|L))|USA2FMIXK
5465  # freight E3 long;
5466  $DEF USA3FACY=5-6*USA3FACYS,ACY_NE_66(|L)
5467
5468  # USA Amtrack
5469  # passenger E4
5470  $DEF USA4PAMT=(<AMTK_1300_1,AMTK_106VOLUSIA2803_4167L,2*AMTK_COACH1P1L,AMTK_5BRLOUNGE_3230P1L,          \
5471      AMTK_CAFE1P1L,2*AMTK_2252_METCALFL)|                                                                \
5472      (<(2*AMTK_2252_METCALF),AMTK_CAFE1P1,AMTK_5BRLOUNGE_3230P1,2*AMTK_COACH1P1,                         \
5473      AMTK_106VOLUSIA2803_4167,AMTK_1300_1)
5474  #  passenger E5
5475  $DEF USA5PAMT=(<AMTK_MHB3,AMTK_BAGDORM_1626P3|AMTK_BAG_1800P3L|AMTK_BAG_1178P3|AMTK_BAGDORM_1610P3,     \
5476      3*AMTK_COACH_4000L,AMTK_LOUNGE_31(13|18|00|06)L,                                                    \
5477      AMTK_DINER_85(01|21)P3L|AMTK_DINER_8505P3L|AMTK_BUFFET_8700L,3*AMTK_COACH_4000L,AMTK_SLP_2230P3L,   \
5478      AMTK_SLP_2461L)|                                                                                    \
5479      (<AMTK_SLP_2461,AMTK_SLP_2230P3,3*AMTK_COACH_4000,                                                  \
5480      AMTK_DINER_85(01|21)P3|AMTK_DINER_8505P3|AMTK_BUFFET_8700,AMTK_LOUNGE_31(13|18|00|06),              \
5481      3*AMTK_COACH_4000,AMTK_BAG_1178P3L|AMTK_BAGDORM_1626P3L|AMTK_BAGDORM_1610P3L|AMTK_BAG_1800P3,       \
5482      AMTK_MHB3)|(<AMTK_HBB3,3*AMTK_SL13L~BC,3*AMTK_SB13L~BC,AMTK_SD13L~BC,4*AMTK_SC13L~BC)|              \
5483      (<(4*AMTK_SC13~BC),AMTK_SD13~BC,3*AMTK_SB13~BC,3*AMTK_SL13~BC,AMTK_HBA3)|                           \
5484      (<AMTK_COACH1P3,AMTK_CAFE2P3L,AMTK_COACH1P3,3*AMTK_COACH1P3L,AMTK_COACH1P3,AMTK_COACH1P3L)|         \
5485      (<AMTK_COACH1P3,AMTK_COACH1P3L,3*AMTK_COACH1P3,AMTK_COACH1P3L,AMTK_CAFE2P3,AMTK_COACH1P3)|          \
5486      (<AMTK_COACH1P2L,AMTK_COACH1P1L,AMTK_CAFE1P3L,AMTK_COACH1P2,AMTK_COACH1P1L,AMTK_CAFE1P1,            \
5487      AMTK_COACH1P1)|                                                                                     \
5488      (<AMTK_COACH1P1L,AMTK_CAFE1P1L,AMTK_COACH1P1,AMTK_COACH1P2L,AMTK_CAFE1P3,AMTK_COACH1P1,             \
5489      AMTK_COACH1P2)
5490  #  passenger E6
5491  $DEF USA6PAMT=(<AMTK_BAG_1800AC,5*AMTK_COACH1P5,AMTK_CAFE1P5,4*AMTK_BUS1P5)|                            \
5492      (<(4*AMTK_BUS1P5L),AMTK_CAFE1P5L,5*AMTK_COACH1P5L,AMTK_BAG_1800ACL)|                                \
5493      (<AMTK_HB(A|B)4|AMTK_BAG_1178P4L,4*AMTK_COACH2P4L,                                                  \
5494      AMTK_DINER_8505P4L|AMTK_CAFE1P4L|AMTK_CAFE2P4L|AMTK_DINER_8501P4BL|AMTK_DINER_8505P4B(|L),          \
5495      5*AMTK_COACH1P4L)|                                                                                  \
5496      (<(5*AMTK_COACH1P4),                                                                                \
5497      AMTK_DINER_8501P4B|AMTK_CAFE1P4|AMTK_CAFE2P4|AMTK_DINER_8521P4B|AMTK_DINER_8505P4,4*AMTK_COACH2P4,  \
5498      AMTK_BAG_1178P4|AMTK_HB(A|B)4)
5499  #  passenger E6 Superliner
5500  $DEF USA6PAMTS=(AMTK_SC14AL,AMTK_SC14A,AMTK_SL14A(|L),AMTK_SS14(|L),AMTK_MHB4)|                         \
5501      (<AMTK_SL2TSP4B_39000L,AMTK_SL1LNP4B_33100L,AMTK_SL2SLP4B_32070L,AMTK_SL2CHP4B_34102L,              \
5502      AMTK_SL2DNP4B_38000L)|                                                                              \
5503      (<AMTK_SL2DNP4B_38000,AMTK_SL2CHP4B_34102,AMTK_SL2SLP4B_32070,AMTK_SL1LNP4B_33100,                  \
5504      AMTK_SL2TSP4B_39000)
5505
5506
5507  # USA AR
5508  # Freight E4 shunting
5509  $DEF USA4FARS=USA4FMIX|(4-5*AR_XM_1031(|L))
5510  # Freight E4
5511  $DEF USA4FAR=5-6*USA4FARS,AR_(NE_309(|L))
5512
5513  # USA Atchison,Topeka & Santa Fe Railway
5514  # Freigt E2
5515  $DEF USA2FATS=5*ATSF_PS40(|L),2*USA2FMIXK,10*(ATSF_3(7724|8165|9683)_XM_USRADS(|L)),                    \
5516      ATSF_CAB3(|L)|ATSF_CAB6(|L)
5517  #  passenger E3
5518  $DEF USA3PATS2L=(<ATSF_3430,3*ATSF_ORABI,ATSF_LAGUNA,3*ATSF_COCHITI,2*ATSF_ACOMA,ATSF_NAVAJO)
5519  $DEF USA3PATS2=(<ATSF_NAVAJOL,2*ATSF_ACOMAL,3*ATSF_COCHITIL,ATSF_LAGUNAL,3*ATSF_ORABIL,ATSF_3430)
5520  # passenger E3 - El Capitan
5521  $DEF USA3PATS=(<ATSF_3480L,ATSF_700L,ATSF_650L,3*ATSF_575L,4*ATSF_528L,ATSF_3480,ATSF_3453)|            \
5522      (<ATSF_3453L,ATSF_3480L,4*ATSF_528,3*ATSF_575,ATSF_650,ATSF_700,ATSF_3480)
5523  # Freigt E3 shunting
5524  $DEF USA3FATSS=(4-6*(ATSF_SK(2|3|5)(|L)))|(4-6*ATSF_BOX40(A|B|C|D|E|F|G|H))|                            \
5525      (4-6*ATSF_BX(3K|3AB|6AB|6K|11K_XM|11AB_XM|12_12XM|12_6XM)(|L))|                                     \
5526      (4-6*ATSF_REF(1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18))|                                       \
5527      (4-6*ATSF_BX(36_148771|28_138500|31_148190|32_148384|36_148594|28_138500L|31_148190L|32_148384L|    \
5528      36_148594L))|(4-6*(ATSF_BX52_PS1_276(500|550|600|608)(|L)))|(4-6*ATSF_LO_310303(|L))|               \
5529      (ATSF_BX57_PS1_31(250|250L|375|500|625|508|508L|699|699L|700|700L))|                                \
5530      (4-6*(ATSF_(42667_PS1|42619_PS1|42301_PS1|42070_PS1|12868_PS1|11477_PS1|PS40)(|L)))|                \
5531      (4-6*ATSF_GA61_(169728|169555)(|L))|(4-6*(ATSF_3(7724|8165|9683)_XM_USRADS(|L)))|USA3FMIXK
5532  # Freigt E3 long
5533  $DEF USA3FATS=(4-6*USA3FATSS)|(20-25*ATSF_GA(105_82000|88_87227|101_87250)_PS2003(|L))|                 \
5534      (15*ATSF_78114_GA72(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]),                   \
5535      (ATSF_CAB3(|L)|ATSF_CAB8|ATSF_CAB9|ATSF_CAB6(|L)|ATSF_CAB7(|L))
5536  # Freight E4 shunting
5537  $DEF USA4FATSS=(4-5*ATSF_AUTORACK)|(4-5*ATSF_G52[O:SAND4(|[M]),,29])|                                   \
5538      (4-6*ATSF_FT7_90906(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])
5539  # Freight E4
5540  $DEF USA4FATS=4-5*USA4FATSS,(ATSF_CAB3(|L)|ATSF_CAB8|ATSF_CAB9)
5541  # Freight E6 short
5542  $DEF USA6FATSS=(4-6*ATSF_(FMC50|NSC50HC2)(|L))|(4-6*ATSF_TANK54(|L))|(4-6*ATSF_AUTORACK)|               \
5543      (4-6*ATSF_GA55(|L)[O:FR_ST(02|01)(|[M])])|(4-6*ATSF_PS4(427|750|750SO02|750SO03)(|L))|              \
5544      (4-6*ATSF_LO_314803(|L))|(4-6*ATSF_HS4550(|L))|(4-6*ATSF_BX1440_36666(|L))|                         \
5545      (4-6*ATSF_BX187_375(02|84)(|L))
5546  # Freight E6 long
5547  $DEF USA6FATS=6*USA6FATSS
5548
5549  # USA Atlanta & West Point
5550  # Freight E3 short
5551  $DEF USA3FAWPS=(4-5*AWP_XM_38000(|L))|(4-5*(AWP_50001_PS1|AWP_51104_PS1)(|L))|                          \
5552      (4-5*(GT_10000GAL|GT_30F|TANK_SH_DOW|TANK_SH_FIRESTONE))|USA3FMIXK
5553  # Freight E3 long
5554  $DEF USA3FAWP=5-6*USA3FAWPS,WEYT_3CAB
5555
5556  # USA Bangor & Aroostook
5557  # Freight E3 short
5558  $DEF USA3FBARS=4-5*(BAR_XM(1A|1C|1B|2A|2B|2C|3A|3B|3C|4A|4B|4C|5C|5B|5A)_ARA1932(|L))|USA3FMIXK|        \
5559      (4-5*BAR_BOX(3|2)|BAR_BOX1)
5560  # Freight E3 long
5561  $DEF USA3FBAR=5-6*USA3FBARS,BAR_C(10|86|92|99)(|L)
5562  # Freight E4 short
5563  $DEF USA4FBARS=(4-5*BAR_XP_(5599|5282)(|L))|USA4FS|(4-5*BAR_(3157AB|3157K)_XM(|L))|(4-5*BAR_REEFER)|    \
5564      (4-5*BAR_XP_(5599|5282)(|L))|(4-5*BAR_PS50C_(6015|6117)(|L))|(4-5*BAR_BOX(3|2))
5565  # Freight E4 long
5566  $DEF USA4FBAR=5-6*USA4FBARS,BAR_C(10|86|92|99)(|L)
5567
5568  # USA Bessemer & Lake Erie Railroad
5569  #  Freigt E4 shunting
5570  $DEF USA4BLES=USA4FMIXK|(5-6*BLER_PS40(|L))
5571  #  Freigt E4 long
5572  $DEF USA4BLE=(5*USA4BLES)|(20-25*BM_LO_5333_PS2003(|L))|                                                \
5573      (20*(BLER_43604_HM_USRA(|L)                                                                         \
5574      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])),WEYT_3CAB
5575
5576  # USA Boston & Maine
5577  #  Freigt E4 shunting
5578  $DEF USA4FBMS=(4-6*BM_1937AAR_XM_(73198|73000)(|L))|(4-6*BM_PS40(|L))|(3-4*BM_91250_GB_USRA(|L))|       \
5579      (3-4*BO_XM_B209_486976(|L))|(4-6*(TCX_2890_TM_ACF11|TCX_4119_TM_ACF11|WOCX_217_TM_ACF11))|          \
5580      (5-6*(BM_71968_ARA1923|BM_70115_XM_USRADS|BM_70285_XM_USRADS)(|L))|                                 \
5581      (4-5*BM_34007_FM(|L)[O:BETONPIPE2,10,11][O:BETONPIPE2,98,11])|(4-5*BM_HT_10200(|L))|                \
5582      (4-6*BM_7(1555|2662)(K|AB|MM)_XM(|L))|(4-5*BM_GB_9(2713|2881|865)(|L)[OB:SCRAP(14|1|2)(|[M]),,16])
5583  #  Freigt E4 long
5584  $DEF USA4FBM=(5*USA4FBMS)|(20-25*BM_LO_5333_PS2003(|L)),BM_NE_C(5|9)(|L)
5585  #  Freigt E5
5586  $DEF USA5FBMS=(5-7*(BM_XP_7900(0|5)(|L)))|(5-7*BM_(RBL_113|XM_78101)(|L))|                              \
5587      (5-7*(BM_77530_PS1|BM_77979_PS1)(|L))|USA5FS
5588  $DEF USA5FBM=5-6*USA5FBMS
5589
5590  # USA Burlington Northern Railroad
5591  #  Freigt E4 shunting
5592  $DEF USA4FBNS=(4-5*BN_FM_610180(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|                                \
5593      (4-5*BN_(318976_XP|XL_321661|XM_214578|XM_249013|XM_249030)(|L))|                                   \
5594      (4-5*(BN_BOXM|BN_BOX50|BN_BOX50HI1|BN_BOX50HI2))|(4-5*BN_281441_XL(|L))|                            \
5595      (4-5*BN_LO_(435668|435509)(|L))|(4-5*BN_XM_(133499|129500|132550)(|L))|(4-5*BN_HT_513391(|L))|
5596  #  Freigt E4 long
5597  $DEF USA4FBN=(20*BN_2HOPC)|(20-25*BN_424913_PS2003(|L))|(5-6*USA4FBNS),                                 \
5598      (BN_10(040|107)(|L)|BN_CABCW2|BN_10191(|L))
5599  # Freight E6
5600  $DEF USA6FBN1=,24*((BN_BETHGON2|BN_AEROFLO)(|L))
5601  $DEF USA6FBN2=25*((BN_PS4427|BN_LO4750)(|L))
5602  $DEF USA6FBN3=26*((BN_XP_A302_219360|BN_XP_A302_249735|BN_XP_A302_249762|BN_FMC50|BN_GU50HC)(|L))
5603  $DEF USA6FBN4A=8*(BN_BOX50HI1|BN_BOX50HI2)
5604  $DEF USA6FBN4B=10*(BN_CB60|BNFE_RPL_9071(|L)|BNFE_RPL_9381(|L))
5605  $DEF USA6FBN4C=6-8*(BN_XP_(249300|249290|332116|217707)(|L))
5606  $DEF USA6FBN4D=8*((BN_CBF1|BN_THR73CB(|L))[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])
5607  $DEF USA6FBN4E=6-8*(BN_575122_THRALL4000(|L)[OB:SCRAP(4|5|6)(|[M])])
5608  $DEF USA6FBN4H=6-8*BN_LO_(453100|453239|455800|455880)(|L)
5609  $DEF USA6FBN4F=7-9*(BN_PS4740SO0(1|2)|BN_PS4750SO02)(|L)
5610  $DEF USA6FBN4G=8*BN_XPA_395090(|L)
5611  $DEF USA6FBN4=3*USA6FBN4(A|B|C|D|E|F|G|H)
5612  $DEF USA6FBN=USA6FBN(1:1|1:2|1:3|2:4)
5613
5614  # USA Burlington Northern Santa
5615  # Freight E5 short
5616  $DEF USA5FBNSS=(5-8*BNSF_513048(|L)[O:SCRAP(5|6)])|(5-8*BNSF_FLAT[O:CABLE14,,12])|                      \
5617      (5-8*BNSF_CB60[OB:WOOD(130|124|127),,14])|(5-8*BNSF_CBF1[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])|       \
5618      (5-8*BNSF_BOX60HI)|(5-6*BNSF_AR(2|3)[OB:CELLULOSE,,13])|(5-8*BNSF_AUTORACK(|1|2|3|4))|              \
5619      (5-8*(BNSF_ARTAUTO|BNSF_AUTOMAX(|2)))|(5-8*BNSF_PS4740SO0(1|2)(|L))|                                \
5620      (5-8*(BNSF_FMC50|BNSF_XP_725107|BNSF_XP_723146|BNSF_GU60HC)(|L))|                                   \
5621      (5-8*BNSF_(LO_405815|LO_405812|LO_424433|TRI5161SO03|TRI5161SO04|TRI5161SO02)(|L))|                 \
5622      (5-8*BNSF_(LO4750|PS4750SO02|PS4750SO03|PS4750SO04|PS4750SO05)(|L))|                                \
5623      (5-8*(BNSF_1BETHGON2|BNSF_3BETHGON2|BNSF_BETHGON2)(|L))|                                            \
5624      (5-8*(BNSF_AFLOOD2A|BNSF_AFLOOD2B|BNSF_RD4TRI|BNSF_RD6TRI)(|L))|                                    \
5625      (5-8*(BNSF_546054(|L)[O:WOOD1(29|24),,11]))|(5-8*(BNSF_ACF4650(|L)|BNSF_5161TRI|BNSF_TRI5161(|L)))
5626  # Freight E5 long
5627  $DEF USA5FBNS=4*USA5FBNSS
5628
5629  # USA Baltimore and Ohio Railroad
5630  # Passenger E2
5631  $DEF USA2PBO1=((BO_B21_19(38|53|47)(A|B)(|L)|BO_E7C_1929(A|AL|BL),USAP3PU))|                            \
5632      (BO_E7C_1929(A|BL|AL),3*BO_A19C_3664(|L),BO_F4BN_1056(|L),BO_106TYGART_4167(|L),                    \
5633      2*BO_A19C_3664(|L),BO_106TYGART_4167(|L))
5634  # Passenger E3
5635  $DEF USA3PBO1=(BO_B21_1947(A|B)(|L)|BO_E7C_1947(A|B)(|L),USAP3PU)
5636  $DEF USA3PBO2=(BO_B21_1953(A|B)(|L)|BO_E7C_1953(A|B)(|L),5*BO_106TYGART_4167(|L),6*BO_F4BN_1056(|L))
5637  $DEF USA3PBO3=(<BO_106TYGART_4167L,5*BO_GULL_SLEEPERL,BO_106SCHUYLKILL_4167L,BO_7500_NAPPANEEL)|        \
5638      (<BO_7500_NAPPANEE,BO_106SCHUYLKILL_4167,5*BO_GULL_SLEEPER,BO_106TYGART_4167)
5639
5640  # Freight E3 short
5641  $DEF USA3FBOS=(4-5*BO_M26(|A|B)_19(26|37|40|40B|45|46|55|62TS|62STN|62)(|L))|                           \
5642      (4-5*BO_M26(C|D)_19(28|37|40|40B|45|46|55|62TS|62STN|62)(|L))|                                      \
5643      (4-5*((BO_429407_N35A|BO_636285_N35A|BO_823499_N35A|BO_823500_N35A|BO_825098_N41|BO_825099_N41)     \
5644      (|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]))|(4-5*BO_M67A_468700(|L))|            \
5645      (4-5*BO_SK_11(2435|0580)(|L))|(4-5*BO_P11_106268[O:CABLE(1|6),12,11][O:CABLE(1|6),69,11])
5646  # Freight E3 long
5647  $DEF USA3FBO=5-6*USA3FBOS,BO_C26_C(3700|3714|3718|3774|3771)(|L)|BO_I1_19(13|16|16_RBT|41|45|55|62)(|L)
5648  # Freight E4 short
5649  $DEF USA4FBOS=(4-5*BO_(X97_485250|RBL_894124|X97_485200)(|L))|(4-5*(BO_187359_XM_USRASS)(|L))|          \
5650      USA4FMIXK|(4-5*(BO_HT_W2A_532000|BO_HT_W2A_A)(|L))|(4-5*(BO_PS40S|BO_PS40TS)(|L))|                  \
5651      (4-5*BO_M61_282346(|L))
5652  # Freight E4 long
5653  $DEF USA4FBO=(5-6*USA4FBOS)|(20-25*BO_H29_1(52193|0392)(|L)[O:COAL(32|22)(|[M]),,33])|                  \
5654      (20-25*BO_(N43_631113|N43_631173|N43_631513|631247)_PS2003(|L)),BO_C26(_C3827|A_C3828)(|L)
5655  # Freight E5 shunting
5656  $DEF USA5FBOS=USA6FMIXK|(4-6*(BO_492020_XPA|BO_492026_XPA|BO_492069_XPA|BO_492080_XPA)(|L))|            \
5657      (4-6*BO_LO_(606539|837043|836037)(|L))|(4-6*BO_PS4740SO01(|L))|(4-6*BO_PS4750SO01(|L))|             \
5658      (4-6*BO_RBL_897449(|L))
5659  # Freight E5 long
5660  $DEF USA5FBO=(25*(BO_HT_W2A_532000|BO_HT_W2A_A)(|L))|(25*(BO_PS40S|BO_PS40TS)(|L))|(5*USA5FBOS)
5661
5662  # USA Chicago, Burlington & Quincy Railroad
5663  # Freight E3 shunting
5664  $DEF USA3FCBQS=USA3FMIXK|(4-5*CBQ_19871_XL(|L))|(4-5*(CBQ_188850_GB_USRA|CBQ_PS40)(|L))|                \
5665      (4-5*CBQ_120537_XM_USRADS(|L))|(4-5*CBQ_XM33(B_24203|C_24601|C_24518)(|L))
5666  # Freight E3 long
5667  $DEF USA3FCBQ=5-6*USA3FCBQS,CBQ_13597(|L)
5668  # Freight E5 shunting
5669  $DEF USA5FCBQS=(4-5*CBQ_LO_183977(|L))|USA6FMIXK|                                                       \
5670      (4-7*(CBQ_PS40(|L)|CBQ_120960_XM_USRADS(|L)|CBQ_BOX))|(4-7*(CBQ_LO_2600_1965)(|L))|                 \
5671      (4-6*CBQ_PS4740SO01(|L))|(4-6*CBQ_LO_85400(|L))|(4-6*CBQ_LO_86274(|L))
5672  # Freight E5 long
5673  $DEF USA5FCBQ=5*USA5FCBQS
5674
5675  # USA Chicago & Eastern Illinois
5676  #  Freigt E3 shunting
5677  $DEF USA3FCEIS=(4-5*CEI_1937AAR_XM_(64100|64180|64190|64400|64480|64490)(|L))|(4-5*CEI_XM_66500(|L))|   \
5678      (4-5*CEI_5(557|309)_PS1(|L))|(4-5*CEI_5(309|557)_PS1(|L))|(4-5*CEI_XM_PS1_65581(|L))|(2*USA4FMIXK)
5679  #  Freigt E3 long
5680  $DEF USA3FCEI=(5-6*USA3FCEIS)|                                                                          \
5681      (20*(CEI_975(00|33)_HM(|L)                                                                          \
5682      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])),WEYT_3CAB
5683
5684  # USA Central of Georgia Railway
5685  #  Freigt E3 shunting
5686  $DEF USA3FCGS=(4-6*CG_1937AAR_(XM_4500|XM_6000|XAF_6600|XM_4510|XM_6010|XAF_6610)(|L))|                 \
5687      (4-6*(CG_57239_VA_1932|CG_58459_VA_1926)(|L))|(4-6*CG_(1000|1050|LO_1475)_PS2003(|L))|              \
5688      (4-6*(CG_4(254|422|095|117)_XM_ARA1932)(|L))|(2*USA3FMIXK)|(4-6*CG_XM_(7300|8699)(|L))|             \
5689      (4-6*(CG_GB_17675(|L)[O:SCRAP(4|5|6)(|[M])]))
5690  #  Freigt E3 long
5691  $DEF USA3FCG=5*USA3FCGS,WEYT_3CAB
5692  #  Freigt E5 short
5693  $DEF USA5FCGS=(5-7*CG_XPA_8818(|L))|(5-7*CG_5548_PS1(|L))|(5-7*CG_1570)|(2*USA5FS)
5694  #  Freigt E5 long
5695  $DEF USA5FCG=4*USA5FCGS
5696
5697  # USA Chicago Great Western
5698  #  Freigt E3 shunting
5699  $DEF USA3FCGWS=(4-5*CGW_XM_PS1_(5200|5202|5325|5450|5601|93251)(|L))|                                   \
5700      (4-5*CGW_8(5688|6198)_ARA1923(|L))|USA3FMIXK|                                                       \
5701      (4-5*(CGW_(40022ABM|40022KM|43022KD|43022ABD)_XM(|L)))|(4-5*CGW_89252_XM_ARA1932(|L))|              \
5702      (4-5*CGW_XM_PS1_(93251|5200|5202|5325|5450|5601)(|L))
5703  # Freight E3 long
5704  $DEF USA3FCGW=(5-6*USA3FCGWS)|(25*CGW_LO_705_PS2003(|L)),CGW_NE_604(|L)
5705  # Freight E4 short
5706  $DEF USA4FCGWS=(3-4*(CGW_TANK50|GATX_TT|HCPX_TANK50|SP_TANK50))|USA4FMIXK
5707  # Freight E4 long
5708  $DEF USA4FCGW=(5-6*USA4FCGWS),CGW_NE_604(|L)
5709
5710
5711  # USA Chicago & Illinois Midland Ry. Co.
5712  # Freight E4 short
5713  $DEF USA4FCIMS=(4-5*CIM_XM_8103(|L))|(4-5*CIM_XM_PS1_160(01|21)(|L))|USA4FMIXK
5714  # Freight E4 long
5715  $DEF USA4FCIM=5-6*USA4FCIMS,CIM_76(|L)
5716
5717  # USA Central Railroad Company of New Jersey
5718  # Freight E3 short
5719  $DEF USA3FCNJS=(2*USA3FMIXK)|(4-5*(CNJ_21660_ARA1923|CNJ_19029_XA_ARA1923)(|L))|                        \
5720      (4-5*CNJ_GBJ_(86000|80144|87611)(|L))|(4-5*CNJ_10293_HM(|L))|                                       \
5721      (4-5*CNJ_(PS40|20176_XM_USRASS|20473_XM_USRASS)(|L))|                                               \
5722      (4-5*CNJ_GBJ_(87611|86000|80144)(|L)                                                                \
5723      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])|                \
5724      (4-5*CNJ_LO_752_PS2003(|L)),(4-5*CNJ_NE_915(40|00|39|35|02)(|L))
5725  # Freight E3 long
5726  $DEF USA3FCNJ=(4*USA3FMIXK,5-7*(CNJ_(21660|19029_XA)_ARA1923(|L)))|                                     \
5727      (30*(CNJ_10293_HM(|L)                                                                               \
5728      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]))|               \
5729      (30*CNJ_LO_752_PS2003(|L)),CNJ_NE_915(40|00|39|35|02)(|L)
5730
5731  # USA Chicago & North Western
5732  # Passenger E3
5733  $DEF USA3PCNW=CNW_1711(|L),3*CNW_BLC,3*CNW_BLT,3*CNW_BLCL
5734  # Freight E4 short
5735  $DEF USA4FCNWS=(4-5*(CNW_LO_2600_1965(|L)))|USA4FMIXK|                                                  \
5736      (4-5*(CNW_PS40|CNW_XP_A402_155653|CNW_3387_XM)(|L))|                                                \
5737      (4-5*CNW_LO_(175025|175017|175062|175265)(|L))|                                                     \
5738      (4-6*(CNW_144804_XM_USRASS|CNW_144894_XM_USRASS|CNW_141258_XM_USRADS|CNW_141422_XM_USRADS)(|L))|    \
5739      (4-5*CNW_(LO_95330_PS2003|4253_PS1|XP_155000|XP_155162|XP_155249)(|L))|                             \
5740      (4-5*CNW_XM_(25100|25050)(|L))|                                                                     \
5741      (4-5*CNW_XM_PS1_(658|656|1444|1456|1480|1650|7317|8689|8691|8907|24200)(|L))
5742  # Freight E4 long
5743  $DEF USA4FCNW=5-6*USA4FCNWS,CNW_(NE_10521|NE_10521L|CAB1)
5744  # Freight E6 short
5745  $DEF USA6FCNWS=(4-6*CNW_G52[O:SCRAP9(|[M]),,29])|(4-6*(CNW_AFLOOD3(|L))|USA6FMIXK|(4-6*CNW_LO4750))|    \
5746      (4-6*CNW_XPA_92(068|052|178)(|L))|(4-6*CNW_(PS4740SO0(2|1)|RBL_33277)(|L))|                         \
5747      (4-6*CNW_PS4750(|SO02|SO03|SO04)(|L))|(4-6*CNW_LO_(175595|180015|180021|180130)(|L))|               \
5748      (4-6*(CNW_XP_A302_717253|CNW_XP_A302_155773|CNW_XP_A302_155844|CNW_XP_718051|CNW_XP_718447)(|L))
5749  # Freight E6 long
5750  $DEF USA6FCNW=6*USA6FCNWS
5751
5752  # USA Chesapeake & Ohio Railway
5753  #  Freigt E2 shunting
5754  $DEF USA2FCOS=(4-6*CO_29855_GB_USRA(|L)[OB:SCRAP(4|5|6)(|[M]),,22])|(4-6*CO_(668|1200)_XM_USRASS(|L))|  \
5755      USA2FMIXK|(4-6*CO_62340_HM_USRA(|L)[O:FR_ERZ(21|20|22)(|[M])])|(4-6*CO_3(168|325)(|L))|             \
5756      (4-6*CO_1937AAR_XM_(3300|4000|5250|5400)(|L))
5757  # Freight E2 long
5758  $DEF USA2FCO=5*USA2FCOS,CO_CAB1|CO_CAB6
5759
5760  #  Passenger E3
5761  $DEF USA3PCO=(7*DRGW_106JOHNEVANS1270_4167)|(7*DRGW_106JOHNEVANS1270_4167L)
5762  #  Freigt E3 shunting
5763  $DEF USA3FCOS=(4-6*CO_8000_ARA1923(|L))|(4-5*CO_H23_(108923|106080)[O:COAL2(7|8)(|[M]),,33](|L))|       \
5764      (4-5*CO_(126655|126657|126651|126650|120620|120600)_HM(|L)                                          \
5765      [O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|(4-5*CO_7(299|438)_XM_ARA1932(|L))|       \
5766      (4-5*CO_XM_PS1_15(000|050)(|L))|(4-5*CO_1937AAR_XM_(3350|4020|5251|5410)(|L))
5767  # Freight E3 long
5768  $DEF USA3FCO=5-6*USA3FCOS,CO_(3187|3187L|CAB4|CAB9|CAB1|CAB3|CAB7)
5769  # Freight E4 short
5770  $DEF USA4FCOS=(4-6*(CO_29855_GB_USRA(|L)[OB:SCRAP(4|5|6)(|[M]),,22]))|(4-6*CO_BOX(1|2))|                \
5771      (4-6*(CO_HOPP[OB:SCRAP_(13|14|13)(|[M]),,33]))|(4-6*CO_XL_A332_486083(|L))|USA4FMIXK,               \
5772      (4-6*CO_22211_PS1(|L))|(4-6*CO_XM_(23757|18035)(|L))|(4-6*CO_RBL_(893846|890128)(|L))
5773  # Freight E4 long
5774  $DEF USA4FCO=(5-6*USA4FCOS)|                                                                            \
5775      (CO_HC5_2211_PS2003,CO_HC5_2203_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2211_PS2003L,                    \
5776      CO_HC5_2203_PS2003,CO_HC5_2211_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2211_PS2003,CO_HC5_2211_PS2003,   \
5777      CO_HC5_2211_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2203_PS2003,CO_HC5_2211_PS2003L,CO_HC5_2203_PS2003,  \
5778      CO_HC5_2211_PS2003L,CO_HC5_2211_PS2003L,CO_HC5_2211_PS2003,CO_HC5_2211_PS2003L,                     \
5779      CO_HC5_2203_PS2003L,CO_HC5_2203_PS2003L,CO_HC5_2211_PS2003,CO_HC5_2211_PS2003,CO_HC5_2203_PS2003L), \
5780      CO_(3187L|3168L|3186L|3325L|3187|3168|3186|3325|CAB8|CAB2|CAB5)
5781  # Freight E6 short
5782  $DEF USA6FCOS=(4-8*CO_37000_GB(|L)[OB:SCRAP(4|5|6)(|[M]),,22])|(1-2*USA6FMIXK)|                         \
5783      (4-8*(CO_21157_PS1|CO_B35MOD_PS1|CO_B35ORIG_PS1)(|L))|(4-8*CO_28000_PS1(|L))|(4-8*CO_XPA_493935(|L))
5784  # Freight E6 long
5785  $DEF USA6FCO=5*USA6FCOS
5786
5787  # USA Consolidated Rail Corporation (Conrail)
5788  # Freigt E4
5789  $DEF USA4FCRS=(4-6*CR_BR55A_363645(|L))|(4-6*CR_X58C_(265915|230778|164380|209893)(|L))|                \
5790      (4-6*CR_F41(B|A)(|L)[O:GIRDER3,,11])|(4-6*CR_BR50L_231628(|L))|(4-5*CR_LO_8(76322|89828)(|L))|      \
5791      (4-5*CR_G51B_521040(|L)[O:SCRAP(5|6)(|[M])])|                                                       \
5792      (4-5*CR_X7(1_166160|1_166290|1_166967|1_208121|4_157591|4_167396)(|L))
5793  # Freigt E4 long
5794  $DEF USA4FCR=(6*USA4FCRS)|(20-25*CR_879818_PS2003(|L)),                                                 \
5795      CR_2213(0|1)(|L)|CR_NE210(11|26|28)(|L)|CR_NE_18747(|L)|CR_N8B_23620(|L)
5796  #  Freigt E6 short
5797  $DEF USA6FCRS=(4-5*CO_(LO_607039|HC15_2761)(|L))|(4-5*CR_PS4750SO01(|L))|                               \
5798      (4-5*(CR_293(792|779)_XPA)(|L))|(4-5*CR_B63B_2234(01|35)(|L))|                                      \
5799      (4-5*CR_LO_8(76340|84744|84143|84322)(|L))|(4-5*CR_G32C(|L)[O:WOOD(139|61|62)(|[M])])|USA6FMIXK|    \
5800      (4-5*CR_PS4740SO0(1|2)(|L))|(4-5*CR_X60G_(237651|237912|237618|239836)(|L))
5801  #  Freigt E6 long
5802  $DEF USA6FCR=6*USA6FCRS
5803
5804  # USA Clinchfield R.R. Co.
5805  # Freight E4 short
5806  $DEF USA4FCRRS=(4-6*CRR_FH8_52541(|L))|(4-6*CRR_X5F_7300(|L))|(4-6*CRR_5676_PS1(|L))|(2*USA4FMIXK)|     \
5807      (4-5*CRR_5249_XM_ARA1932(|L))
5808  #  Freight E4 long
5809  $DEF USA4FCRR=5-6*USA4FCRRS|(20-25*CRR_FL5_60112_PS2003(|L))|                                           \
5810      (20*CRR_4(9999|7403)_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]),CRR_1065(|L)
5811
5812  # USA CSX Corporation
5813  #  Freight E4 short
5814  $DEF USA4FCSXS=(4-6*(CSX_XL_A432_134142|CSX_XL_A332_142742|CSX_XL_A432_143138|CSX_XP_A302_164114|       \
5815      CSX_XP_A302_507098)(|L))|USA4FMIXK|(4-6*CSX_477213(|L)[O:SCRAP(5|6)(|[M])])|                        \
5816      (4-6*CSX_HT_807179(|L)[O:COAL(32|22)(|[M])])|(4-6*CSX_XM_136136(|L))|(4-6*CSX_LO_226691(|L))
5817  #  Freight E4 long
5818  $DEF USA4FCSX=6*USA4FCSXS,CSX_903180
5819  # Freight E6 short
5820  $DEF USA6FCSXS=(4-6*(CSX_XL_A332_142742(|L)|CSX_XL_A332_(486083|142742)(|L)|CSX_XP_A302_164114(|L)|     \
5821      CSX_XL_A432_134142(|L)|CSX_XP_142819|CSX_XP_141436(|L)))|USA6FMIXK|(4-6*CSX_PS4750SO01(|L))|        \
5822      (4-6*(CSX_BETHGON2(|B)(|L)|CSX_AFLOOD2(|L)|CSX_AFLOOD2(|L)))|(4-6*CSX_5161TRI(|L))|                 \
5823      (4-6*(GACX_TRI5161|BRIX_TRI5161)(|L))|(4-6*CSX_243125TRI3281(|L))|(4-6*CSX_PS4740SO01(|L))|         \
5824      (4-6*CSX_LO_225370(|L))|(4-6*CSX_XPA_180407(|L))|(4-6*CSX_XL_161010(|L))|                           \
5825      (4-6*CSX_XM_(129903|136000)(|L))|(4-6*CSX_(LO_203160|LO_203161|LO_247725|TRI5161SO02)(|L))
5826  # Freight E6 long
5827  $DEF USA6FCSX=(18*(ARTAUTOMAX|CSX_ARTAUTO))|(6*USA6FCSXS)
5828
5829  # USA Delaware and Hudson Railroad
5830  #  Freight E3 shunting
5831  $DEF USA3FDHS=USA3FMIXK|(5-6*DH_(17028|17194|51394)_XM_USRASS(|L))|                                     \
5832      (5-6*DH_17(626|724|628|725)_XM_ARA1932(|L))|(5-6*DH_PS40(|L))
5833  #  Freight E3 long
5834  $DEF USA3FDH=5-6*USA3FDHS,DH_357(11|12|95)(|L)|DH_NE_3501(|L)
5835  #  Freight E4 shunting
5836  $DEF USA4FDHS=(5-6*DH_(22053_PS1|PS50C_29113)(|L))|(4-5*DH_XP_27347(|L))
5837  #  Freight E4 long
5838  $DEF USA4FDH=5-6*USA4FDHS|(20-25*DH_LO_12(034|109)_PS2003(|L)),DH_357(14|96)(|L)|DH_NE_3501(|L)
5839  #  Freight E5 short
5840  $DEF USA5FDHS=(4-6*DH_PS4750SO01(|L))|(4-6*DH_XP_27347(|L))|                                            \
5841      (4-6*(RBOX_50A|RBOX_XP_A302_40461(|L)|RBOX_XP_A302_(40464|17031)(|L)))
5842  #  Freight E5 long
5843  $DEF USA5FDH=6*USA5FDHS
5844
5845  # USA Delaware, Lackawanna & Western
5846  #  Freight E3 shunting
5847  $DEF USA3FDLWS=(4-5*DLW_XM_PS1_35000(|L))|(4-5*DLW_47787_XM_USRA(|L))|(2*USA3FMIXK)|                    \
5848      (4-5*(DLW_44072_XM_USRADS|DLW_11505_XAR)(|L))|(4-5*DLW_XM_PS1_35000(|L))|                           \
5849      (4-5*DLW_GB_68611(|L)[O:SCRAP(5|6)(|[M])])|(4-5*DLW_1937AAR_XM_(49000|49202|49086|51780|51788)(|L))
5850  #  Freight E3 long
5851  $DEF USA3FDLW=5-6*USA3FDLWS,WEYT_3CAB
5852
5853  # USA Depew, Lancaster & Western R.R. Co., Inc.
5854
5855  # USA  Detroit & Mackinak Railroad
5856  #  Freight E3 shunting
5857  $DEF USA3FDMS=USA3FMIXK|(4-6*DM_1937AAR_XM_(3057|2913|2825)(|L))|(4-6*(DM_XP_2232|DM_XM_3418)(|L))
5858  #  Freight E3 long
5859  $DEF USA3FDM=6*USA3FDMS,WEYT_3CAB
5860
5861  #  Freight E4 shunting
5862  $DEF USA4FDMS=USA4FMIXK|(4-6*DM_1937AAR_XM_(2825|2913|3057)(|L))|(4-6*DM_X(P_2232|M_3418)(|L))
5863  #  Freight E4 long
5864  $DEF USA4FDM=6*USA4FDMS,WEYT_3CAB
5865
5866  # USA Duluth, Missabe & Iron Range Railway
5867  #  Freight E3 long
5868  $DEF USA4FDMI=(20*DMIR_Q8_4971_PS2003(|L)),DMIR_C222(|L)
5869  #  Freight E4 shunting
5870  $DEF USA4FDMIS=USA4FMIXK|DMIR_MINIQUAD
5871
5872  # USA Denver & Rio Grande Western Railroad
5873  #  Freigt E2-3 short
5874  $DEF USA3FDRS=(4-5*(DRGW_50056_GB(|L)[O:(COAL7|FR32|COAL1)]))|USA2FMIXK|(4-5*DRGW_PS40(|L))|            \
5875      (4-5*DRGW_LO_18325_PS2003(|L))|(4-5*DRGW_4HOP)|(4-5*DRGW_(67422_XL|XM_65300)(|L))
5876  #  Freigt E2-3 long
5877  $DEF USA3FDR=5-6*USA3FDRS,(DRGW_CAB2|DRGW_01500(|L)|DRGW_01504(|L))
5878  # Passenger E2
5879  $DEF USA2PDR=(DRGW_OVBAG|DRGW_T_COMB,DRGW_OVBUSINESS,DRGW_OVCOACH,DRGW_T_COACH,DRGW_OVSLEEPER,          \
5880      DRGW_OVSLEEPER1)
5881  # Freigt E6 short
5882  $DEF USA6FDRGS=(4-6*DRGW_AUTORACK)|(4-6*(DRGW_5013_THRALL4000(|L)|DRGW_13386_THRALL4000(|L)))|          \
5883      USA6FMIXK|(4-6*((DRGW_4700PS2(|L)|DRGW_HOP)))|(4-6*DRGW_63500_PS1(|L))|(4-6*DRGW_63930_XPA(|L))|    \
5884      (4-6*DRGW_PS4750SO01(|L))|(4-6*DRGW_XPA_63959(|L))|(4-6*DRGW_XP_63889(|L))|                         \
5885      (4-6*(DRGW_LO_10070|WSOR_TRI3281SO01|WW_TRI3281SO01)(|L))
5886  # Freigt E6 long
5887  $DEF USA6FDRG=6*USA6FDRGS
5888
5889  # USA Durango & Silverton railroad
5890  #  Freigt E3 short
5891  $DEF USA3FDSRS=(4*DS_FLAT(|B)(|L))|(4*DS_BOX(|1|2)(|L))|(4*DS_GONH1(|L)|DS_FLAT_TRACTOR|DS_TANK(2|1))|  \
5892      (4*(DS_REF(3|4)0(|L)|DS_STOCK(|L)|DS_FLAT_BOX|DS_FLAT_LUMB))|(5*DS_BOX(9|8|7|7L))|                  \
5893      (4*(DS_PIPEGON(|1)|DS_K37(|L)|DS_GON(4|5|H|HL)|DS_FLAT2))
5894  # Freigt E3 long
5895  $DEF USA3FDSRL=6*USA3FDSRS,DS_CAB17(|A)|DSOU_NE_X86(|L)|DSOU_NE_X85(|L)|DS_CAB30(|L)
5896
5897  # USA Duluth, South Shore & Atlantic Railway
5898  #  Freight E3 shunting
5899  $DEF USA3FDSSS=USA3FMIXK|(4-5*DSSA_GB_4099(|L)[O:SCRAP(4|5|6)(|[M])])|(4-5*DSSA_16032_XM_USRADS(|L))|   \
5900      (4-5*DSSA_15564_PS1(|L))|(4-5*DSSA_XM_PS1_(15041|15192)(|L))
5901  #  Freight E3 long
5902  $DEF USA3FDSS=5-6*USA3FDSSS,WEYT_3CAB
5903
5904  # USA Detroit, Toledo & Ironton R.R. Co.
5905  #  Freight E3 shunting
5906  $DEF USA3FDTIS=USA3FMIXK|(4-5*DTI_X37B_67247(|L))|(4-5*DTI_X(M_720|AP_13000|AP_13020)(|L))
5907  #  Freight E3 long
5908  $DEF USA3FDTI=5-6*USA3FDTIS,WEYT_3CAB
5909  # Freigt E6 short
5910  $DEF USA6FDTIS=USA6FMIXK|(4-5*DTI_XPA_2610(3|1)(|L))|(4-5*DTI_PS50C_81000(|L))|                         \
5911      (4-5*DTI_GB_9131(|L)[O:SCRAP(5|6)(|[M])])|(4-5*DTI_LO_10325(|L))
5912  # Freigt E6  long
5913  $DEF USA6FDTI=(5-6*USA6FDTIS)|(15*DTI_AUTORACK)
5914
5915  # USA Detroit & Toledo Short Line Railroad
5916  #  Freight E3
5917  $DEF USA3FDTSL=7*USA3FMIXK,DTS_NE_129(|L)|DTS_133(|L)
5918
5919  # USA Elgin, Joliet and Eastern
5920  #  Freigt E3 short
5921  $DEF USA3FEJES=(4-6*EJE_(7627_XM|7504_XM_USRADS)(|L))|(4-6*EJE_PS150_6203(5|6)(|L))
5922  # Freigt E3 long
5923  $DEF USA3FEJE=6*(USA3FEJES|USA3FMIXK)
5924  # Freigt E6
5925  $DEF USA6FEJE=7*USA6FMIXK
5926
5927  # USA Erie Lackawanna Railroad
5928  #  Freigt E4 short
5929  $DEF USA4FELS=(4-5*EL_GB_12549(|L)[O:SCRAP(5|6)(|[M])])|(4-5*EL_HOP(|L)~NEK)|                           \
5930      (4-5*(PLE_XM_39517|EL_63570_PS1)(|L))|USA4FMIXK|(4-5*EL_67961_PS1(|L))|(4-5*EL_LO_21367(|L))|       \
5931      (4-5*EL_XM_(63014|66484|66485|67531)(|L))
5932  #  Freigt E4 long
5933  $DEF USA4FEL=5-6*USA4FELS,EL_CABB
5934  #  Freigt E5 short
5935  $DEF USA6FELS=(4-6*(EL_RBL_360582|ERIE_93870_XM_USRASS|ERIE_92506_XM_USRASS)(|L))|(4-6*EL_ACF_SILO)|    \
5936      USA6FMIXK|(4-6*EL_REF50)|(4-6*EL_PS4740SO01(|L))|(4-6*EL_LO_20006(|L))
5937  #  Freigt E5 long
5938  $DEF USA6FEL=6*USA6FELS
5939
5940  # USA Erie Railroad
5941  #  Freigt E3 shunting
5942  $DEF USA3FERIES=(4-5*ERIE_7(5656|5700|6012)_ARA1923(|L))|(2*USA3FMIXK)|(5-10*ERIE_67586_PS1(|L))|       \
5943      (4-6*ERIE_1937AAR_XM_(78041|78047|78500|78541|78547|78000)(|L))|                                    \
5944      (4-5*ERIE_XM_19(32|42|45|47)_ARA1932(|L))|(4-5*ERIE_XM_(63200|65500)(|L))|                          \
5945      (4-5*ERIE_FM_8000(|L)[O:BETONPIPE2,10,11][O:BETONPIPE2,98,11])|                                     \
5946      (5*ERIE_(24000|24050|26699|27040|28000|28051)_HM(|L)                                                \
5947      [O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|                                          \
5948      (4-5*ERIE_FOWLER_(80830|91465|80830_1923|91465_1923)(|L))
5949  #  Freigt E3 long
5950  $DEF USA3FERIE=4:(5-6*USA3FERIES)|1:(30*2:(ERIE_2HOP(6|7)[O:COAL(42|39|62)(|[M])]|1:ERIE_3HOP5)),       \
5951      WEYT_3CAB
5952
5953  # USA Florida East Coast
5954  #   Freigt E3 shunting
5955  $DEF USA3FFECS=(4-6*FEC_1937AAR_BX_6(39|10)(|L))|(4-6*FEC_1937AAR_XM_2100(1|9)(|L))|                    \
5956      (4-6*FEC_17002_VA(|L)(|[O:FEC_17002_VADOOR,37,9]))
5957  #   Freigt E3 long
5958  $DEF USA3FFEC=(5*USA3FFECS),WEYT_3CAB
5959  #   Freigt E4 shunting
5960  $DEF USA4FFECS=(4-6*FEC_17002_VA(|L))|(2*USA3FMIXK)|(4-6*FEC_20611_XMUSRACLONE(|L))|                    \
5961      (4-6*(FEC_FLT89A[OB:#STRAIL_(R1|B1),10,9][OB:STRAIL_(R1|B1),148,9]))|                               \
5962      (4-6*FEC_GB_12000(|L)[O:SAND(10|9|11|12)(|[M])])|                                                   \
5963      (4-6*FEC_XM_23076(|L)[T:(1|2|3|4|5|6|7|8|9|0)(1|2|3|4|5|6|7|8|9|0),49,19,FEC_XM_23000_ABC5])
5964  #   Freigt E4 long
5965  $DEF USA4FFEC=4:(5*USA4FFECS)|1:(20-25*FEC_(14146|LO_14085)_PS2003(|L))|1:(25*ERIE_4HOP(1|3)),WEYT_3CAB
5966  #   Freigt E6
5967  $DEF USA6FFEC=10-15*(FEC_FLT89A[OB:#STRAIL_(R1|B1),10,9][OB:STRAIL_(R1|B1),148,9]|                      \
5968      FEC_FLT89(B|AL)[OB:STRAIL_(R1|B1),10,9][OB:#STRAIL_(R1|B1),148,9]|                                  \
5969      FEC_TW89(|L)[OB:#STRAIL_14,16,10][OB:STRAIL_14,143,10]),                                            \
5970      10-15*((FEC|AWXX)_TW85(|L)[O:C40B,17,12][O:C40B,137,12])|(OTTX_E(1|2)[O:C30A,6,10][O:C30A,97,10])
5971
5972  #   Erie Mining Company
5973  $DEF USA3FEMC=20*ERIE_(24000|24050|26699|27040|28000|28051)_HM(|L)                                      \
5974      [O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])],WEYT_3CAB
5975
5976  # USA Georgia Railroad Co.
5977  #   Freigt E4 shunting
5978  $DEF USA4FGAS=(4-6*GA_O35B_55217(|L))|(4-6*GA_X5F_55400(|L))|(4-6*GA_O35B_55217(|L))|                   \
5979      (4-6*GA_19(715|522)_XM_USRASS(|L))|USA3FMIXK
5980  #   Freigt E4 long
5981  $DEF USA4FFGA=(20*GA_21245_HM(|L)[O:COAL(32|22)(|[M])])|(5*USA4FGAS),WEYT_3CAB
5982
5983  # USA Green BAY_BIX734 & Western Railroad
5984  #   Freight E3 short
5985  $DEF USA3FGBWS=(4-6*GBW_X(L_7268|M_PS1_904|M_PS1_909)(|L))|USA3FMIXK
5986  #   Freight E3 long
5987  $DEF USA3FGBW=5-6*USA3FGBWS
5988  #   Freigt E6
5989  $DEF USA6FGBW=7-10*((GBW_XP_A302_7536|GBW_XP_A302_7552)(|L)),4-6*GBW_FMC50(|L),7-10*GBW_XP_1731(|L)
5990
5991  # USA Gulf, Mobil & Ohio Railroad
5992  #   Freight E3 shunting
5993  $DEF USA3FGMOS=(4-6*GMO_1937AAR_XM_(5070|5076|8000)(|L))|(4-5*GMO_XM_7520(|L))|(4-5*GMO_9756_PS1(|L))|  \
5994      USA3FMIXK|(4-5*GMO_PS50C_59370(|L))
5995  #   Freight E3 long
5996  $DEF USA3FGMO=5-6*USA3FGMOS|(20*GMO_32375_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])]), \
5997      GMO_2954(|L)
5998
5999  # USA Great Northern Railroad
6000  #   Passenger E3
6001  $DEF USA3PGN1=(<GN_1290DL,GN_1370D,GN_1260D,GN_1370D,GN_1320D,GN_1250D,GN_1240D,GN_1390D,,GN_1170D,     \
6002      3*(GN_1120D|GN_1215D),GN_1209D,GN_1100DL,GN_40D)|                                                   \
6003      (<GN_40DL,GN_1100D,GN_1209DL,3*(GN_1120DL|GN_1215DL),GN_1170DL,GN_1390DL,GN_1240DL,GN_1250DL,       \
6004      GN_1320DL,GN_1370DL,GN_1260DL,GN_1370DL,GN_1290D)|                                                  \
6005      (<GN_1200D(|L),GN_1252,GN_1254,GN_1162,4*GN_1120D(|L),GN_1250D(|L),2*GN_1160D(|L),2*GN_1198D(|L))
6006  #   Freigt E4 shunting
6007  $DEF USA4FGNS=(4-6*(GN_PS40A|GN_23715_XM_USRADS|GN_24853_XM_USRADS|GT_108103_XM_USRADS)(|L))|           \
6008      USA4FMIXK|(4-6*(GN_71470_PS2003|GNRR_XM_11026)(|L))|(4-6*GN_LO_71782(|L))|                          \
6009      (4-6*GN_PS50C_39816(|L))|(4-6*FEC_GB_12000[O:SAND(10|9|11|12)(|[M])])|(4-6*GN_HT_70025(|L))|        \
6010      (4-6*GN_XM_(10900|10901|10902|10903|10904|10905|11301|11302|11303|11304|11305|11306|20593|20594|    \
6011      20595|20596|20597|20598|21850|21850|21851|21852|21853|21854|21855)(|L))|(4-6*GN_LO_173857(|L))
6012  #   Freigt E4 long
6013  $DEF USA4FGN=5-6*USA4FGNS,GN_10088(|L)
6014  #   Freigt E6 shunting
6015  $DEF USA6FGNS=(5-7*GN_PS4740SO0(1|2)(|L))|(5-7*GN_ACF4650(|L))|USA6FMIXK|(5-7*GN_HS4550(|L))|           \
6016      (5-7*GN_PS40B(|L))|(5-7*GN_FM_160003(|L)[O:SILO1,8,11][O:SILO1,97,11])
6017  #   Freigt E6 long
6018  $DEF USA6FGN=6*USA6FGNS
6019
6020  # USA Grand Trunk Western Railroad
6021  #   Freigt E3 shunting
6022  $DEF USA3FGTWS=(4-5*GTW_460(523_XM_USRADS|305_XM)(|L))|(5-6*GTW_GB_(145400|145617)(|L))|(2*USA3FMIXK)
6023  #   Freigt E3 long
6024  $DEF USA3FGTW=6*USA3FGTWS,WEYT_3CAB
6025  #   Freigt E5 shunting
6026  $DEF USA5FGTWS=(5-6*GTW_PS50C_309(000|231)(|L))|(5-6*GTW_LO4750(|L))|(5-6*GTW_FMC50(|L))|               \
6027      (5-6*GTW_XM_598346(|L))|(5-6*GTW_LO_(315066|138112|138068)(|L))|(5-6*GTW_378224_XPA(|L))|           \
6028      (5-6*(LW_62104(|L)[O:WOOD1(29|24),,11]))|(5-6*GTW_LO_315066(|L))|(5-6*GTW_XPA_126145(|L))|          \
6029      (5-6*GTW_LO_315302(|L))|USA5FS
6030  #   Freigt E5 long
6031  $DEF USA5FGTW=6*USA5FGTWS
6032
6033  # USA Illionis Central Railroad
6034  #   Freigt E4 shunting
6035  $DEF USA4FICS=(4-5*IC_PS150_12077(|L))|(4-5*IC_XM_(PS1_222500|43000|43122|43162|43357|41846)(|L))|      \
6036      (4-5*IC_55050_PS2003(|L))|(4-5*IC_(15474_XL|RBL_150063)(|L))|                                       \
6037      (4-6*((ICG_FM_910330|IC_FM_910317|IC_FM_62630)(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))
6038  #   Freigt E4 long
6039  $DEF USA4FIC=(20-25*IC_(70779|74500|80973|219560)_HM(|L)[O:COAL(32|22)(|[M])])|(5-6*USA4FICS),          \
6040      ICG_199041(|L)|IC_NE_(9403|9408|9444)(|L)
6041  #   Freigt E6 shunting
6042  $DEF USA6FICS=USA6FMIXK|(4-6*IC_TRI5161(|L))|(4-6*ICG_(LO4750|PS4750SO02)(|L))|                         \
6043      (4-6*(IC_GU50HC|ICG_XP_531638|IC_GU50HC|ICG_XP_531638)(|L))|(4-6*IC_PS4740SO0(1|2|3)(|L))
6044  #   Freigt E6 long
6045  $DEF USA6FIC=6*USA6FICS
6046
6047  # USA Illionis Central Gulf F3;
6048  #   Freigt E4 shunting
6049  $DEF USA4FICGS=(4-6*ICG_PS50C_59(2129|1522)(|L))|(4-6*(ICG_BOXM|ICG_480068_XL(|L)))|                    \
6050      (4-6*ICG_199041(|L))|USA4FMIXK
6051  #   Freigt E4 long
6052  $DEF USA4FICG=5-6*USA4FICGS,(ICG_199041|ICG_NE_199419)(|L)
6053
6054  # USA Indiana Harbor Belt
6055  #   Freigt E3 long
6056  $DEF USA3FIHBS=(4-6*IHB_GB_(6056|6000)(|L))|(4-6*IHB_1937AAR_XM_100(60|00)(|L))|USA3FMIXK
6057  #   Freigt E3 long
6058  $DEF USA3FIHB=5-6*USA3FIHBS,IHB_31(|L)
6059  # USA Illinois Terminal
6060  #   Freigt E4 shunting
6061  $DEF USA4FITS=(4-6*IT_1937AAR_XM_6000(|L))|USA4FMIXK
6062  #   Freigt E4 long
6063  $DEF USA4FIT=5-6*USA4FITS,IHB_31(|L)
6064
6065  # USA Kansas City Southern Railway Company
6066  #   Freigt E3 shunting
6067  $DEF USA3FKCS=(2*USA3FMIXK)|(4-5*KCS_(1937AAR_XM_17450|15599_XM|XM_PS1_18746)(|L))|                     \
6068      (4-5*KCS_(25771_PS1|XL_152072)(|L))
6069  #   Freigt E3 long
6070  $DEF USA3FKC=5-6*USA3FKCS,WEYT_3CAB
6071  #   Freigt E6 short
6072  $DEF USA6FKCS=(4-6*KCS_AUTOMAX)|USA6FMIXK|(4-6*KCS_PS4750SO0(1|2)(|L))|                                 \
6073      (4-6*(KCS_XP_A302_750921|KCS_XP_A302_750603|KCS_XP_A302_750921|KCS_XP_61136|KCS_XP_749161))|        \
6074      (4-6*KCS_(LO_301957|TRI5161SO01)(|L))|(4-6*KCS_XP_(749161|61136)(|L))|(4-6*KCS_PS4740SO01(|L))
6075  #   Freigt E6 long
6076  $DEF USA6FKC=6*USA6FKCS
6077
6078  # USA Lehigh & Hudson River Railway  (noch keine Lok)
6079  #   Freigt E4
6080  $DEF USA4FLHR=USA4FTANK|USA4FMIX,LHR_NE_1(7|6)(|L)
6081
6082  # USA Long Island Railroad
6083  #   Freigt E2
6084  $DEF USA2FLIR=20*LIRR_(3275_XL1912|3308_XL1909)(|L),LIRR_CAB2|LIRR_N52_(30|32|34|35|36)(|L)
6085  #   Freigt E3
6086  $DEF USA3FLIR=25*LIRR_5088_HM_USRA(|L),LIRR_CAB2|LIRR_N52_(30|32|34|35|36)(|L)
6087  #   Freigt E4 short
6088  $DEF USA4FLIRS=(4-5*(LIRR_5088_HM_USRA|LN_86035_HM_USRA)(|L))|USA4FMIXK
6089  #   Freigt E4 long
6090  $DEF USA4FLIR=USA4FLIRS,LIRR_CAB2|LIRR_N52_(30|32|34|35|36)(|L)
6091
6092  # USA Louisville and Nashville Railroad
6093  #   Freigt E4 shunting
6094  $DEF USA4FLNS=(4-5*LN_HT_(180758|73750)(|L))|(4-5*LN_97(1|2)99_PS1(|L))|(4-5*LN_PS50C_100392(|L))|      \
6095      (4-5*LN_1(2580|4380)(K|AB)_XM(|L))|USA4FMIXK|(4-6*LN_XM_(7070|7023)(|L))|(4-6*LN_98325_PS1(|L))|    \
6096      (4-5*LN_(XM_114525|XM_PS1_17300|XM_PS1_17247|XM_114525)(|L))|(4-5*LN_SK_88074(|L))
6097  #   Freigt E4 long
6098  $DEF USA4FLN=(5-6*USA4FLNS)|                                                                            \
6099      (25*((LN_60850_HM|LN_60850_HM_HS|LN_60898_HM|LN_60898_HM_HS|LN_60899_HM|LN_60899_HM_HS|             \
6100      LN_64041_HM|LN_86035_HM_USRA|LN_86050_HM_USRA|LN_87475_HM_USRA|LN_89750_HM_USRA)(|L)                \
6101      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33])),LN_649(3|4)(|L)
6102  #   Freigt E5 short
6103  $DEF USA5FLNS=USA5FS|(4-6*LN_XPA_104600(|L))|(4-6*(LN_97199_PS1|LN_97299_PS1)(|L))|                     \
6104      (4-6*LN_PS4750SO01(|L))|(4-6*LN_LO_241555(|L))
6105  #   Freigt E5 long
6106  $DEF USA5FLN=USA5FLNS
6107
6108  # USA Lehigh and New England Railway
6109  #   Freigt E3
6110  $DEF USA3FLNE=(20*LNE_1(3213|4299|4335)_HM(|L))|                                                        \
6111      (10*LNE_18167_PS2003(|L),                                                                           \
6112      10*(LNE_8(263|208|009)_ARA1923(|L)                                                                  \
6113      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M])])),LNE_NE_58(1|0)(|L)
6114
6115
6116  # USA Lake Superior & Ishpeming
6117  #   Freigt E4 short
6118  $DEF USA4FLSIS=USA4FMIXK|(4-5*LSI_XM_PS1_2266(|L))
6119  #   Freigt E4 long
6120  $DEF USA4FLSI=(5-6*USA4FLSIS)|                                                                          \
6121      (20*LSI_5161_HM(|L)                                                                                 \
6122      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]),WEYT_3CAB
6123
6124  # USA Lehigh Valley Railroad
6125  #   Freigt E4 short
6126  $DEF USA4FLVS=(6-9*LV_X(58_7113|58B_8243|65_8300)(|L))|(6-9*LV_BOXM)|(6-9*LV_GON)|(6-9*LV_HOP_CEMENT)|  \
6127      (6-9*LV_GB_32600(|L))|(6-9*LV_XM_8633(|L))|(6-9*LV_LO_50701_PS2003(|L))
6128  #   Freigt E4 long
6129  $DEF USA4FLV=3*USA4FLVS,LV_NE_(95000|95027|1776|95023|95077|95009|95077|95084)(|L)
6130  #   Freigt E6
6131  $DEF USA6FLV=2*USA6FMIXK,5*(LV_HOPO|ROCK_CHOP),2*USA6FMIXK
6132
6133  # USA Maine Central Railroad
6134  #   Freigt E3 shunting
6135  $DEF USA3FMECS=(4-6*(MEC_36107_XM_USRASS|MEC_36285_XM_USRASS(|L)))|(2*USA3FMIXK)|                       \
6136      (4-6*MEC_1937AAR_XM_(6240|6444)(|L))|(4-6*(MEC_5032_ARA1923(|L)|MEC_5064_ARA1923(|L)))|             \
6137      (4-6*BAR_BOX40)|(4-6*MEC_GB_3(244|365|366)(|L)[O:SAND(10|9|11|12)(|[M])])|(4-6*MEC_9358_PS1(|L))|   \
6138      (4-6*MEC_(4500|4505|4997|14547|24024|14242)_XM_ARA1932(|L))
6139  #   Freigt E3 long
6140  $DEF USA3FMEC=(5*USA3FMECS)|(20-25*MEC_LO_2476_PS2003(|L)),MEC_(642|643|644)(|L)
6141  #   Freigt E5 short
6142  $DEF USA5FMECS=(6-8*MEC_XP_(29000|29012)(|L))|(6-8*MEC_FMC50PAN(|L))|(6-8*MEC_9358_PS1(|L))|            \
6143      (6-8*MMA_XP_(1|4)(|L))|(6-8*MEC_FMC50G1(|L))|(2*USA6FMIXK)
6144  #   Freigt E5 long
6145  $DEF USA5FMEC=3*USA5FMECS
6146
6147  # USA Chicago, Milwaukee, St. Paul and Pacific Railroad
6148  #   Freigt E3 shunting
6149  $DEF USA3FMILWS=(4-5*MILW_XM_PS1_(29408|17560|30005|30437|30250)(|L))|                                  \
6150      (4-5*MILW_X(L_3500|M_50342|MEI_2541|MEI_2539)(|L))|(4-5*MILW_70(1936|3425)_XM_USRASS(|L))|          \
6151      (4-5*(MILW_4611_XL(|L)|MILW_BOX1))|USA3FMIXK
6152  #   Freigt E3 long
6153  $DEF USA3FMILW=(20*MILW_9(6061|4212)_HM(|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])|  \
6154      (5-6*USA3FMILWS),MILW_NE_(992120|02135|992122)(|L)
6155  #   Freigt E4 shunting
6156  $DEF USA4FMILWS=USA3FMIXK|(4-5*MILW_XM_PS1_35000(|L))|(4-5*MILW_PS50C_2325(|L))|                        \
6157      (4-5*MILW_XP_4292(|L))|                                                                             \
6158      (4-5*(MILW_701936_XM_USRASS(|L)|MILW_703425_XM_USRASS(|L)|MILW_XP_50742(|L)))|                      \
6159      (4-5*MILW_(6582_XA|13967_XA|9038_XA|22945_XM|13644_XA|13500_XA|13252_XA|21190_XM|18861_XM|          \
6160      18753_XM|18463_XM)(|L))|(4-5*MILW_(LO_99610|98925)_PS2003(|L))|                                     \
6161      (4-5*WP_2001_FM(|L)[O:STEEL3(4|5|6|7|8),12,11][O:STEEL3(4|5|6|7|8),67,11])|                         \
6162      (4-5*MILW_49042_FM(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|
6163  #   Freigt E4 long
6164  $DEF USA4FMILW=5-6*USA4FMILWS,WEYT_3CAB
6165  #   Freigt E5 short
6166  $DEF USA5FMILWS=USA5FS|(4-6*MILW_XP_4292(|L))|(4-6*MILW_4987_XPA(|L))|(4-6*MILW_PS4740SO01(|L))|        \
6167      (4-6*MILW_XPA_4982(|L))
6168  #   Freigt E5 long
6169  $DEF USA5FMILW=(25*MILW_(PS4427|LO4750|PS4740SO01)(|L))|6*USA5FMILWS
6170
6171  # USA Missouri-Kansas-Texas Railroad Company
6172  #   Freigt E4 shunting
6173  $DEF USA4FMKTS=USA3FMIXK|(4-5*MKT_90135_PS1(|L))|(4-5*(MKT_BOX|MKT_REF50))|                             \
6174      (4-5*MKT_(LO_34317|188)_PS2003(|L))|(4-5*MKT_XM_PS1_9(2000|7701)(|L))|(4-5*MKT_PS50C_1404(|L))
6175  #   Freigt E4 long
6176  $DEF USA4FMKT=(5-6*USA4FMKTS),MKT_115(|L)
6177  #   Freigt E6
6178  $DEF USA6FMKT=MKT_103(|L),2*USA6FMIXK,4-7*MKT_CHOP,4-7*MKT_PS4750(|L),4-7*MKT_LO_439(|L)
6179
6180  # USA Chicago Indianapolis & Louisville Railroad Co. (Monon R.R.)
6181  #   Freigt E3 shunting
6182  $DEF USA3FMONS=(2*USA3FMIXK)|(4-5*MON_81530(|L))|(4-5*MON_GB_3(117|0005)(|L)[O:SCRAP(4|5|6)(|[M])])|    \
6183      (4-5*MON_4099_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|                      \
6184      (4-6*(MON_GB_3001(|L)[O:SCRAP(4|5|6)(|[M])]))|(4-6*MON_XM_PS1_(541|750)(|L))
6185  #   Freigt E3 long
6186  $DEF USA3FMON=5-6*USA3FMONS
6187  #   Freigt E4 short
6188  $DEF USA4FMONS=USA4FMIXK|(4-5*MON_LO_52087(|L))
6189  #   Freigt E4 long
6190  $DEF USA4FMON=5-6*USA4FMONS,MON_81530(|L)
6191
6192  # Minneapolis, Northfield & Southern
6193  #  Freigt E4 short
6194  $DEF USA4FMNSS=USA4FMIXK|(4-5*MNS_XM_PS1_1(050|231|234)(|L))|(4-5*MNS_(500_PS1|XM_49813)(|L))|          \
6195      (4-5*MNS_XP_49726(|L))
6196  #  Freigt E4 long
6197  $DEF USA4FMNS=5-6*USA4FMNSS,MPA_200(6|7|7A)(|L)
6198  #   Freigt E6 short
6199  $DEF USA6FMNS=(5*MNS_LU_(2516|2037)(|L))|USA6FMIXK
6200  #   Freigt E6 long
6201  $DEF USA6FMN=(25*MNS_PS47(40SO02|40SO01|50SO01)(|L))|5*USA6FMNS
6202
6203  # Maryland & Pennsylvania R.R. Co.
6204  #  Freigt E4 short
6205  $DEF USA4FMPAS=(4-5*(MPA_X130_MWB|MPA_X131_MWB(|L)|MPA_1021_ARA1923(|L)))|USA4FMIXK|                    \
6206      (5*((MPA_510_XM|MPA_513_XM|MPA_531_XM|MPA_713_XM|MPA_729_XM|MPA_1150_XM|MPA_1151_XMLATE|            \
6207      MPA_1151_XMORIG|MPA_1152_XMORIG|MPA_1153_XM)(|L)))|                                                 \
6208      (4-5*((MPA_XM_PS1_4142|MPA_XM_PS1_3107|MPA_XF_PS1_5534|MPA_XM_PS1_26068)(|L)))
6209  #  Freigt E4 long
6210  $DEF USA4FMPA=5-6*USA4FMPAS,MPA_200(6|7|7A)(|L)
6211  #  Freigt E6
6212  $DEF USA6FMPA=2*MPA_126_MWF(|L),                                                                        \
6213      20*((MPA_XM_A302_7517|MPA_XP_A302_203|MPA_XM_A302_9248|MPA_300_PS1|MPA_7200_PS1|MPA_7300_PS1)(|L))
6214
6215  # USA Missouri Pacific R.R.
6216  #  Freigt E3 shunting
6217  $DEF USA3FMPS=(2*USA3FMIXK)|(5*MP_3(0943|1999)_XM_ARA1932(|L))|                                         \
6218      (4-5*((MP_45231_XM_USRADS|MP_45233_XM_USRADS|MP_81828_PS1)(|L)))|                                   \
6219      (4-5*MP_X(P_367124|L_253479|M_366763)(|L))|(4-5*MP_BOX1)
6220  #  Freigt E3 long
6221  $DEF USA3FMP=(25*((MP_58678_HM_USRA|MP_58679_HM_USRA|MP_59446_HM|MP_60247_HM)(|L)                       \
6222      [O:(FR_KO45|OMM_KOHLE_03|FR_KO35|BALLAST15)(|[M]),,33]))|(5-6*USA3FMPS),WEYT_3CAB
6223  #   Freigt E6 short
6224  $DEF USA6FMPS=(USA6FMIXK|(4-6*MP_82015_PS1(|L))|(4-6*MP_(LO4700|PS4740SO02)(|L))|                       \
6225      (4-6*MP_LO_(718155|706396|706397|706404)(|L))|(4-6*(MP_272006_XPA|MP_272007_XPA|MP_272009_XPA)(|L)))| \
6226      (4-6*MP_PS4750SO0(1|2)(|L))|(4-6*(MP_FM_815080(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))|            \
6227      (4-6*MP_XP_269459(|L))
6228  #   Freigt E6 long
6229  $DEF USA6FMP=6*USA6FMPS
6230
6231  # USA Montana Raillink Inc.
6232  #  Freigt E6
6233  $DEF USA6FMRL=USA6FMIXK,5-10*MRL_ACF4650,USA6FMIXK,5-10*MRL_NSC50HC2,MRL_1104(|L)
6234
6235  # USA Minneapolis & St.Louis R.R.
6236  #  Freigt E3
6237  $DEF USA3FMST=(6-8*(MSTL_2515_PS1|MSTL_22518_XM_USRADS|MSTL_25538_XM_USRADS)(|L),                       \
6238      6-8*MSTL_65327_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M]),,33],4-6*MSTL_24984(K|AB)_XM(|L),2*MSTL_BOX1)|  \
6239      (20-25*MSTL_(70395|70407|LO_70333)_PS2003(|L)),WEYT_3CAB
6240
6241  # USA Nashville, Chattanooga, and St. Louis railway
6242  #   Freigt E3 shunting
6243  $DEF USA3FNCS=(4-5*NC_FOWLER_15(397|337)(|L))|USA3FMIXK
6244  #   Freigt E4 shunting
6245  $DEF USA4FNCS=(USA4FMIXK)|(4-5*NC_18303_XM_ARA1932(|L))|                                                \
6246      (4-5*NC_GB_4(4288|3079)(|L)[O:SCRAP(4|5|6)(|[M])])|(4-5*NC_18(300|261|399)_XM_ARA1932(|L))|         \
6247      (4-5*NC_XM_PS1_22210(|L))
6248  #   Freigt E4 long
6249  $DEF USA4FNC=(5-6*USA4FNCS)|(20*NC_48316_HM (|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])]), \
6250      WEYT_3CAB
6251
6252  # USA New Heaven R.R. Co.
6253  #  Freigt E3 shunting
6254  $DEF USA3FNHS=(4-6*NH_1937AAR_XM_(30000|31000|30010|31010)(|L))|(4-5*NH_PS40(|L))|USA3FMIXK|            \
6255      (4-5*NH_LO_117091_PS2003(|L))
6256  #   Freigt E3 long
6257  $DEF USA3FNH=(20-25*NH_120662_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M])])|(5-6*USA3FNHS),                    \
6258      NH_NE5_(548|547|C535)(|L)
6259  #  Freigt E4 shunting
6260  $DEF USA4FNHS=(4-6*NH_1937AAR_XM_(36000|36100|37000|37100|38000|38100)(|L))|USA4FMIXK
6261  #   Freigt E4 long
6262  $DEF USA4FNH=5-6*USA4FNHS,NH_NE5_(548|547|C535)(|L)
6263
6264  # USA New York, Chicago & St. Louis R.R. (Nickel Plate Road)
6265  #   Freigt E3 short
6266  $DEF USA3FNKPS=(4-6*NKP_33799_HM(|L)[O:COAL(39|37|38|9)(|[M])])|(4-6*NKP_1937AAR_XM_15000(|L))
6267  #   Freigt E3 long
6268  $DEF USA3FNKP=6*USA3FNKPS,WEYT_3CAB
6269
6270  # USA Northern Pacific
6271  #   Freigt E2 shunting
6272  $DEF USA2FNPS=(4-5*NP_XM_39153(|L))|(4-5*NP_PS40R(|L))
6273  #   Freigt E2 long
6274  $DEF USA2FNP=6*USA2FNPS,NP_CABC2
6275  #   Freigt E3 shunting
6276  $DEF USA3FNPS=(4-5*NP_659996_XL(|L))|(4-5*NP_XM_PS1_3055(|L))|(4-5*NP_XM_39730(|L))|                    \
6277      (4-5*NP_SK_800(40|88)(|L))|                                                                         \
6278      (4-5*(NP_40XM|NP_BOX3|NP_PS40GL|NP_PS40R|NP_PS40G|NP_PS40RL|NP_BOX1|NP_BOX2))|                      \
6279      (4-5*NP_LO_(75864|75273_PS2003)(|L))|(2*USA3FMIXK)|(4-5*NP_XM_(13070|1100|13000)(|L))|              \
6280      (4-6*NP_1937AAR_XM_1578(7|8)(|L))|(NP_XA_4700L,NP_XM_5900L,NP_XM_30402L,NP_XM_30402,NP_XM_30402L)
6281  #   Freigt E3 long
6282  $DEF USA3FNP=5-6*USA3FNPS,NP_10036(|L)|NP_CABC2
6283  #   Freigt E4 shunting
6284  $DEF USA4FNPS=(2*USA4FMIXK)|(4-5*NP_LO_75034(|L))|(4-5*NP_PS4740SO01(|L))
6285  #   Freigt E4 long
6286  $DEF USA4FNP=(20*NP_70277_HM(|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])|             \
6287      (5-6*USA4FNPS),NP_10036(|L)|NP_CABC2
6288  # Freigt E5 short
6289  $DEF USA5FNPS=USA5FS|(4-6*(NP_REF50WFE|NP_REF60))|(4-6*NP_PS4740SO01(|L))
6290  # Freigt E5 l0ng
6291  $DEF USA5FNP=6*USA5FNPS
6292
6293  # USA Northern Pacific North coast limited
6294  # Passenger E3
6295  $DEF USA3PNCLL=(<NP_400,NP_425,,NP_459,NP_494,NP_500,NP_550,NP_551,NP_586,NP_588,NP_589,NP_367,NP_350,  \
6296      NP_308,NP_307,NP_390)
6297  $DEF USA3PNCL=(<NP_390L,NP_307L,NP_308L,NP_350L,NP_367L,NP_425L,NP_459L,NP_494L,NP_500L,NP_550L,        \
6298      NP_551L,NP_586L,NP_588L,NP_589L,NP_400L,NP_F9A)
6299
6300  # USA Norfolk Southern Railway Company
6301  # Freigt E3 short
6302  $DEF USA3FNSAS=(4-6*NSO_XM_(2401|2154)(|L))|(4-6*NSA_BP8_650129(|L))|                                   \
6303      (4-6*NSA_1937AAR_XM_25(634|587)(|L))|(4-5*NSA_194010(|L)[O:BALLAST(33|28)(|[M])])|USA2FMIXK|        \
6304      (4-5*NSA_GB_7201(|L)[O:SAND(10|9|11|12)(|[M])])
6305  # Freigt E3 long
6306  $DEF USA3FNSA=5-6*USA3FNSAS,NSO_NE_(385|383|389)(|L)|NSA_NE_39(3|4)(|L)
6307  #  Freigt E6 short
6308  $DEF USA6FNSAS=(4-6*NSA_200881(|L)[O:BALLAST(33|28)(|[M])])|(4-6*NSA_BETHGON2)|                         \
6309      (4-6*NSA_RD6TRI[O:SOIL(21|14)(|[M]),,41])|(4-6*NSA_236178TRI3281(|L))|(4-6*NSA_PS4750(|SO02)(|L))|  \
6310      (4-6*NSA_XP_450667(|L))|(4-6*NSA_GU60HC(|L))|(4-6*NSA_PS4740SO01(|L))|(4-6*NSA_XPA_488168(|L))|     \
6311      (4-6*NSA_TRI5161SO01(|L))
6312  #  Freigt E6 long
6313  $DEF USA6FNSA=6*USA6FNSAS
6314
6315  # USA Norfolk and Western Railway
6316  # Freigt E3  short
6317  $DEF USA3FNWS=(4-6*NW_(57300B11|57439B11|54820B9A|54825B9A|54830B9A|54835B9A|55800B9A|55820B9A|         \
6318      55835B9A|55870B10|55884B10|54810B9A)_PS1(|L))|                                                      \
6319      (4-6*(NW_54822_PS1|NW_55860_PS1|NW_57150B11_PS1)(|L))|                                              \
6320      (4-6*(NW_XM_57611|NW_XM_57810|NW_120026_XM_USRASS|NW_120600_XM_USRASS|NW_120688_XM_USRASS)(|L))|    \
6321      (4-6*NW_(PS40|B8_42000|B8_42030|B8_42040)(|L))|(4-5*NW_GB_89000(|L)[O:SCRAP(5|6)(|[M])])|           \
6322      (4-6*NW_CS3_17000(0|6)(|L)[O:NW_CS3_HOOD(1|2),13,19][O:NW_CS3_HOOD(1|2),86,19])|                    \
6323      (4-6*NW_PS50C_(57446B12|57447B12|164379B114|164390B114)(|L))|(4-6*NW_B(2_49201|1_46146)(|L))|       \
6324      (4-6*NW_B3_52200(|L))|(4-6*NW_G4_70600(|L))
6325
6326  # Freigt E3 long
6327  $DEF USA3FNW=(6*USA3FNWS)|(25*NW_HT55(|L)[O:COAL(39|37|38|9)(|[M]),,34])|                               \
6328      (25*NW_(514372|HC6_71233)_PS2003(|L)),                                                              \
6329      (NW_CG_518(393|382|402|395|392)(|L))|NW_NE_500832(|L)|NW_CG_518400(|L)
6330  #  Freigt E6 short
6331  $DEF USA6FNWS=(4-6*NW_PS47(00|40SO02|50SO02|50SO01)(|L))|(4-6*NW_B131_60500(4|0)(|L))|                  \
6332      (4-6*(NW_120026_XM_USRASS|NW_120600_XM_USRASS|NW_120688_XM_USRASS)(|L))|USA6FMIXK|                  \
6333      (4-6*NW_B139_6045(22|38)(|L))|(4-6*(NW_FM_300431(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))|          \
6334      (4-6*NW_XPA_(868297|52952)(|L))|(4-6*NW_LO_(180300|171717)(|L))
6335  #  Freigt E6 long
6336  $DEF USA6FNW=6*USA6FNWS
6337
6338  # USA New York Central Railway
6339  #  Freigt E3 short
6340  $DEF USA3FNYCS=(4-5*(NYC_160108_XM_USRASSL|NYC_160108_XM_USRASS|NYC_277418_XM_USRASSL|                  \
6341      NYC_277418_XM_USRASS|NYC_234718_XM_USRADSL|NYC_234718_XM_USRADS))|                                  \
6342      (4-5*NYC_(701B_64000|815B_71000|820B_71543|855B_41500|862B_45740|864B_52461|895B_47025|907B_43666)  \
6343      (|L))|(4-5*NYC_(896B_47591|742B_80868|850B_72521|850B_72522|854B_40505)(|L))|                       \
6344      (4-5*NYC_GB_(643703|643000|643001|643515|643517|711000|711451)(|L))|                                \
6345      (4-5*(NYC_837996_HM_USRAL|NYC_837996_HM_USRA|NYC_837997_HM_USRAL|NYC_837997_HM_USRA|                \
6346      NYC_847268_HM_USRAL|NYC_847268_HM_USRA|NYC_850126_HM_USRAL|NYC_850126_HM_USRA))
6347  #  Freigt E3 long
6348  $DEF USA3FNYC=(5-6*USA3FNYCS)|                                                                          \
6349      (20*NYC_(867399_HM|3HOP1|867399_HML)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])]),     \
6350      NYC_19969(|L)
6351  #  Freigt E4 short
6352  $DEF USA4FNYCS=(5-6*((4*NYC_349627_GB_USRA|NYC_666044_GAUSRA)(|L))|                                     \
6353      (5-6*((NYC_PS40|NYC_PS40P|NYC_107378_XM_AB|NYC_107378_XM_K|NYC_109445_XM_AB|NYC_189509_XM_USRAAB|   \
6354      NYC_189509_XM_USRAK|NYC_160108_XM_USRASS|NYC_277418_XM_USRASS|NYC_234718_XM_USRADS)(|L))))|         \
6355      (5-6*NYC_RBL_78532(|L))|(4-6*NYC_XPA_67106(|L))|(4-6*NYC_LO_885954(|L))|(4-6*NYC_67553_XPA(|L))|    \
6356      (5-6*(NYC_888F(|L)[O:(SHIPMOTORAXLE|BOILERRINGS|BETON2|CHIMNEY2),,11])|                             \
6357      (5-6*NYC_LO_883466_PS2003(|L)))|                                                                    \
6358      (5-6*NYC_XM_PS1_1(69739|69722|69749|69800|69802|69809|70746|80000|80039|80149|80174)(|L))
6359  #  Freigt E4 long
6360  $DEF USA4FNYC=(20-25*(NYC_(847268|837997|837996|850126)_HM_USRA(|L)                                     \
6361      [O:(FR_KO37|OMM_KOHLE_02|COAL9|COAL37|COAL38|FR_KO37|FR_COAL1|FR_COAL2)(|[M]),,33]))|               \
6362      (5-6*USA4FNYCS),NYC_19008(|L)|NYC_20132(|L)|NYC_20144(|L)|NYC_NE21049(|L)|NYC_19969(|L)
6363
6364  # USA New York, Susquehanna and Western Railroad Company
6365  #  Freigt E3 shunting
6366  $DEF USA3NYSS=USA3FMIXK|(4-5*NYSW_XM_PS1_(526|411)(|L))|(4-5*NYSW_FOWLER_1546(|L))|(4-5*NYSW_BOX1)
6367  #  Freigt E3 long
6368  $DEF USA3NYS=5-6*USA3NYSS,WEYT_3CAB
6369
6370  #  Freigt E4 shunting
6371  $DEF USA4NYSS=USA4FMIXK|(4-5*NYSW_XF_104(|L))
6372  #  Freigt E4 long
6373  $DEF USA4NYS=5-6*USA4NYSS,WEYT_3CAB
6374
6375  # USA Paducah & Louisville Railway
6376  #   Freigt E4
6377  $DEF USA4FPAL=15*PAL_246028(|L)[O:BALLAST_OLD1(|[M])],WEYT_3CAB
6378
6379  # USA Penn Central Railway
6380  #  Freigt E4 shunting
6381  $DEF USA4FPCS=(4-5*PC_X7(4_167015|1_166418|1_166419)(|L))|(4-5*(PC_X58C_164246|PC_X58C_266109)(|L))|    \
6382      (4-5*PC_(161B_174239|XM_155026|293770_XPA|X73_369118)(|L))|(4-5*PC_F41A(|L)[O:GIRDER3,,11])|        \
6383      (4-5*PC_G32C(|L)[O:SAND(7|11|12)(|[M])])|(4-5*PC_74216_PS2003(|L))|(4-5*PC_XM_PS1_112178(|L))|      \
6384      (4-5*PC_GB_512204(|L)[O:SCRAP(5|6)(|[M])])
6385  #  Freigt E4 long
6386  $DEF USA4FPC=5-6*USA4FPCS,PC_NE210(08|41|70)|PC_N8B_23505(|L)|PC_NE_184(23|03)(|L)|PC_NE21070(|L)
6387  #  Freigt E6 short
6388  $DEF USA6FPCS=(4-6*PC_293770_XPA(|L))|(4-6*PC_F41(|L)[O:GIRDER3,,11])|(4-6*PC_PS4750SO01(|L))|          \
6389      (4-6*PC_LO_885(122|237)(|L))|(4-6*PC_X(78_221018|60P_295506)(|L))|(4-6*WP_XP_3763 (|L))
6390  #  Freigt E6 long
6391  $DEF USA6FPC=6*USA6FPCS
6392
6393  # USA Pickens Railway
6394  #  Freigt E4 short
6395  $DEF USA4FPICS=(4-6*PICK_XP_A302_54042(|L))|USA4FMIXK|USA4FMIXK
6396  #  Freigt E4 short
6397  $DEF USA4FPIC=5-6*USA4FPICS,WEYT_3CAB
6398
6399  # USA The Pittsburgh & Lake Erie R.R. Co.
6400  #  Freigt E3 shunting
6401  $DEF USA3FPLES=(4-6*PLE_889F(|L)[O:STEEL22])|USA2FMIXK|(4-6*PLE_1560_PS2003(|L))|                       \
6402      (4-6*PLE_1937AAR_XM_300(58|00|01)(|L))
6403  #  Freigt E3 long
6404  $DEF USA3FPLE=5-6*USA3FPLES,WEYT_3CAB
6405
6406  # USA Pennsylvania Railroad
6407  # Freigt E2 shunting
6408  $DEF USA2FPRRK=(5*((PRR_F22(|L)|PRR_FB|PRR_FD|PRR_F30(|E)(|L)|PRR_FM)                                   \
6409      [O:(TANK1|TANK2|BOILER5|BOILER4|BOILER1),,12]))|(5-6*PRR_XE(|L))|                                   \
6410      (5-6*((PRR_GR_ASBUILT|PRR_GR_ASBUILT_LW|PRR_GR_POST1911)(|L)[O:SCRAP_1(3|5|4)(|[M]),,20]))|         \
6411      (5-6*((PRR_GRA_ASBUILT|PRR_GRA_ASBUILT_LW|PRR_GRA_POST1911|PRR_GRA_MOW1|PRR_GRA_MOW2)(|L)           \
6412      [O:BALLAST(42|41|51)(|[M]),,20]))|(5-6*PRR_X(A_1876|A_GSD|A_69947|B|C)(|L))|                        \
6413      (5-6*((PRR_G24_USRA|PRR_G24_USRARBT)(|L)[O:BALLAST(42|41|51)(|[M]),,20]))|                          \
6414      (6-8*((PRR_X28|PRR_X28A|PRR_X29_1923|PRR_X29_1924|PRR_X29_1924CK|PRR_X29_1924MS2|PRR_X29_1924REA|   \
6415      PRR_X29_1924SK1A|PRR_X29_1928|PRR_X29_1928CK|PRR_X29_1928MS2|PRR_X29_1928REA|PRR_X29_1928SK1A|      \
6416      PRR_X29_1928SVC|PRR_X29_1932BATTERY|PRR_X29_1932BOND|PRR_X29_1932CK|PRR_X29_1932KEROSENE|           \
6417      PRR_X29_1932MS2|PRR_X29_1932REA|PRR_X29_1932SK1A|PRR_24709_XL1928|PRR_27361_XL1909|                 \
6418      PRR_28030_XL1912|PRR_49039_XLC1906|PRR_60264_XLEL1903|PRR_72805_XM1903|PRR_72810_XM1915|            \
6419      PRR_97301_XL1903|VL_10320_XL1912)(|L)))|(6-8*(PRR_F(22|B|22L)[O:BOX(8|6),,12]))|                    \
6420      (5-6*((PRR_4087_RFAREX1918|PRR_100502_RF1915|PRR_110003_RFEL1903|PRR_110006_RFEL1915|               \
6421      PRR_119501_RF1903|PRR_R7_1913|PRR_R7_1913LW|PRR_R7_1915|PRR_R7_1915LW)(|L)))|(2*USA2FMIXK)|         \
6422      (5-6*(CHP_X25_5704|PRR_X25_88449|PRR_X25_88450|PRR_X25_32358|PRR_X25_35093|PRR_X25_35095|           \
6423      SBC_X25_3318)(|L))|(5-6*PRR_X31(_60101|_60130|A_68074|A_68077|A_77556|F_81738)(|L))
6424
6425  # Freigt E2 long
6426  $DEF USA2FPRR=5*USA2FPRRK,                                                                              \
6427      PRR_N8S2|PRR_NX23(|L)|PRR_479814_NDA(|L)|PRR_476052_ND(|L)|PRR_CAB1|PRR_CAB2|PRR_CAB6
6428  #  Passenger E3
6429  $DEF USA3PPRR=(<(2*PRR_442IMPERIAL_4069BL),3*PRR_125BROOK_4066BL,PRR_RAPIDS_106SLPL,                    \
6430      2*PRR_18BRCITY_4068L,(PRR_442IMPERIALFOM_4069BL|PRR_125BROOKFOM_4066BL|PRR_18BRCITYFOM_4068L))|     \
6431      (<(PRR_18BRCITYFOM_4068|PRR_125BROOKFOM_4066B|PRR_442IMPERIALFOM_4069B),(2*PRR_18BRCITY_4068),      \
6432      PRR_RAPIDS_106SLP,3*PRR_125BROOK_4066B,2*PRR_442IMPERIAL_4069B)
6433
6434  #  Freigt E3
6435  $DEF PRR_BOX1=(PRR_X28|PRR_X28A|PRR_X29_1923|PRR_X29_1924|PRR_X29_1924CK|PRR_X29_1924MS2|               \
6436      PRR_X29_1924REA|PRR_X29_1924SK1A|PRR_X29_1928CK|PRR_X29_1928|PRR_X29_1928MS2|PRR_X29_1928REA|       \
6437      PRR_X29_1928SK1A|PRR_X29_1928SVC|PRR_X29_1932BATTERY|PRR_X29_1932BOND|PRR_X29_1932CK|               \
6438      PRR_X29_1932KEROSENE|PRR_X29_1932MS2|PRR_X29_1932REA|PRR_X29_1932SK1A|PRR_PS40|                     \
6439      PRR_X26_44076_USRASS|PRR_X26_86854_USRASS|PRR_X26_540132_USRASS|PRR_X26_540371_USRASS|              \
6440      PRR_X26_564287_USRASS)(|L)
6441  # Freigt E3 short
6442  $DEF USA3FPRRS=(4-5*PRR_G31(_36340(0|1|2)|B_37195(0|2|4))(|L)[O:SCRAP(5|6)(|[M])])|                     \
6443      (4-5*PRR_X58_11(2383|2383_MOD|2383_LATE|7942|7942_MOD|7942_LATE)(|L))|                              \
6444      (4-5*PRR_X58(A_113961|A_113961_MOD|A_113961_LATE|B_112630|B_112630_MOD|B_112630_LATE|B_114242|      \
6445      B_114242_MOD|B_114242_LATE)(|L))|(4-5*PRR_BOX1)|(4-5*PRR_LO_261419(|L))|                            \
6446      (4-5*PRR_H34(B_257482|C_258089)_PS2003(|L))|(4-5*PRR_K(8|7|7A)(|L))|                                \
6447      (4-5*(PRR_F30D(1|2)|TTX_F30D_(475264|475263)L[OB:SEMI_USA4R,,12]))|                                 \
6448      (4-5*(PRR_F30D(1|2)L|TTX_F30D_(475264|475263)[OB:SEMI_USA4L,,12]))|                                 \
6449      (4-5*PRR_X(37_65400|37B_67360|43_603925|43_603926|43A_602000|43A_602003|43C_603925|43C_71162|       \
6450      46_87087|46_87088|46A_72325|46A_72328)(|L))|                                                        \
6451      (4-5*PRR_X(38C_74595|38C_74598|41B_118753|41B_119677|41B_119894|44_604000|38_73764|38_75923|        \
6452      38F_45671|41_84536|41_84805|44_604005|45_73312|ME_47100)(|L))|                                      \
6453      (4-5*PRR_G(29A_357354|29A_357358|29B_349499|29C_357600|29C_357606|29C_357620|30_362384|30_362853|   \
6454      29_357854|29_357857|29_357860|30A_363303|30A_363313|30A_363360)(|L))|PRR_F30D(1|2)|                 \
6455      (TTX_F30D_(475264|475263)[OB:SEMI_USA4L,,12])|(4-5*PRR_X32(D_49250|A_58800|B_48300)(|L))|           \
6456      (3-4*(PRR_F39_470400|PRR_F39A_470600|TTX_F39_470400)L[OB:F39_HITCH,32,10][OB:F39_HITCH,143,10]      \
6457      [OB:SEMI_USA3L,30,8][OB:SEMI_USA3L,139,8])|                                                         \
6458      (3-4*(PRR_F39_470400|PRR_F39A_470600|PRR_F39A_470650|TTX_F39_470400|ATTX_F39_470735)                \
6459      [OB:#F39_HITCH,94,10][OB:#F39_HITCH,203,10][OB:SEMI_USA3R,30,8][OB:SEMI_USA3R,139,8])
6460  # Freigt E3 long
6461  $DEF USA3FPRR=(5-6*USA3FPRRS)|(25-28*(PRR_3HOP(E|N)(|L)[O:BALLAST(24|44)(|[M])])),                      \
6462      PRR_N8S2|PRR_NX23(|L)|PRR_479814_NDA(|L)|PRR_476052_ND(|L)|PRR_CAB5|PRR_CAB4|PRR_CAB1|PRR_CAB3|     \
6463      PRR_CAB2|PRR_CAB6
6464  # Freigt E4
6465  $DEF USA4FPRRS=(4-6*(PRR_3HOP(E|N)(|L)[O:BALLAST(24|44)(|[M])]))|(4-6*PRR_110126_XPA(|L))|              \
6466      (4-6*PRR_X60_110175(|L))|(4-6*PRR_GON(|L))|(4-6*PRR_439038_GBG26(|L)[O:FR_ST01(|[M])])|             \
6467      (4-6*PRR_X40(_36991|A_36989)(|L))|(4-6*PRR_H45_259802(|L))|(4-6*PRR_G24_USRARBT_CK(|L))|            \
6468      (4-6*PRR_F41(ORIG|LATE)(|L)[O:(SHIPMOTORAXLE|BOILERRINGS|BETON2|PIPE53),,11])|                      \
6469      (4-6*PRR_340041_X23A(|L)[O:SOIL(17|20|11|13|16|18|10),,37])|                                        \
6470      (4-6*PRR_F47(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|(4-6*PRR_LO_260177(|L))
6471  $DEF USA4FPRR=5*USA4FPRRS,PRR_CAB5|PRR_CAB4
6472
6473  # USA The Pittsburgh & Shawmut R.R. Co.
6474  #  Freigt E3 shunting
6475  $DEF USA3FPSRS=(4-5*PSR_3133_HM(|L)[O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])
6476  #  Freigt E3 long
6477  $DEF USA3FPSR=(5-6*USA3FPSRS),WEYT_3CAB
6478
6479  # USA Pittsburgh & West Virginia Ry.
6480  #  Freigt E3 shunting
6481  $DEF USA3FPWVS=(4-5*PWV_LO_1955_PS2003(|L))|USA3FMIXK|(4-5*PWV_XM_PS1_1300(|L))
6482  #  Freigt E3 long
6483  $DEF USA3FPWV=(20*PWV_(3025_HM_USRA|3101_HM_USRA|5000_HM_USRA|6736_HM|6735_HM|300_HM)(|L)               \
6484      [O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])|(5-6*USA3FPWVS),PWV_NE_839(|L)
6485
6486  # USA Reading Blue Mountain & Northern Railroad Company SD40-2
6487  #  Freigt E4 shunting
6488  $DEF USA4FRBMS=(4-6*RBMN_PS47(40SO01|50SO01)(|L))|USA4FMIXK
6489  #  Freigt E4 long
6490  $DEF USA4FRBM=6*USA4FRBMS,WEYT_3CAB
6491
6492  # USA Reading Company
6493  #  Freigt E4 shunting
6494  $DEF USA4FRDGS=(4-5*RDG_XLJ_20(178|042|029)(|L))|(4-5*RDG_RBLA_17039(|L))|(4-5*RDG_102(751|646)(|L))
6495  #  Freigt E4 long
6496  $DEF USA4FRDG=(20*RDG_LOA_72914(|L))|                                                                   \
6497      (20*RDG_8(5140|7255)_HTV(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|              \
6498      (4-5*USA4FRDGS),RDG_(94113|NMD_90730|NMG_90709|NMK_92855|NMN_92936|NMJ_92836)(|L)
6499  #  Freigt E6 long
6500  $DEF USA6FRDG=(25*(((RDG_73592_HM_USRA|RDG_73593_HM_USRA|RDG_74170_HM_USRA)(|L)                         \
6501      [O:(FR_KO37|FR_COAL1|FR_COAL2|COAL3|COAL27|COAL28)(|[M])])))|                                       \
6502      (25*(((RDG_5083_XM_USRASS|RDG_5092_XM_USRASS)(|L))))|(5-6*(RDG_LOJ_79981(|L))|USA6FMIXK)
6503
6504  # USA Richmond, Fredricksburg & Potomac Railroad
6505  #   Passenger E3 regional
6506  $DEF USA3PRFPR=RFP_PB_25,4*RFP_PA_401
6507  #   Passenger E3 long distance
6508  $DEF USA3PRFPL=RFP_PA_501A(|L),RFP_PA_501B(|L),RFP_PA_501C(|L),RFP_PA_77LATE(|L),RFP_PA_77ORIG(|L),     \
6509      RFP_PA_513B(|L),RFP_PA_513A(|L),RFP_PA_559B(|L),RFP_PA_559A(|L),RFP_PA_513C(|L)
6510
6511  #   Freigt E3 short
6512  $DEF USA3FRFPS=(4-5*RFP_356(6|7)_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M])])|                                \
6513      (4-5*RFP_XM_PS1_28(48|08|36|70)(|L))|(4-5*RFP_(1023|1137|2719|5051|2330)_XM_USRASS(|L))|            \
6514      (4-5*RFP_PS50C_2392(|L))|(4-5*RFP_LP_3846(|L)[OB:PIPE(55|61),,11])|                                 \
6515      (4-5*RFP_(8265|8242)_HT[O:COAL2(7|8)(|[M]),,33](|L))
6516  #   Freigt E3 long
6517  $DEF USA3FRFP=5-6*USA3FRFPS,RFP_81(3|6|8|9)(|L)|RFP_90(3|1|4|7)(|L)|RFP_82(1|0)(|L)
6518  #  Freigt E4 short
6519  $DEF USA4FRFPS=(4-6*RFP_PS4700(|L))|                                                                    \
6520      (4-6*(RFP_PS40(|L)|RFP_2902_PS1(|L)|RFP_2905_PS1(|L)|RFP_XL_A432_5200(|L)|RFP_XL_A332_2100(|L)|     \
6521      RFP_XL_A432_2000(|L)|RFP_XP_4000(|L)))
6522  #  Freigt E4 long
6523  $DEF USA4FRFP=6*USA4FRFPS,RFP_81(3|6|8|9)(|L)|RFP_90(3|1|4|7)(|L)|RFP_82(1|0)(|L)
6524
6525  # USA Rock Island Railroad
6526  #  Passenger E3
6527  $DEF USA3PRI=RI_BAG,RI_BILEV,2*RI_SLP,RI_DINER,3*RI_COACH,2*RI_CHAIR
6528  # Freigt E3 short
6529  $DEF USA3FRIS=(4-5*RI_RS_67999(|L))|USA4FMIXK
6530  # Freigt E3 long
6531  $DEF USA3FRI=5-6*USA3FRIS,RI_CAB1
6532  #  Freigt E4 short
6533  $DEF USA4FRIS=(4-5*RI_LO_12236(|L))|(4-5*RI_LO_7(643|200)_PS2003(|L))|USA4FS|                           \
6534      (4-5*RI_1(56294_XM_USRADS|34781_XM)(|L))|(4-5*RI_GB_(900|1297|3494)(|L))|(4-5*RI_XL_62914(|L))|     \
6535      (4-5*RI_(64399_PS1|140564AB_XM|140564K_XM|141542AB_XM|141542K_XM)(|L))|(4-5*RI_HT_9215(|L))|        \
6536      (4-5*RI_XM_PS1_2(5557|1895|2250)(|L))|(4-5*RI_PS50C_35028(|L))|(4-5*RI_XM_273(70|60)(|L))
6537  #  Freigt E4 long
6538  $DEF USA4FRI=5-6*USA4FRIS,RI_CAB1
6539  # Freigt E5 short
6540  $DEF USA5FRIS=(4-6*RI_32964_XPA(|L))
6541  # Freigt E5 long
6542  $DEF USA5FRI=6*USA5FRIS
6543
6544  # USA Chicago, Rock Island and Pacific Ry. Co
6545  # Freigt E4 short
6546  $DEF USA4FROCKS=(4-6*ROCK_LO_800499(|L))|(4-6*ROCK_ACF4650(|L))|(4-6*ROCK_PS(4750|4740SO01)(|L))|       \
6547      (4-5*ROCK_ACF4650(|L))|(4-5*ROCK_LO_(512011|512076|800499)(|L))|                                    \
6548      (4-5*ROCK_(GB_680255|HT_700000)(|L))|                                                               \
6549      (4-5*ROCK_(XM_58094|XM_301000|XP_302148|XP_A302_300573|XP_301896)(|L))|USA4FMIXK
6550  # Freigt E3 long
6551  $DEF USA4FROCK=5-6*USA3FRIS,BN_10107
6552
6553  # USA Raritan River R.R. Co.       (noch keine Lok)
6554  #   Freigt E4
6555  $DEF USA4FRR=USA4FMIX,RR_NE_9(|L)
6556
6557  # USA Rutland Railroad
6558  # Freigt E4 short
6559  $DEF USA4FRUTS=(4-6*RUT_PS40(|L))|(4-6*RUT_LO_508_PS2003(|L))
6560  # Freigt E4 long
6561  $DEF USA4FRUT=5-6*USA4FRUTS,RUT_51(|L)
6562
6563  # USA Seaboard Air Line
6564  # Freigt E2 short
6565  $DEF USA2FSALS=(4-5*(SAL_(12399_1932(K|AB)_B3|13055_1932(K|AB)_B4|15747_1932(K|AB)_B5)(|L)))|           \
6566      (4-6*SAL_B6(A|B|C|D|E|F)_ARA1932(|L))|(4-5*SAL_B6X_ARA1932(|L))|USA2FMIXK|                          \
6567      (4-6*SAL_B6(A|B|C|D|E|F)_ARA1932(|L))
6568  # Freigt E2 long
6569  $DEF USA2FSAL=5-6*USA2FSALS,SAL_(NE_5247|NE_5248|NE_5249|5702|5700|5703)(|L)
6570  #  Passenger E3
6571  $DEF USA3PSAL=(9*(SAL_1214OAKCITY|SAL_1214OAKDOME|SAL_1214OAKGROVE|SAL_1214OAKHALL),                    \
6572      SAL_831WEEPERSTOWERL)|                                                                              \
6573      (SAL_831WEEPERSTOWER,9*(SAL_1214OAKCITYL|SAL_1214OAKDOMEL|SAL_1214OAKGROVEL|SAL_1214OAKHALLL))|     \
6574      (<5*SAL_6238,SAL_REDMOUNTAIN_106,SAL_PALMBEACH,3*SAL_6218)|                                         \
6575      (<3*SAL_6218L,SAL_PALMBEACHL,SAL_REDMOUNTAIN_106L,5*SAL_6238L)
6576
6577  # Freigt E3 shunting
6578  $DEF USA3FSALS=(4-6*SAL_90030_G10(|L)[O:COAL2(2|4|5|6|1)(|[M])])|(2*USA3FMIXK)|                         \
6579      (4-6*SAL_PS50C_1(5008|6000)(|L))|(4-6*SAL_(12399_RS_B3|13055_RS_B4)(|L))|                           \
6580      (4-6*SAL_XM_PS1_22458(|L))|                                                                         \
6581      (4-6*SAL_B(8_19500|8_19500_1963|8_19500_1964|9_19550|9_19550_1963|9_19550_1964)(|L))|               \
6582      (4-6*SAL_(21267_PS1|21438_PS1|21642_PS1|21691_PS1|26000_PS1|26734_PS1|30550_PS2003|30689_PS2003)    \
6583      (|L))|(4-6*SAL_(AF1A|AF1B|AF1C|AF1D|AF2A|AF2B|AF2C|AF2D|B7A|B7B|B7C|B7D)(|L))
6584  # Freigt E3 long
6585  $DEF USA3FSAL=6*USA3FSALS,SAL_57(02|00|03)(|L)|SAL_(NE_5247|NE_5248|NE_5249|5702|5700|5703)(|L)
6586  # Freigt E4 shunting
6587  $DEF USA4FSALS=(4-6*SAL_PS50C_1(5008|6000)(|L))|(4-6*SAL_XMI_(25099|25257|25303|25403)(|L))
6588  # Freigt E4 long
6589  $DEF USA4FSAL=(5-6*USA4FSALS),SAL_57(02|00|03)(|L)
6590
6591  # USA Seaboard System
6592  # Freigt E4 shunting
6593  $DEF USA4FSBDS=(4-6*SEAB_XPA_180228(|L))|(4-6*SEAB_HT_323319(|L))|(4-6*SEAB_BOX1)|USA4FMIXK
6594  # Freigt E4 long
6595  $DEF USA4FSBD=(5-6*USA4FSBDS),SEAB_M5_21006(|L)
6596
6597  # USA Seaboard Coast Line
6598  # Freigt E3 shunting
6599  $DEF USA3FSCLS=(4-5*SCL_131808G5(|L)[O:SCRAP(5|6)(|[M])])|(4-5*SCL_LC_PS1_10811(|L))|                   \
6600      (4-5*SCL_(LC_PS1_10811|20107_PS1)(|L))|USA3FMIXK|(4-6*SCL_X5F_29061(|L))|(4-6*SCL_X4D_99350(|L))
6601  # Freigt E3 long
6602  $DEF USA3FSCL=5-6*USA3FSCLS,SCL_057(40|06)(|L)|SCL_M5_0(787|788)(|L)
6603  # Freigt E4 short
6604  $DEF USA4FSCLS=USA4FMIXK|(4-6*SCL_PS47(40SO01|50SO01|50SO02)(|L))|(4-6*SCL_X4D_99350(|L))|              \
6605      (4-6*SCL_LO_242510(|L))
6606  # Freigt E4 long
6607  $DEF USA4FSCL=(6*USA4FSCLS),SCL_05747(|L)|SCL_M5_0(1018|894|925)(|L)
6608
6609  # USA Saint Louis - San Francisco Railway Company (Frisco)
6610  # Freigt E3 short
6611  $DEF USA3FSLSS=(4-5*SLSF_462(|L))|(4-5*SLSF_85885_GB_USRA(|L))|                                         \
6612      (4-5*SLSF_85887_GB_USRARBT(|L)[O:SOIL(12|9|15|19)(|[M])])|                                          \
6613      (4-5*SLSF_(129171_XM|130157_XM|130254_XM|130474_XM|130109_XM_USRADS|128209_XM_USRADS|40005_PS1|     \
6614      PS40|XM_18050)(|L))|(4-5*SLSF_84031_PS2003(|L))
6615  # Freigt E3 long
6616  $DEF USA3FSLS=(20*SLSF_9(0849|1921)_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|    \
6617      (5-6*USA3FSLSS),SLSF_1280(|L)
6618  # Freigt E4 short
6619  $DEF USA4FSLSS=(4-6*SLSF_XPA_9125(|L))|(4-6*(SLSF_XP_44115(|L)|SLSF_7566_PS1(|L)))|                     \
6620      (4-6*SLSF_PS4750SO0(1|2)(|L))
6621  # Freigt E4 long
6622  $DEF USA4FSLS=6*USA4FSLSS,SLSF_1280(|L)
6623
6624  # USA St. Marys R.R. Co. RS3
6625  # Freigt E4 short
6626  $DEF USA4FSMS=USA4FMIXK|(4-6*SM_X(M_4200|L_2101|L_2147|M_4222)(|L))
6627  # Freigt E4 long
6628  $DEF USA4FSM=5-6*USA4FSMS,WEYT_3CAB
6629
6630  # USA Soo Line Railroad
6631  #  Freigt E3 short
6632  $DEF USA3FSOOS=(4-5*SOO_66695_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])|          \
6633      (4-5*SOO_6877_PS2003(|L))|(4-5*SOO_(41850|42204|41800)_XM_ARA1932(|L))
6634  #  Freigt E3 long
6635  $DEF USA3FSOO=6*USA3FSOOS,SOO_44(|L)|SOO_52(|L)|SOO_114(|L)|SOO_122(|L)
6636  # Freigt E6 shunting
6637  $DEF USA6FSOOS=(6-8*SOO_1(77514_PS1|5564_PS1)(|L))|(6-8*SOO_PS(4427|40)(|L))|                           \
6638      (6-8*SOO_LO(_74236|4750)(|L))
6639  # Freigt E6 long
6640  $DEF USA6FSOO=3*USA6FSOOS
6641
6642  # USA Southern Railway System
6643  #  Passenger E3
6644  $DEF USA3PSOU=(<SOU_BAG,(3*SOU_52COACH_855),SOU_DINER_3307,3*SOU_52COACH_855)|                          \
6645      (<(3*SOU_52COACH_855L),SOU_DINER_3307L,3*SOU_52COACH_855L,SOU_BAG)|                                 \
6646      (8*(SOU_1012LAKEPEARL(|L)|SOU_2496MCQUADE(|L)))
6647  #  Freigt E3 shunting
6648  $DEF USA3FSOUS=(4-5*SOU_GB_6109(9|8)(|L)[O:SCRAP(5|6)(|[M])])|(4-6*SOU_1937AAR_XM_30000(|L))|           \
6649      (4-5*(SOU_35658_PS1|SOU_263407_PS1|SOU_34884_PS1)(|L))|(4-5*SOU_(BS180_531879|XM_531876)(|L))|      \
6650      (2*USA3FMIXK)|(4-5*(SOU_198672_GB_USRA(|L)[O:BALLAST(24|44)(|[M])]))|(4-5*SOU_RBL_798219(|L))|      \
6651      (4-5*SOU_G(A_286500|A_286539|B_286600)(|L))|SOU_HT_73790,                                           \
6652      (4-5*(SOU_HT_73790(|L)[T:(1|2|3|4|5|6|7|8|9|0)(1|2|3|4|5|6|7|8|9|0),77,14,SOU_HT_NUMBERS4]          \
6653      [O:COAL(34|35|48|47)(|[M])]))|(4-5*(SOU_12(6154|6155|8101)_LP(|L)[OB:WOOD(23|22),,12]))|            \
6654      (4-5*SOU_SU_156(525|500)(|L))|(4-5*SOU_XM_PS1_30(453|500)(|L))|(4-5*SOU_X(M_527704|L_527904)(|L))
6655  #  Freigt E3 long
6656  $DEF USA3FSOU=(5-6*USA3FSOUS)|(25-28*SOU_3HOP(E|N)(|L)[O:BALLAST(24|44)(|[M])]),                        \
6657      (SOU_CAB|SOU_NE_X604(|L)|SOU_CAB1)
6658  #  Freigt E4 short
6659  $DEF USA4FSOUS=USA4FMIXK|(4-6*(SOU_GON(|L)[O:SCRAP_1(3|5|4)(|[M])]))|                                   \
6660      (4-6*(SOU_XP_43490|SOU_XPA_42955|SEAB_XPA_180228)(|L))|(4-6*SOU_XP_43490(|L))|                      \
6661      (4-6*SOU_XP(_43490|A_42955)(|L))|(4-6*SOU_PS4750SO01(|L))|(4-6*SOU_XPA_42954(|L))
6662  #  Freigt E4 long
6663  $DEF USA4FSOU=5-6*USA4FSOUS,SOU_CAB
6664
6665  # USA Southern Pacific Railroad
6666  #  passenger E3
6667  $DEF USA4PSP=(<5*SP_MDLP1,2*SP_MDLP3,4*SP_MDLP2)|(8*(SP_BL_PS|SP_BL_ACF))
6668  #  Freigt E4 short
6669  $DEF USA4FSPS=(4-5*SP_G708_(160200|160140|320230)(|L)[O:SCRAP(5|6)(|[M])])|                             \
6670      (4-5*SP_LO_2600_1965(A|B)(|L))|(4-5*SP_BOX8)|                                                       \
6671      (4-5*(SP_PS40|SP_26685_XM_USRASS|SP_27310_XM_USRASS|SP_B5015_TK_XM|SP_B5015_TK2_XM|                 \
6672      SP_B5015_TAB_XM|SP_B5015_TAB2_XM|SP_B5015_TABR_XM|SP_B5015_TABR2_XM|SP_B5015_BK_XM|                 \
6673      SP_B5015_BK2_XM|SP_B5015_BAB_XM|SP_B5015_BAB2_XM|SP_B5015_BABR_XM|SP_B5015_BABR2_XM|                \
6674      SP_B5015_ON_XM|SP_B5015_ON2_XM)(|L))|(4-5*SP_B5020_(83550|83646|83717|83735)(|L))|(4-5*SP_TANK50)|  \
6675      (4-5*SP_H70(18_401472|18_401520|16_401211)_PS2003(|L))|                                             \
6676      (4-5*SP_(XP_659500|B5047_651679|B5047_651400|B5047_651663)(|L))|                                    \
6677      (4-5*SP_A5017_(190000|192000|208360|208366)(|L))
6678  #  Freigt E4 long
6679  $DEF USA4FSP=5-6*USA4FSPS,SP_CAP_BAY2
6680  #  Freigt E6 short
6681  $DEF USA6FSPS=(5-6*(SP_XP_A302_16768|SP_26685_XM_USRASS|SP_27310_XM_USRASS)(|L))|                       \
6682      (4-5*SP_B10046_654809(|L))|(4-5*SP_LO_490123(|L))
6683  #  Freigt E6 long
6684  $DEF USA6FSP=(20*SP_AUTORACK(2|1))|(25-28*SP_ACF4650(|L))|(5-6*(USA6FMIXK|USA6FSPS))
6685
6686  # USA Spokane Portland & Seattle Railroad
6687  #  Freigt E4
6688  $DEF USA4FSPSLS=USA4FMIXK|(4-6*SPS_10(011|106|237)_XM_USRADS(|L))|(4-6*SPS_40XM)
6689  #  Freigt E4 long
6690  $DEF USA4FSPSL=6*USA4FSPSLS
6691
6692  # USA St. Louis Southwestern Railway (Cotton Belt)
6693  #  Freigt E3 short
6694  $DEF USA3FSSWS=(4-5*SSW_XP_61144(|L))|(4-5*SSW_XM_33950(|L))|USA3FMIXK
6695  #  Freigt E3 long
6696  $DEF USA3FSSW=5-6*USA3FSSWS,SSW_1(0|1)(|L)
6697  #  Freigt E4 short
6698  $DEF USA4FSSWS=(4-5*SSW_(48266|47570|48266)_PS1(|L))|(4-5*SSW_(LO_77088|77131|77167)_PS2003(|L))|       \
6699      (4-5*SSW_XM_33950(|L))|USA4FMIXK
6700  #  Freigt E4 long
6701  $DEF USA4FSSW=5-6*USA4FSSWS,SSW_1(0|1)(|L)
6702  #  Freigt E6 short
6703  $DEF USA6FSSWS=(4-5*SSW_7(8656|4179)_LO4650(|L))|(4-5*SSW_ACF4650(|L))|(4-5*SSW_NSC50HC2(|L))|          \
6704      (4-5*SSW_XPA_65085(|L))|(4-5*(SSW_FM_85500(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))
6705  #  Freigt E6 long
6706  $DEF USA6FSSW=6*USA6FSSWS
6707
6708  # USA Texas Pacific
6709  #  Freigt E2 short
6710  $DEF USA2FTPS=(4-5*TP_17899_GB(|L)[O:SCRAP(5|6)(|[M])])|(4-6*TP_1937AAR_XM_40692(|L))|USA2FMIXK
6711  #  Freigt E2 long
6712  $DEF USA2FTP=5-6*USA2FTPS,WEYT_3CAB
6713  #  Freigt E4 short
6714  $DEF USA4FTPS=(4-5*TP_LO_706059(|L))|(4-5*TP_17899_GB(|L)[O:SCRAP(5|6)(|[M])])|USA4FMIXK
6715  #  Freigt E4 long
6716  $DEF USA4FTP=5-6*USA4FTPS,WEYT_3CAB
6717
6718  # USA Trona Railway
6719  #  Freigt E3 short
6720  $DEF USA3FTRCS=(4-6*TRC_XM_200(|L))|USA3FMIXK
6721  #  Freigt E3 long
6722  $DEF USA3FTRC=6*USA3FTRCS,WEYT_3CAB
6723
6724  # USA Union Pacific Railroad
6725  #  Freigt E2
6726  $DEF USA2FUP=2*UP_(B5019_1937|S4012_46863D)(|L),                                                        \
6727      ((8*BOX_(11|12|18|21|13|17|24|25|26|19|20|23|14|15|22|33))|(8*(UP_PS40(|BS)(|L)|UP_BOX(6|5|7)))),   \
6728      3*USA2FMIXK,UP_CABBB|UP_CAB8B
6729  #  passenger E3 left
6730  $DEF USA3PUPL=(<UP_RPO,UP_COACH,UP_CS_COACH,UP_DINER,UP_DOME1,UP_COACH,UP_DOODLEBUG)
6731  #  passenger E3 right
6732  $DEF USA3PUPR=(<UP_DOODLEBUGL,UP_CS_COACH,UP_CHAIR,UP_DOMEDIN8000L,UP_CS_COACH,UP_DOME2,UP_BAG)
6733  #  Freigt E3 short
6734  $DEF USA3FUPS=(4-5*UP_FLT_HZ~NEK)|(4-5*(((UP_GON~KDS|UP_GONL)[O:SAND(2|13|11|12)(|[M])])))|             \
6735      (4-5*(UP_REF50|UP_BOX13))|(4-5*UP_CHOP)|(4-5*UP_162300_PS1(|L))|(4-5*UP_BOX(6|5|7|40BD))|           \
6736      (4-5*UP_(PS40(|BS)|S4017_42600)(|L))|USA3FMIXK|(4-5*UP_(CH7014_11740|LO_1148)_PS2003(|L))|          \
6737      (4-5*UP_XM_PS1_B5040(|L))|(4-6*UP_B5019_19(47|49|53|56|63)(|L))|(4-5*UP_(BOX11|EXP4|BOX10))|        \
6738      (4-6*UP_XM_PS1_B5040_19(53|56|63)(|L))|(4-6*UP_(XP_517142|XP_517141|BI7016_451276)(|L))
6739  #  Freigt E3 long
6740  $DEF USA3FUP=(20*((UP_2HOP1[O:COAL(27|5|3|34)(|[M])])|(UP_HOPBB|UP_3HOP(N|E)(|L)[O:COAL(27|5|3|34)(|[M])])))| \
6741      (5-6*USA3FUPS),UP_TCAB2|UP_CABOOSE|UP_CABBB|UP_CAB3|UP_CAB8B
6742  #  Freigt E4 short
6743  $DEF USA4FUPS=(4-6*UP_G52)|(4-6*(UP_162300_PS1(|L)|UP_BOX12))|(4-6*UP_BETHGON2)|                        \
6744      (4-6*(BNSF_546054(|L)([O:PIPE19,,11]|[O:PIPE44,20,11][O:PIPE44,84,11])))|                           \
6745      (4-6*UP_B5052_126(030|000)(|L))|(4-6*UP_G904_(98299|98250)(|L))
6746  #  Freigt E4 long
6747  $DEF USA4FUP=5-6*USA4FUPS,UP_CABBB|UP_CAB8B
6748  #  Freigt E6 short
6749  $DEF USA6FUPS=(4-6*UP_89AR(|2))|(4-6*UP_AUTORACK(|1|2))|USA6FMIXK|(4-6*UP_PS4750SO0(2|3|4|1)(|L))|      \
6750      (4-6*UP_BETHGON2(|L)[O:SAND(2|13|11|12)(|[M]),,39])|(4-6*UP_AUTOMAX)|(4-6*UP_LO_21328(|L))|         \
6751      (4-6*UP_BOX60A|UP_GU60HC(|L))|(4-6*UP_CB60)|(4-6*(UP_ACF_SILO|UP_CHOP1))|(4-6*UP_NSC50HC2(|L))|     \
6752      (4-6*UP_980212_XPA(|L))|(5*UP_THR73CB(|L)[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])|                      \
6753      (4-6*UP_89FLAT2[O:TANK3|TARP12|MACHINE(2|1|2)])|(5*(UP_G52[O:SCRAP_1(2|3|4|5)(|[M]),,29]))|         \
6754      (4-6*UP_F7015_54600(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11])|(4-6*UP_PS4740SO0(2|1)(|L))|            \
6755      (4-6*UP_LO_(21483|21498|78758)(|L))
6756  # Freigt E6 long
6757  $DEF USA6FUP=6*USA6FUPS
6758
6759  # Union R.R. Co. (Pittsburgh, PA)
6760  #  Freigt E3 short
6761  $DEF USA3FURRS=(4-5*URR_527_FM(|L)[O:BETONPIPE2,10,11][O:BETONPIPE2,98,11])|USA3FMIXK
6762
6763  # USA Utah Railway Company
6764  #  Freigt E4 short
6765  $DEF USA4FUTAS=5-6*(UTAH_HT_3100(|L)[O:COAL(32|22)(|[M]),,33])|USA2FMIXK
6766  #  Freigt E4 long
6767  $DEF USA4FUTA=5*USA4FUTAS,WEYT_3CAB
6768
6769  # USA Virginian Railroad
6770  #  Freigt E3 short
6771  $DEF USA3FVIRS=USA3FMIXK|(5-6*VGN_BX15_63100(|L))|(5-6*VIRG_AX1_62023(|L))|(4-6*VIRG_BX12_63041(|L))|   \
6772      (4-6*VGN_3233_HM_USRA(|L))
6773  #  Freigt E3 long
6774  $DEF USA3FVIR=6*USA3FVIRS,WEYT_3CAB
6775
6776  # USA The Western Railway of Alabama
6777  #  Freigt E3 short
6778  $DEF USA3FWAS=USA3FMIXK|(4-6*WA_XM_18250(|L))
6779  #  Freigt E3 long
6780  $DEF USA3FWA=5-6*USA3FWAS,WEYT_3CAB
6781
6782  # USA Wabash Railroad
6783  #  Freigt E4 short
6784  $DEF USA4FWABS=(4-5*WABR_GB_1263(3|0)(|L)[O:SCRAP(5|6)(|[M])])|(4-6*WABR_GB_13191(|L))|                 \
6785      (4-5*(WABR_79834_XM_USRADS|WABR_PS40)(|L))|USA4FMIXK|                                               \
6786      (4-5*(WABR_FM_437(|L)[O:(TARP(10|12)|CABLE14)(|[M]),,11]))|                                         \
6787      (4-5*WABR_(74050|35500|35599)_HM_USRA(|L)[O:COAL(39|37|38|9)(|[M])])|                               \
6788      (4-5*((WABR_79834_XM_USRADS|WABR_PS40)(|L)))
6789  #  Freigt E4 long
6790  $DEF USA4FWAB=5-6*USA4FWABS,WEYT_3CAB
6791
6792  # USA Wisconsin Central Limited GP30
6793  #  Freigt E4 short
6794  $DEF USA4FWCS=USA4FMIXK|(4-5*WC_(GU50HC(|L)|BOX50HI|XP_29039(|L)))
6795  #  Freigt E4 long
6796  $DEF USA4FWC=5-6*USA4FWCS,WEYT_3CAB
6797
6798  # USA Wheeling & Lake Erie Railway Company
6799  #  Freigt E3 short
6800  $DEF USA3FWLES=(4-5*WLER_GB_52013(|L)[O:SCRAP(5|6)(|[M])])|USA3FMIXK
6801  #  Freigt E3 long
6802  $DEF USA3FWLE=USA4FTANK|(6*USA3FWLES),WEYT_3CAB
6803
6804  # USA Western Maryland Railway
6805  # Freigt E2
6806  $DEF USA2FWMR=(5-10*WMR_26(541|309)_XM_USRASS(|L),4-6*WMR_34066_PS1(|L),3*USA3FMIXK)|                   \
6807      (20-25*WMR_5355_PS2003(|L)),WMR_NE_1800_1936(|L)
6808  # Freigt E3
6809  $DEF USA3FWMR=(5-10*WMR_26(541|309)_XM_USRASS(|L),4-6*WMR_34066_PS1(|L),3*USA3FMIXK)|                   \
6810      (20-25*WMR_5355_PS2003(|L)),WEYT_3CAB|WMR_NE_1811_1946(|L)|WMR_NE_1816_1953(|L)|WMR_NE_1821_1957(|L)
6811  # Freigt E4 short
6812  $DEF USA4FWMRS=(4-5*WMR_26(541|309)_XM_USRASS(|L))|(4-6*WMR_34066_PS1(|L))|USA3FMIXK|                   \
6813      (4-5*WMR_5355_PS2003(|L))|(4-5*WMR_PS50C_(34088|35069)(|L))|                                        \
6814      (4-6*WMR_G31_58097(|L)[O:(SCRAP_1(5|2|3|4)(|[M]),SCRAP_1(5|2|3|4)(|[M]))])
6815  # Freigt E4 long
6816  $DEF USA4FWMR=5-6*USA4FWMRS,WMR_NE_18(51_1969|61_1973)(|L)
6817
6818  # USA Western Pacific Railroad
6819  #  Freigt E4 short
6820  $DEF USA4FWPS=(4-5*WP_GB_6815(|L)[O:SCRAP(5|6)(|[M])])|(4-5*(WP_PS40|WP_36001_PS1|WP_3017_PS1))|        \
6821      (5-7*(WP_66003_RBL|WP_66021_RBL|WP_66036_RBL)(|L))|USA4FMIXK|                                       \
6822      (4-5*WP_2001_FM(|L)[O:MACHINE(1|2|3),,11])|(4-5*(WP_3801_PS1|WP_3983_PS1|WP_35001_PS1)(|L))|        \
6823      (4-5*WP_(11301|LO_11203|LO_11201)_PS2003(|L))|(4-8*(WP_PS40|WP_XP_3102(|L)))
6824  #  Freigt E4 long
6825  $DEF USA4FWP=5-7*USA4FWPS,WP_CAB(B2|4|5|7)
6826  #  Freigt E6 short
6827  $DEF USA6FWPS=(4-8*WP_LO_11975(|L))|(4-8*WP_CHOP)|(4-8*WP_PS40)|(4-8*WP_XPA_8607(3|4)(|L))|             \
6828      (4-8*WP_12006_LO4650(|L))|(1-2*USA6FMIXK)|(4-5*WP_XP_3770(|L))
6829  #  Freigt E6 long
6830  $DEF USA6FWP=5*USA6FWPS
6831
6832  #------------------------------------------------------------------------------
6833  #
6834  # Canada
6835  #
6836
6837  # Canada Freigt E4 Mixed
6838  $DEF CAN4FMIX=6*USA4FMIXK|(5-7*CPR_HS4550(A|B|SO03|SO04)(|L))
6839
6840  # British Columbia Railway
6841  # Freigt E4 short
6842  $DEF CAN4FBCOS=(4-5*BCOL_T(2|3|1)C(|L))|USA4FMIXK
6843  # Freigt E4 long
6844  $DEF CAN4FBCO=5-6*CAN4FBCOS,WEYT_3CAB
6845
6846  # Canadian National Railway
6847  # Freigt E3 short
6848  $DEF CAN3FCNS=(4-5*CN_1937AAR_XM_(471000|471010|471020|471030|471040|472000|472010|472020|472030|       \
6849      472040|472500|472520|472525|472530|472540|474000|474010|474020|474030|474040|474600|474610|474620|  \
6850      474630|474640|476625|476626|476627|476628|476629|480715|480716|480717|480718|484165|484166|484167|  \
6851      484168|485515|485516|485517|485518)(|L))|(4-5*CN_BX_1105(2|1)(|L))|USA3FMIXK|                       \
6852      (4-5*CN_FOWLER_404962(|L))
6853  # Freigt E3 long
6854  $DEF CAN3FCN=5-6*CAN3FCNS,CN_CAB_STEEL|CN_78102(|L)|CN_79707(|L)
6855  # Canadian National Railway
6856  # Freigt E4 short
6857  $DEF CAN4FCNS=4-5*(CN_BOX1|CN_BOX5|CN_BOX6|CN_BX_11053(|L))|USA4FMIXK
6858  # Freigt E4 long
6859  $DEF CAN4FCN=5-6*CAN4FCNS,CN_CAB_STEEL|CN_78102(|L)|CN_79707(|L)
6860  #  Freigt E6 short
6861  $DEF CAN6FCNS=(8-12*(CN_HS4550SO01|CN_HS4550SO02|CN_HS4550SO03|CNLX_HS4550SO01)(|L))|                   \
6862      (8-12*CN_PS4750SO0(1|2)(|L))|(8-12*CN_4HOP1)|(8-12*CN_GU50HC(|L))|(8-12*CN_PS4740SO01(|L))
6863  #  Freigt E6 long
6864  $DEF CAN6FCN=(25*CN_INTER([O:C40B,,13]|[O:C30A,21,13][O:C30A,111,13]))|(3*CAN6FCNS)
6865
6866  # Canada Canadian Pacific Railway
6867  # Freigt E3 short
6868  $DEF CAN3FCPRS=(4-6*CPR_1937AAR_XM_(222010|221000|222005|222000|248350|248360|249000|249010)(|L))|      \
6869      (4-5*(CPR_PS(40|1_31201)(|L)|CPR_XP_21120(1|5)(|L)))|                                               \
6870      (4-5*CPR_XM_PS1_26(8800|8830|9000|9100|9450|9300)(|L))|                                             \
6871      (4-5*CPR_22(5621|5069|5068|5623)_XM_ARA1932(|L))|(4-5*CPR_FOWLER_123456(|L))|                       \
6872      (4-6*CPR_357124_HM(|L)[O:(FR_COAL1|FR_COAL2|COAL20|COAL41|COAL9|COAL35)(|[M])])
6873  # Freigt E3 long
6874  $DEF CAN3FCPR=5-6*CAN3FCPRS,CPR_CAB(2|1)
6875  # Freigt E4 short
6876  $DEF CAN4FCPRS=(4-6*CPR_1937AAR_XM_(228200|252200)(|L))|(4-6*CPR_PS50C_89917(|L))|                      \
6877      (4-6*CPR_XM_PS1_26(9099|9630)(|L))|(4-6*CPR_XP_207125(|L))
6878  # Freigt E4 long
6879  $DEF CAN4FCPR=CAN4FCPRS,CPR_CAB(2|1)
6880  #  Freigt E6 short
6881  $DEF CAN6FCPRS=(5-8*CPR_G52)|(5-8*CPR_5161TRI(|L))|(5-8*CPR_PS40(|L))|(5-8*CPR_HS4550B(|L))|            \
6882      (5-8*CPAA_XPA_(205917|205945)(|L))|(5-8*CPR_XP_211(201|205)(|L))|                                   \
6883      (5-7*(CPR_CBF(1|2)[O:WRAPLUMBER(1|2|3),,10]))|(5-8*CPR_GAS)
6884  #  Freigt E6 long
6885  $DEF CAN6FCPR1=25*(CPR_CBF(1|2)[O:(WRAPLUMBER(1|2|3)|WRAPTIE1),,9])
6886  $DEF CAN6FCPR2=25*((CPR_524176[O:C40B,,13])|(CPR_524176[O:C30A,21,13][O:C30A,111,13]))
6887  $DEF CAN6FCPR3=23*CPR_GU60HC(|L)
6888  $DEF CAN6FCPR4=4*CAN6FCPRS
6889  $DEF CAN6FCPR=CAN6FCPR(1|2|3|4)
6890
6891  # Canada Ontario Northland Railway
6892  # Freigt E4 short
6893  $DEF CAN4FONTS=CAN4FCNS|(4-6*ONT_1937AAR_XM_90(820|645|644)(|L))
6894  # Freigt E4 long
6895  $DEF CAN4FONT=6*CAN4FONTS,WEYT_3CAB
6896  # Freigt E6
6897  $DEF CAN6FONT=(25*ONT_XP_A302_7839(|L))
6898
6899  # Canada Freigt E6 Tank
6900  $DEF CAN6FTANK=20*(CPWX_HS4550(|SO2)|CGLX_HS4550(|SO02|SO03|SO04)|CNWX_HS4550(A|B)|CPR_HS4550A)(|L)
6901
6902  #------------------------------------------------------------------------------
6903  #
6904  # Mexiko
6905  #
6906
6907
6908  # Ferrocarril del Pacifico, S.A. de C.V.
6909  # Freigt E4 short
6910  $DEF MEX4FFCPS=(4-6*FCP_XM_PS1_(3600|3500|3400)(|L))|(4-6*FCP_XM_(16216|16014|17604)(|L))|              \
6911      (4-6*(FCP_XM_4427|FUS_XM_1017|FUS_XM_1380|FCP_XM_17604)(|L))
6912  # Freigt E4 long
6913  $DEF MEX4FFCP=5-6*MEX4FFCPS,WEYT_3CAB
6914
6915  # Freigt E6 Ferrocarril Mexicano, S.D. de C.V.
6916  $DEF MEX6FFXE=(25*FXE_XP_A302_872004(|L))
6917
6918  # Ferrocarril Chihuahua al Pacifico
6919  # Freight E3 short
6920  $DEF MEX3FCGWS=(5-6*(CHP_X25_5704|CHP_XM_6041|CHP_XM_6217)(|L))|(4-6*CHP_XM_8007(|L))
6921  # Freight E3 long
6922  $DEF MEX3FCGW=(5-6*MEX3FCGWS),WEYT_3CAB
6923  # Freigt E4 short
6924  $DEF MEX4FCHPS=(4-6*CHP_XM_(8170|8007)(|L))|(4-6*FUS_XM_1380(|L))
6925  # Freight E4 long
6926  $DEF MEX4FCHP=5-6*MEX4FCHPS
6927
6928  # Freigt E6 Compania de Ferrocarriles Chiapas Mayab S.A. de C.V.
6929  $DEF MEX6FFNDM=5*FCCM_XP_180164(|L),                                                                    \
6930      (20*((NDEM_XP_A302_100932|NDEM_XP_A302_104073|NDEM_XP_A302_104090)(|L)))
6931
6932  # Ferrocarriles Nacionales de Mexico
6933  # Freigt E3 short
6934  $DEF MEX3FFNDMS=(5-6*NDEM_XM_(60000|60009|67000)(|L))|(5-6*NDEM_XM_(63004|63005|68183)(|L))|            \
6935      (5-6*FCM_XM_9416(|L))
6936  # Freigt E3 long
6937  $DEF MEX3FFNDM=5-6*MEX3FFNDMS,NDEM_44139(|L)
6938  # Ferrocarriles Nacionales de Mexico
6939  # Freigt E4 short
6940  $DEF MEX4FNDEMS=(4-5*NDEM_XP_A302_100932(|L))|(4-5*NDEM_XM_(66001|66896|78005|77810|76010|93484)(|L))
6941  # Freigt E4 long
6942  $DEF MEX4FNDEM=5-6*MEX4FNDEMS,NDEM_44139(|L)|FNDM_44071(|L)
6943  # Freigt E6
6944  $DEF MEX6FNDEM=(25*((NDEM_XP_A302_104073|NDEM_XP_A302_104090)(|L)))
6945
6946
6947  #------------------------------------------------------------------------------
6948  #
6949  # Japan
6950  #
6951  $DEF KOKI_1=JR_KOKI100AL|JR_KOKI100A|JR_KOKI101AL|JR_KOKI101A|JR_KOKI102_5AL|JR_KOKI102_5A|             \
6952      JR_KOKI103AL|JR_KOKI103A|JR_KOKI104AL|JR_KOKI104A|JR_KOKI104MAL|JR_KOKI104MA|JR_KOKI104L~OP|        \
6953      JR_KOKI104~OP|JR_KOKI106BAL~YUM|JR_KOKI106BA~YUM|JR_KOKI106BAL~OP|JR_KOKI104L~FOM
6954  $DEF KOKI_2=JR_KOKI100BL|JR_KOKI100B|JR_KOKI101BL|JR_KOKI101B|JR_KOKI102_5BL|JR_KOKI102_5B|             \
6955      JR_KOKI103BL|JR_KOKI103B|JR_KOKI104BL|JR_KOKI104B|JR_KOKI104MB|JR_KOKI106BBL~YUM|JR_KOKI106BB~YUM
6956  $DEF KOKI_5=JR_KOKI50000NL[BC:-30]
6957  $DEF KOKI_56=JRF_KOKI5500
6958  $DEF KOKI_5D=JR_KOKI50000NDL|JR_KOKI50000ND
6959
6960  $DEF KOKI11=KOKI_1                      [OB:C37_25,*99,10]
6961  $DEF KOKI12=KOKI_1           [OB:C37_25,*61,10][OB:C37_25,*137,10]
6962  $DEF KOKI13=KOKI_1[OB:C37_25,*23,11][OB:C37_25,*99,10][OB:C37_25,*175,10]
6963  $DEF KOKI14=KOKI_1[OB:C37_25,*23,11][OB:C37_25,*61,10][OB:C37_25,*137,10][OB:C37_25,*175,10]
6964  $DEF KOKI15=KOKI_1[OB:C37_25,*23,11][OB:C37_25,*61,10][OB:C37_25,*99,10][OB:C37_25,*137,10]             \
6965      [OB:C37_25,*175,10]
6966  $DEF KOKI16=KOKI_1[OB:C37_25,*23,11][OB:C61_25J,*99,10][OB:C37_25,*175,10]
6967
6968  $DEF KOKI21=KOKI_2            [OB:C61_25J,*98,10]
6969  $DEF KOKI22=KOKI_2[OB:C61_25J,*34,10][OB:C61_25J,*162,10]
6970  $DEF KOKI23=KOKI_2[OB:C61_25J,*34,10][OB:C61_25J,*98,10][OB:C61_25J,*162,10]
6971  $DEF KOKI24=KOKI_2[OB:(C94,1,C94),*98,10]
6972  $DEF KOKI25=KOKI_2[OB:C40B,*98,10]
6973  $DEF KOKI26=KOKI_2[OB:C37_25,*34,10][OB:C61_25J,*162,10]
6974
6975  $DEF KOKI55=KOKI_5[OB:C37_25,<9,10][OB:C37_25,*65,10][OB:C37_25,*103,10][OB:C37_25,*141,10]             \
6976      [OB:C37_25,>198,10]
6977  $DEF KOKI54=KOKI_5[OB:C37_25,<9,10][OB:C37_25,*65,10][OB:C37_25,*141,10][OB:C37_25,>198,10]
6978  $DEF KOKI53=KOKI_5[OB:C37_25,<9,10][OB:C37_25,*103,10][OB:C37_25,>198,10]
6979  $DEF KOKI52=KOKI_5           [OB:C37_25,*65,10][OB:C37_25,*141,10]
6980  $DEF KOKI51=KOKI_5                      [OB:C37_25,*103,10]
6981
6982  $DEF KOKI521=KOKI_5[OB:(C61_25J,1,C61_25J,1,C61_25J),*103,10]
6983  $DEF KOKI522=KOKI_5[OB:(C61_25J,13,C37_25,13,C61_25J),*103,10]
6984  $DEF KOKI523=KOKI_5[OB:C37_25,<9,10][OB:C61_25J,*103,10][OB:C37_25,>198,10]
6985  $DEF KOKI524=KOKI_5[OB:C61_25J,*103,10]
6986
6987  $DEF KOKIA=KOKI(10:55|3:54|3:53|52|51)
6988  $DEF KOKIB=KOKI(55|54|2:521|522|523|524)
6989  $DEF KOKIE=KOKI(55|54|53|52|51)
6990
6991  $DEF KOKIC=10:KOKI15|3:KOKI14|3:KOKI13|1:KOKI12|1:KOKI11
6992  $DEF KOKIF=10:KOKI23|3:KOKI22|2:KOKI21
6993  $DEF KOKIG=KOKIC|KOKIF
6994
6995  $DEF KOKIH=KOKI_56[OB:C33_24,*25,11][OB:C33_24,*59,11][OB:C33_24,*93,11][OB:C33_24,*127,11]             \
6996      [OB:C33_24,*161,11]
6997  $DEF KOKII=KOKI(7:24|21|22|23|25|26)
6998
6999  $DEF KOKI5D5=KOKI_5D[OB:C37_25D,<9,10][OB:C37_25D,*65,10][OB:C37_25D,*103,10][OB:C37_25D,*141,10]       \
7000      [OB:C37_25D,>198,10]
7001  $DEF KOKI5D4=KOKI_5D[OB:C37_25D,<9,10][OB:C37_25D,*65,10][OB:C37_25D,*141,10][OB:C37_25D,>198,10]
7002  $DEF KOKI5D3=KOKI_5D[OB:C37_25D,<9,10][OB:C37_25D,*103,10][OB:C37_25D,>198,10]
7003  $DEF KOKI5D2=KOKI_5D            [OB:C37_25D,*65,10][OB:C37_25D,*141,10]
7004  $DEF KOKI5D1=KOKI_5D                        [OB:C37_25D,*103,10]
7005
7006  $DEF KOKID=10:KOKI5D5|3:KOKI5D4|3:KOKI5D3|1:KOKI5D2|1:KOKI5D1
7007  #
7008  # Train
7009  #
7010  # Freight E2
7011  $DEF J2FS1=(3-5*(J_FC0003_3,J_FC0008_1,JR_WAMU23000,JR_GO1,JR_TOMU50000))|                              \
7012      (3-5*(JR_G(1|3|4)|JR_TOM(1L|4)),3-6*(JR_GT2|JR_TM42))|                                              \
7013      (3-5*(JR_TOM7[O:BOX6,,11]|JR_TOM8[OB:WOOD18(3|4)(|[M]),,11]))|                                      \
7014      (3-5*(JR_TOM10|JR_G8|JR_G9|JR_G6|JR_G7|J_FC0003_2|JR_TORA60000A))
7015
7016  $DEF J2FL1=J_FC0009_(1|3)(|A)|J_FC0004_(1|2)|JR_YO8000HL|J_FC0011_(1|2)(|A),5*J2FS1
7017  # Passenger long distance E2
7018  $DEF J2PL1=JNR_KANI29L_0|JNR_KANI29_0,                                                                  \
7019      (<JNR_SUYUNI30AL|JNR_SUYUNI30A,JNR_OHA31L|JNR_OHA31,JNR_OHA27BL|JNR_OHA27B,                         \
7020      JNR_OROHA30L|JNR_OROHA30|JNR_ORO30L|JNR_ORO30|JNR_ORO31L|JNR_ORO31,JNR_OHA26|JNR_OHA26L,            \
7021      JNR_OHA27AL|JNR_OHA27A)
7022  # Passenger regional E2
7023  $DEF J2PR1=(<JNR_OHAYUNI71L,JNR_OHA70BL,JNR_OHA71BL,JNR_OHA70AL,JNR_OHA71AL,JNR_OHAYUNI71L)|            \
7024      (<JNR_OHAYUNI71,JNR_OHA70B,JNR_OHA71B,JNR_OHA70A,JNR_OHA71A)
7025
7026  # Freight E6 Container
7027  $DEF J6FLC1=15*KOKID
7028
7029  # Freight E6 short
7030  $DEF J6FS1=(2-3*(JR_TAKI88(50J|53AD|53AK|58|55|60|61)|JR_TAKI9250D(1|2|K)(|L)|JR_TAKI9250D(1|2|K)(|L)))| \
7031      (2-3*(JR_TAKI3700D0L|JR_TAKI3700D0|JR_TAKI3700D1L|JR_TAKI3700D1|JR_TAKI3700D2L|JR_TAKI3700D2|       \
7032      JR_TOKI29400S|JR_TOKI25000NEW|JR_TOKI29400|JR_TOKI25000NS|JR_TOKI29400K))|(2-3*(JR_G5|JR_G16))|     \
7033      (2-3*(JR_HOKI9800B|JR_HOKI98|SEIBU_HOKI))|                                                          \
7034      (2-3*(JR_WAKI10000TEST1|JR_WAKI10000TEST2|JR_WAKI10000A2|JR_WAKI10000A3|JR_WAKI10000A|              \
7035      JR_WAKI10000B2|JR_WAKI10000B3|JR_WAKI10000B|JR_WAKI10000|JR_WAKI10000CARTRAIN|JR_WAKI50000A2|       \
7036      JR_WAKI50000A3|JR_WAKI50000B2|JR_WAKI50000B3|JNR_WAKI8000L|JNR_WAKI8000|JR_WAKI8000))|              \
7037      (2-3*(JR_N8000AL,JR_N8000A,JR_N8000BL,JR_N8000B))|(JRF_KOKI71)|                                     \
7038      (2-3*(JR_TAKI1000G|JR_TAKI1000G2|JR_TAKI1000O3L|JR_TAKI1000O3|JR_TAKI1000B1|JR_TAKI1000B2|          \
7039      JR_TAKI1000B3))|                                                                                    \
7040      (2-3*(JR_TAKI1900CL|JR_TAKI1900C|JR_TAKI1900CTL|JR_TAKI1900CT|JR_TAKI1900DL|JR_TAKI1900D|           \
7041      JR_TAKI1900H1L|JR_TAKI1900H1|JR_TAKI1900H2L|JR_TAKI1900H2|JR_TAKI1900ML|JR_TAKI1900M|               \
7042      JR_TAKI1900MS1L|JR_TAKI1900MS1|JR_TAKI1900MS2L|JR_TAKI1900MS2|JR_TAKI1900MTL|JR_TAKI1900MT|         \
7043      JR_TAKI1900NL|JR_TAKI1900N|JR_TAKI1900O1L|JR_TAKI1900O1|JR_TAKI1900O2L|JR_TAKI1900O2|               \
7044      JR_TAKI1900O3L|JR_TAKI1900O3|JR_TAKI1900STL|JR_TAKI1900ST|JR_TAKI1900A|JR_TAKI1900SUMITOMO))|       \
7045      (2-3*((JR_TAKI20600J|JR_TAKI21350H)(|L)|(JR_TAKI205(18NY|13NY2|13NY1|00J|00N|00MT2|00MT1)(|L))|     \
7046      JR_TAKI9200(SH|J|KD)))
7047
7048  # Freight E6 Car
7049  $DEF J6FLA1=14*(JR_K5000B|JR_KU5000D|JR_KU5000E)
7050
7051  # Freight E6 open
7052  $DEF J6FLO1=15*((JR_HOKI9500YAHASHI2|JR_HOKI9500YAHASHI1)[OB:(SAND16|FR_SAND1|SAND15)(|[M]),,23]|       \
7053      J_LIME|J_HOKI95(A|B|C|D|E|F|G|H|I|J|K|L))
7054
7055
7056
7057  # Freight E6 long mixwd
7058  $DEF J6FLM1=7*J6FS1
7059
7060  # Freight E6 long all
7061  $DEF J6FLA=J6FLM1|J6FLC1|J6FLA1|J6FLO1
7062
7063  #------------------------------------------------------------------------------
7064  #
7065  # Australia
7066  #
7067  # Freight 1435 mm EP 4 Victorian Railway
7068  $DEF AUS4FV=3-4*VIC_ELX,4-6*(VIC_GY3|VIC_GY4|VIC_GY2|VIC_GY6|VIC_I),                                    \
7069      4-6*(VIC_IT205L|VIC_IT205|VIC_IT205WL|VIC_IT205W|VIC_IC12137),                                      \
7070      4-6*(VIC_T154|VIC_B|VIC_B102|VIC_B328|VIC_T252|VIC_T457),3-4*VIC_BLF130(|L)
7071
7072  # Freight 1435 mm EP 4
7073  $DEF AUS4F1=6-8*(VIC_GY3|VIC_GY4|VIC_GY2|VIC_GY6|VIC_I),                                                \
7074      6-8*(VIC_IT205L|VIC_IT205|VIC_IT205WL|VIC_IT205W|VIC_IC12137),                                      \
7075      6-8*(VIC_T154|VIC_B|VIC_B102|VIC_B328|VIC_T252|VIC_T457)
7076
7077
7078  #  Freight 1435 mm EP 6 Freight Australia
7079  $DEF AUS6FFA=(12-15*(FA_VPBX(|L)))
7080
7081  #  Freight 1435 mm EP 6 Australian National Railway
7082  $DEF AUS6FNR=(12-15*(ANR_RBFX|ANR_RBFX1|ANR_VFX|ANR_ABFX))|(16-18*(ANR_83(22|45|15)(|L)))
7083
7084  #  Passenger 1435 mm EP 6 Australian National Railway
7085  $DEF AUS6PNR=(ANR_IPBL,4*ANR_IPCL,ANR_IPDL,ANR_IPSL,3*ANR_IPCL)|                                        \
7086      (ANR_IPB,3*ANR_IPC,ANR_IPD,ANR_IPS,4*ANR_IPC)
7087
7088  # Freight 1435 mm EP 6 Freight Australia Pacific National
7089  $DEF AUS6FPN=(16-18*PN_VH(G|Q)F(|L))|(16-18*PN_VPBX(|L))
7090
7091  # Freight 1435 mm EP 6 V-Line
7092  $DEF AUS6FVL=(16-18*(VL_DT331|VL_VLCX))|(16-18*VL_VPBX(|L))
7093
7094  # Freight 1435 mm EP 6 Victorian Railway
7095  $DEF AUS6FVI=(16-18*(VIC_VPCX|VIC_VPFXL|VIC_VPFX|VIC_VPFXBUL|VIC_VPFXBU))|                              \
7096      (16-18*(VIC_VHGY1|VIC_VHGFL|VIC_VHGF|VIC_VHGF2L|VIC_VHGF2|VIC_VHGY2))|                              \
7097      (16-18*(VIC_JAFL|VIC_JAF|VIC_VHBYL|VIC_VHBY|VIC_JDFL|VIC_JDF))|
7098
7099  # Freight 1435 mm EP 6 Container Victorian Railway
7100  $DEF AUS6FCVI=16-18*(VIC_VQDW[O:C40A,11][O:C40A,131,10]|FA_V(QL|QF|EC)X[O:C40A]|                        \
7101      FA_V(QL|QF|EC)X[O:C30A,10,10][O:C30A,100,10])
7102
7103  # Freight 1435 mm EP 6 Container Freight Australia
7104  $DEF AUS6FCF=16-18*(FA_VEDW[O:C40A,11][O:C40A,131,10]|(FA_V(QL|QF|EC)X[O:C30A,10,10][O:C30A,100,10])|   \
7105      ((FA_V(QL|QF|EC)X)[O:C40A])|                                                                        \
7106      FA_VEKX(([O:C40A,18,9][O:C20A,139,9])|([O:C40A,18,9])|([O:C20A,18,9][O:C40A,79,9]))|                \
7107      FA_VEKX(([O:C2_FREIGHTAUSTR(2|1|3|4|5|6),17,9][O:C2_FREIGHTAUSTR(2|1|3|4|5|6),79,9]                 \
7108      [O:C2_FREIGHTAUSTR(2|1|3|4|5|6),141,9])))
7109
7110  # Freight 1435 mm EP 6 Container New South Wales
7111  # shunting
7112  $DEF AUS6FCNSS=4-5*NSW_NQOX([O:C40A,10][O:C20A,131,13]|[O:C40B,70]|[O:C30A,10][O:C30A,101,13]|          \
7113      [O:C20A,10][O:C20A,61,13])
7114  # long
7115  $DEF AUS6FCNS=16-18*NSW_NQOX([O:C40A,10][O:C20A,131,13]|[O:C40B,70]|[O:C30A,10][O:C30A,101,13]|         \
7116      [O:C20A,10][O:C20A,61,13])
7117
7118  # Freight 1435 mm EP 6 Container Australia Pacific National
7119  $DEF AUS6FPNC=16-18*((FA_VEDW[O:C40A,11][O:C40A,131,10])|(PN_RQHY(|L)[O:C40A])|                         \
7120      (PN_RQHY(|L)[O:C30A,10,10][O:C30A,100,10]))
7121
7122  # Freight 1435 mm EP 6 Container Chicago Freight Car Leasing Australia
7123  $DEF AUS6FCP=16-18*((CFCLA_CQBY(1|2)(|L)[O:C40A])|(FCL_PRRY(|L)[O:C20A,23,11][O:C20A,83,11])|           \
7124      (FCL_PRRY(|L)[O:C40A,,11])|(CFCLA_CQBY(1|2)(|L)[O:C30A,10,10][O:C30A,100,10]))
7125
7126  # Freight 1435 mm EP 6
7127  $DEF AUS6FS=(4*VL_VHCX(|L))|(2*AWB_NGXH,2*VIC_ELX)|(3*FA_VHBF)|(5*ANR_(VFX|RBFX1|RBFX))|                \
7128      (4-5*FA_VHGF(|2)(|L))|(4-5*FA_VHJX(|L))|(4-5*PN_VHQF(|L))|                                          \
7129      (4-5*(VIC_VHCA16L|VIC_VHCA16|VIC_VHJA|VIC_VHC131|VIC_VHC131L))|(4-5*NSW_NGMF(1|2|3|4|5|6))|         \
7130      (4-5*(NSW_NODY1T|NSW_NODY(1|2)))|(6-8*NSW_NHGF)|(5-7*NSW_NGTY(|L))|(5-7*NSW_NODY(3T|2T|2T1))|       \
7131      (4-5*NSW_NKHY(1|2|1S|2S))
7132  $DEF AUS6F1=4-5*AUS6FS
7133
7134  # Freight 1000
7135  #  Freight 1000 mm EP 6 Queensland Rail short
7136  $DEF AUS6FQRS=(4-6*(QR_QLXSO(01|02|03|04|05|06|07|08|09|10)(|L)))|(4-6*(QR_KOJXSO0(1|2|3|4|5|6)(|L)))|  \
7137      (4-6*(QR_QCSSO0(1|2|3|4)(|L)))|(4-6*(QR_KLEXSO0(1|2|3|4|5|6)(|L)))|(4-6*(QR_PJZY1(|L)))|            \
7138      (4-6*(QR_GN(01|02|SO03|SO04)(|L)[O:SAND(6|9|10|12|7|11)(|[M])]))|                                   \
7139      (4-6*(QR_VOSO0(1|2|3|4)(|L)[O:SAND(6|9|10|12|7|11)(|[M])]))|                                        \
7140      (4-6*(QR_VAJQSO0(1|2|3|4|5|6)(|L)[O:SAND(6|9|10|12|7|11)(|[M])]))|                                  \
7141      (4-6*(QR_VSASO0(1|2|3|4)(|L)[O:SAND(17|18|19|21|22|20)(|[M]),,31]))|(4-6*(QR_VMOSO0(1|2|3|4)(|L)))
7142  #  Freight 1000 mm EP 6 Queensland Rail long
7143  $DEF AUS6FNQ1=5:(5*AUS6FQRS)|1:(15-20*QR_BEZY1(|L)[O:C60B,,10])
7144
7145  #---------------------------------------------------------------------------
7146  #
7147  # New Zeeland
7148  #
7149
7150  $DEF NZEF6FS=(4-6*(QR_QLXSO(06|10)(|L)))|(4-6*(QR_GN02(|L)[O:SAND(|[M])(6|9|10|12|7|11)]))|             \
7151      (4-6*(QR_VOSO0(3|4)(|L)[O:SAND(|[M])(6|9|10|12|7|11)]))
7152  $DEF NZEF6F=(5*NZEF6FS)
7153
7154  #------------------------------------------------------------------------------
7155  #
7156  # Marokko
7157  #
7158  # Passenger EP 5
7159  $DEF MAR5P1=2*ONCF_YRZ,2*ONCF_YZ
7160
7161  # Freight EP 5
7162  $DEF MAR5F1=(15*(ONCF_TDD|ONCF_TDGW93|ONCF_TAEMS))
7163
7164
7165  #------------------------------------------------------------------------------
7166  #
7167  # SOUTH AFRICA
7168  #
7169  # Freight long EP 5
7170  $DEF SAR5FL1=(20*SAR_HOP(1|2|3|4))|(10*SAR_FLAT1,10*SAR_TANK1)
7171
7172  #------------------------------------------------------------------------------
7173  #
7174  # Israel
7175  #
7176  # Freight  EP 5
7177  $DEF ISR5F1=10*(IR_SG|IR_SGGNSS|IR_GS|IR_GBS|IR_TDS|IR_TAOOS|IR_UACS|IR_UAPPS|IR_RS)
7178
7179
7180
7181  #------------------------------------------------------------------------------
7182  #
7183  # Asia
7184  #
7185  # Freight Asia EP 5
7186  $DEF ASI5F1=3*((6*(JR_TOKI15000|JR_TOKI15000A))|(7*JR_SEKI3000)|(6*JR_HOKI2200B)|(5*JR_N8000A)|         \
7187      (7*(JR_TAKI3734CS|JR_TAKI3743D1|JR_TAKI7750SD2N|JR_TAKI1900K))|(5*JR_TEC931S(|L))|                  \
7188      (6*(J_HOKI95A|J_HOKI95C|J_HOKI95B|J_HOKI95D|J_HOKI95E|J_HOKI95F|J_HOKI95H|J_HOKI95I|J_HOKI95J|      \
7189      J_HOKI95K|J_HOKI95L)))
7190
7191  #------------------------------------------------------------------------------
7192  #
7193  # India
7194  #
7195  $DEF INDP1=(INR_LR2,2*INR_CS1,INR_C31,INR_C32,INR_CS1)|(2*INR_CC1,INR_CC2,3*INR_CC1)
7196
7197  # Freight EP 6
7198  $DEF INDF1=<(4-5*INR_BXN(1|2|3)),INR_BCAL[O:C40C,*80,10],(2*INR_BCB[O:C40C,*64,11]),                    \
7199      INR_BCA[O:C40C,*65,10],4-5*INR_BTP(1|2),4-5*INR_BCN(1|2|3)
7200
7201  $DEF INDF2S=(2-4*INR_UTC_BCCWC_RCU44(6|5)(|L))|(2-4*INR_BVZI(|L))|                                      \
7202      (2-4*INR_BLC(B|A)M(|L)[O:C40C,*64,10])|(2-4*INR_BCMCBAA(M|E)(|L))|(2-4*INR_(S|E)R_BCN(|L))|         \
7203      (2-4*INR_BCNA(|HS)(|L))|(2-4*INR_BCC(W_V|W_V200|_BCCN)(|L))|(2-4*INR_ACC_BCCM_BC(09137|95081)(|L))
7204
7205  $DEF INDF2L=8*INDF2S
7206
7207  #------------------------------------------------------------------------------
7208  #
7209  # China
7210  #
7211  # Freight  EP 4
7212  $DEF CHN4FS=(2-3*CR_25BY)|(2-3*CR_B4)|(2-3*CR_22K2)|(2-3*CR_22)|(2-3*CR_B3)|                            \
7213      (2-3*CR_C63T|CR_C63|CR_C62C|CR_C60)|(2-3*CR_COKE)|(2-3*CR_COAL)|(2-3*CR_BOX(1|2))|                  \
7214      (2-3*CR_T17|CR_T17E|CR_T17Y)|(2-3*CR_HOP)|(2-3*CR_FLAT|CR_FLATWE|CR_FLATS|CR_FLATW)|(2-3*CR_25B)
7215
7216  $DEF CHN4FS1=2*CHN4FS
7217  $DEF CHN4FL1=CR_CAB,7*CHN4FS
7218
7219  # Passenger EP 4
7220  $DEF CHN4P1=(<CR_XL22,2*CR_YZ22,CR_YW22,CR_CA23,CR_RW22,CR_RZ22,2*CR_YZ22)
7221
7222  #------------------------------------------------------------------------------
7223  #
7224  # Malaysia
7225  #
7226  # Freight Nalaysia EP5
7227  $DEF MAL5FS1=(3*KTM_BLW)|(3*KTM_BCF[O:C40C,*79,9])
7228
7229  #------------------------------------------------------------------------------
7230  #
7231  # Myanmar / Burma
7232  #
7233  # Passenger Myanmar EP5
7234  $DEF MYA5P1=6*(MYA_P(1|2|2O|3|4|5|5A|6|8|7))
7235
7236
7237  # Freight Myanmar EP5
7238  $DEF MYA5F1=4*MYA_G1,6*MYA_T1,5*MYA_G2
7239
7240  #------------------------------------------------------------------------------
7241  #
7242  # South America
7243  #
7244  # Freight South America 1672 mm EP 3
7245  $DEF SAM3F1=(10*(SEFEPA_BOX1|PRR_F22(|L)|WEYT_3FLAT[O:WOOD1(96|95|91|97|98|92|94|93)]|SHAY_GON(4|3|1|2)))| \
7246      (10*(LC_410_PS2003(|L)))
7247
7248  # Freight South America 1672 mm EP 4
7249  $DEF SAM4F1=(10*SEFEPA_BOX1)|(10*PRR_GR_ASBUILT_LW(|L))|(10*PRR_X29_1932KEROSENE(|L))|                  \
7250      (10*CDLX_763_TMI_ACF27(|L))
7251
7252  # Freight South America 1672 mm EP 6
7253  $DEF SAM6F1=(12*(GATX_TANK55|CCBX_TANK55L|OWIX_TANK54L|CPCX_TANK54L|ACFX_TANK50|HOKX_TANK43L))|         \
7254      (15*(CNA_XP_A302_549304L|HS_GU50HC|HS_GU50HCL|MMA_GU50HC,                                           \
7255      HS_GU50HC|LRS_XP_A302_4081|HS_GU50HCL|HS_GU50HCL|MMA_GU50HC|HS_GU50HC))|                            \
7256      (12*SHAY_GON(1|2|3|4|5|6))|(15*(MRDX_AFLOOD2(|L)))|                                                 \
7257      (13*(BNSF_5161TRI|IC_TRI5161|BNSF_LO4750|WP_CHOP|ATSF_COVHOP)|(15*(US_3HOP(E|N)(|L))))
7258
7259  #-------------------------------------------------------------------------------------------------------
7260  #
7261  # Brasilia
7262  #
7263  # Freight 1000 mm EP 6
7264  $DEF BRA6F=5*(2-4*(EFVM_TCD|EFVM_HFE|FCA_HFE1|FCA_HFE2|FCA_TCD))
7265
7266  # Freight 1000 mm EP 6 ALL Brasilia
7267  $DEF BRA6NA=8*((2-3*(ALL_HFE(1|2|3)))|(2-3*(ALL_GF(C|D)))|(2-3*(ALL_FFD_(2|1|3)))|(2-3*(ALL_HAD))|      \
7268      (2-3*(ALL_HFD(2|1)))|(2-3*(ALL_TSC))|(2-3*(ALL_FBD)))
7269
7270  # Freight 1000 mm EP 6 FEP Brasilia
7271  $DEF BRA6NP=4*FEP_GFC,5*FEP_HFD,3*FEP_GFC
7272
7273  # Freight 1000 mm EP 6 RFFSA Brasilia
7274  $DEF BRA6NR=2*RFFSA_HAF,3*RFFSA_HFD1,RFFSA_GFD,4*RFFSA_HAD2,2*RFFSA_HAD1,2*RFFSA_HFD2,3*RFFSA_GFC,      \
7275      RFFSA_PED3,RFFSA_PED1,RFFSA_PED2
7276
7277  # Freight 1600 mm EP 6 FCA Brasilia
7278  $DEF BRA6NO=EFVM_TCD,FCA_TCD,FCA_TCD2,FCA_HFD2,EFVM_TCD,2*FCA_HFD1,ALL_HFE1,4*EFVM_HFD(1|2),5*FCA_HAD
7279
7280  #-------------------------------------------------------------------------------------------------------
7281  #
7282  # Chile
7283  #
7284  # Passenger Chile EFE 1672 mm EP 6
7285  $DEF CHI6P1=(<EFE_C2L,EFE_C3L,EFE_C4L,EFE_C5,EFE_C6,EFE_D1,EFE_D2,EFE_C1,EFE_TA(1|2),EFE_B(1|2))|       \
7286      (<EFE_B(1|2),EFE_TA(1|2),EFE_C1,EFE_D2,EFE_D1,EFE_C6,EFE_C5,EFE_C4,EFE_C3,EFE_C2)
7287
7288  # ) ] }