((prubaeConfig
  ()
  )
 (prubaeDoFunctions
  ;;; each element is
  ;;; '(code display_name item_name withOrWithout% numArgs args...)
  (
   ;;; SET 256+32+3 no% 2Args 1stArg:settable 2ndArg:single
   (291 "SET" "SET" () 2 set number)
   ;;; END 256+32+5 no% 0Args
   (293 "DONT_APPLY" "DONT_APPLY" () 0)
   ;;; RETURN 256+32+21 no% 1Arg 1stArg:any
   (309 "RETURN" "RETURN" () 1 any)
   ;;; RETTRUE 256+32+22 no% 0Args
   (310 "RETURN TRUE" "RETURN TRUE" () 0)
   ;;; RETFALSE 256+32+23 no% 0Args
   (311 "RETURN FALSE" "RETURN FALSE" () 0)
   ;;; AMOUNT 512+8 no% 2Args(currency and value)
   (520 "AMOUNT" "AMOUNT" t 2 const const)
   ;;; Apply_apdp 2048+509 no% 1Arg
   (2557 "Apply_apdp" "Apply_apdp" () 1 string)
   ;;; Apply_spa 2048+510 no% 2Args
   (2558 "Apply_spa" "Apply_spa" () 2 string string)
   ;;; Pfm 2048+1 with% 1Arg
   (2049 "Pfm" "Pfm" t 1 (string fbasis))
   ;;; Pfm_max 2048+2 with% 2Args
   (2050 "Pfm_max" "Pfm_max" t 2 (string fbasis) (string fbasis))
   ;;; Srp 2048+3 with% 0Args
   (2051 "Srp" "Srp" t 0)
   ;;; Np 2048+4 with% 0Args
   (2052 "Np" "Np" t 0)
   ;;; Apply_discount 2048+5 no% 1Arg tkdesign
   (2053 "Apply_discount" "Apply_discount" () 1 string)
   ;;; Tax_divid 2048+21 no% 1Arg
   ;;(2069 "Tax_divid" "Tax_divid" () 1 string)
   ;;; Discount 2048+23 no% 1Arg discount
   (2071 "Discount" "Discount" () 1 number)
   ;;; Multipath_amt 2048+25 no% 2Args
   (2073 "Multipath_amt" "Multipath_amt" () 2 number amount)
   ;;; Uncertain 2048+26 no% 1Arg
   (2074 "Uncertain" "Uncertain" () 1 number)
   ;;; Error 2048+32 no% 1Arg
   (2080 "Error" "Error" () 1 string)
   ;;; High_spa 2048+45 no% 0Args
   (2093 "High_spa" "High_spa" () 0)
   ;;; Low_spa 2048+46 no% 0Args
   (2094 "Low_spa" "Low_spa" () 0)
   ;;; High_spa_fix 2048+47 no% 1Arg
   (2095 "High_spa_fix" "High_spa_fix" () 1 amount)
   ;;; Low_spa_fix 2048+48 no% 1Arg
   (2096 "Low_spa_fix" "Low_spa_fix" () 1 amount)
   ;;; Net 2048+49 no% min0Args 0Args
   (2097 "Net" "Net" () 0)
   ;;; Srp_fix 2048+50 no% 1Arg
   (2098 "Srp_fix" "Srp_fix" () 1 amount)
   )
  )
 (prubaeJudgeFunctions
  ;;; each element is
  ;;; '(code display_name item_name numArgs args...)
  (
   ;;; = 256+32+17 2Args
   (305 "=" "=" 2 any first)
   ;;; = 256+32+18 2Args
   (306 "!=" "!=" 2 any first)
   ;;; = 256+32+19 2Args
   (307 ">=" ">=" 2 string first)
   ;;; Via 2048+9 1Arg
   (2057 "Via" "Via" 1 (string airport))
   ;;; Via_country 2048+10 1Arg
   (2058 "Via_country" "Via_country" 1 (string country))
   ;;; Gateway 2048+11 1Arg
   (2059 "Gateway" "Gateway" 1 (string airport))
   ;;; Gateway_country 2048+12 1Arg
   (2060 "Gateway_country" "Gateway_country" 1 (string country))
   ;;; RoundTheWorld_p 2048+13 0Args
   (2061 "RoundTheWorld_p" "RoundTheWorld_p" 0)
   ;;; Mileage_p 2048+14 0Args
   (2062 "Mileage_p" "Mileage_p" 0)
   ;;; Route_p 2048+15 0Args
   (2063 "Route_p" "Route_p" 0)
   ;;; Sidetrip_p 2048+16 0Args
   (2064 "Sidetrip_p" "Sidetrip_p" 0)
   ;;; No_amount_p 2048+17 0Args
   (2065 "No_amount_p" "No_amount_p" 0)
   ;;; Special_fare_p 2048+18 0Args
   (2066 "Special_fare_p" "Special_fare_p" 0)
   ;;; Promotional_fare_p 2048+19 0Args
   (2067 "Promotional_fare_p" "Promotional_fare_p" 0)
   ;;; Normal_fare_p 2048+20 0Args
   (2068 "Normal_fare_p" "Normal_fare_p" 0)
   ;;; Via_area 2048+22 1Arg
   (2070 "Via_area" "Via_area" 1 (string area))
   ;;; Bi_proviso 2048+24 1Arg
   (2072 "Bi_proviso" "Bi_proviso" 1 (string fbasis))
   ;;; Number_p 2048+27 1Arg
   (2075 "Number_p" "Number_p" 1 any)
   ;;; Date_p 2048+28 1Arg
   (2076 "Date_p" "Date_p" 1 any)
   ;;; String_p 2048+29 1Arg
   (2077 "String_p" "String_p" 1 any)
   ;;; Amount_p 2048+30 1Arg
   (2078 "Amount_p" "Amount_p" 1 any)
   ;;; Path_p 2048+31 1Arg
   (2079 "Path_p" "Path_p" 1 path)
   ;;; Error 2048+32 2Args
   (2080 "Error" "Error" 2 path string)
   ;;; Within 2048+33 2Args
   (2081 "Within" "Within" 2 path string)
   ;;; Within_country 2048+34 2Args
   (2082 "Within_country" "Within_country" 2 path (string country))
   ;;; Within_area 2048+35 2Args
   (2083 "Within_area" "Within_area" 2 path (string area))
   ;;; Intl_sector_p 2048+36 1Arg
   (2084 "Intl_sector_p" "Intl_sector_p" 1 path)
   ;;; Between 2048+37 3Args
   (2085 "Between" "Between" 3 path string string)
   ;;; Between_country 2048+38 3Args
   (2086 "Between_country" "Between_country"
	 3 path (string country) (string country))
   ;;; Between_area 2048+39 3Args
   (2087 "Between_area" "Between_area" 3 path (string area) (string area))
   ;;; Between_PC 2048+40 3Args
   (2088 "Between_PC" "Between_PC" 3 path (string airport) (string country))
   ;;; Between_PA 2048+41 3Args
   (2089 "Between_PA" "Between_PA" 3 path (string airport) (string area))
   ;;; Between_CA 2048+42 3Args
   (2090 "Between_CA" "Between_CA" 3 path (string country) (string area))
   ;;; Exclusive 2048+43 0Args
   (2091 "Exclusive" "Exclusive" 0)
   ;;; Another 2048+44 0Args
   (2092 "Another" "Another" 0)
   ;;; Sia 2048 + 51 0Args
   (2099 "Sia" "Sia" 0)
   )
  )
 (prubaeValueFunctions
  ;;; each element is
  ;;; '(code display_name item_name returnType numArgs args...)
  (
   ;;; MULTIVAL 256+64+1 return:any numArgsUnknown argsTypeUnknown
   (321 "MULTIVAL" "MULTIVAL" any -1)
   ;;; INTERVAL 256+64+2 return:any 2Args argsTypeUnknown
   (322 "INTERVAL" "INTERVAL" (number date) 2 (number date) (number date))
   ;;; Country 2048+6 return:string 1Arg
   (2054 "Country" "Country" (string country) 1 (string airport))
   ;;; Area 2048+7 return:string 1Arg
   (2055 "Area" "Area" (string area) 1 (string airport))
   ;;; Route 2048+8 return:string 2Args
   (2056 "Route" "Route" (string route) 2 (string airport) (string airport))
   )
  )
 (prubaeVariables
  ;;; each element is
  ;;; '(code display_name item_name listOfVariables)
  (
   ;;; $ENDORSE 1024+1 value:string
   (1025 "$ENDORSE" "$ENDORSE" (string))
   ;;; $RESTRICT 1024+2 value:string
   (1026 "$RESTRICT" "$RESTRICT" (string))
   ;;; $ORIGIN 1024+3 value:string,airport
   (1027 "$ORIGIN" "$ORIGIN" (string airport))
   ;;; $DEST 1024+4 value:string,airport
   (1028 "$DEST" "$DEST" (string airport))
   ;;; $ISSUE-DATE 1024+5 value:string
   (1029 "$ISSUE-DATE" "$ISSUE-DATE" (date))
   ;;; $ISSUE-BY 1024+6 value:string
   (1030 "$ISSUE-BY" "$ISSUE-BY" string)
   ;;; $ISSUE-PLACE 1024+7 value:string
   (1031 "$ISSUE-PLACE" "$ISSUE-PLACE" (string))
   ;;; $MULTI-PATH 1024+8 value:path
   (1032 "$MULTI-PATH" "$MULTI-PATH" (path))
   ;;; $FC-FROM 1024+9 value:string,airport
   (1033 "$FC-FROM" "$FC-FROM" (string airport))
   ;;; $FC-TO 1024+10 value:string,airport
   (1034 "$FC-TO" "$FC-TO" (string airport))
   ;;; $FC-PATH 1024+10 value:path
   (1035 "$FC-PATH" "$FC-PATH" (path))
   ;;; $ISSUE-COUNTRY 1024+11 value:string,country
   (1036 "$ISSUE-COUNTRY" "$ISSUE-COUNTRY" (string country))
   ;;; $ISSUE-AREA 1024+12 value:string,area
   (1037 "$ISSUE-AREA" "$ISSUE-AREA" (string area))
   ;;; $ISSUE-AGENT 1024+13 value:string,number
   (1038 "$ISSUE-AGENT" "$ISSUE-AGENT" (string number))
   ;;; $TOURCODE 1024+14 value:string
   (1039 "$TOURCODE" "$TOURCODE" (string))
   ;;; $FROM 1024+128+1 value:string,airport
   (1153 "$FROM" "$FROM" (string airport))
   ;;; $TO 1024+128+2 value:string,airport
   (1154 "$TO" "$TO" (string airport))
   ;;; $F-BASIS 1024+128+3 value:string,fbasis
   (1155 "$F-BASIS" "$F-BASIS" (string fbasis))
   ;;; $TKDESIGN 1024+128+4 value:string,fbasis
   (1156 "$TKDESIGN" "$TKDESIGN" (string fbasis))
   ;;; $F-BASIS-ALL 1024+128+5 value:string,fbasis
   (1157 "$F-BASIS-ALL" "$F-BASIS-ALL" (string fbasis))
   ;;; $CARRIER 1024+128+6 value:string,carrier
   (1158 "$CARRIER" "$CARRIER" (string carrier))
   ;;; $FLIGHT 1024+128+7 value:number
   (1159 "$FLIGHT" "$FLIGHT" (number))
   ;;; $CLASS 1024+128+8 value:string,class
   (1160 "$CLASS" "$CLASS" (string class))
   ;;; $DATE 1024+128+9 value:date
   (1161 "$DATE" "$DATE" (date))
   ;;; $PATH 1024+128+10 value:path
   (1162 "$PATH" "$PATH" (path))
   ;;; $ROUTE 1024+128+11 value:string
   (1163 "$ROUTE" "$ROUTE" (string))
   ;;; $FROM-A 1024+128+64+1 value:string,airport
   (1217 "$FROM-A" "$FROM-A" (string airport))
   ;;; $TO-A 1024+128+64+2 value:string,airport
   (1218 "$TO-A" "$TO-A" (string airport))
   ;;; $F-BASIS-A 1024+128+64+3 value:string,fbasis
   (1219 "$F-BASIS-A" "$F-BASIS-A" (string fbasis))
   ;;; $TKDESIGN-A 1024+128+64+4 value:string,fbasis
   (1220 "$TKDESIGN-A" "$TKDESIGN-A" (string fbasis))
   ;;; $F-BASIS-ALL-A 1024+128+64+5 value:string,fbasis
   (1221 "$F-BASIS-ALL-A" "$F-BASIS-ALL-A" (string fbasis))
   ;;; $CARRIER-A 1024+128+64+6 value:string,carrier
   (1222 "$CARRIER-A" "$CARRIER-A" (string carrier))
   ;;; $FLIGHT-A 1024+128+64+7 value:number
   (1223 "$FLIGHT-A" "$FLIGHT-A" (number))
   ;;; $CLASS-A 1024+128+64+8 value:string,class
   (1224 "$CLASS-A" "$CLASS-A" (string class))
   ;;; $DATE-A 1024+128+64+9 value:date
   (1225 "$DATE-A" "$DATE-A" (date date))
   ;;; $PATH-A 1024+128+64+10 value:path
   (1226 "$PATH-A" "$PATH-A" (path))
   ;;; $ROUTE-A 1024+128+64+11 value:string
   (1227 "$ROUTE-A" "$ROUTE-A" (string))
   ;;; settable $DISCOUNT 1024+256+1 value:number
   (1281 "$DISCOUNT" "$DISCOUNT" number)
   )
  )
  ;;; each element is
  ;;; '(code display_name item_name listOfVariables)
 (prubaeConstantValues
  (513 "NUMBER" "NUMBER" setnumber)
  (514 "DATE" "DATE" setdate)
  (516 "STRING" "STRING" setstring)
  (520 "AMOUNT" "AMOUNT" setamount)
   ;;; PATH 512+16 return:setpath numArgsUnknown argsTypeUnknown
  (528 "PATH" "PATH" setpath -1)
  )
 (prubaeSettableVariables
  ;;; each element is
  ;;; '(code display_name item_name listOfVariables)
  (
   ;;; settable $DISCOUNT 1024+256+1 value:set
   (1281 "$DISCOUNT" "$DISCOUNT" set)
   )
  )
 )
