*BEGIN 1800
; includes entrances 5000 and 5368
*CS UTM30N
*CS OUT UTM30N
*DECLINATION AUTO 451305 4800936 0170
*INFER EXPORTS ON
*INCLUDE 1800-13-01; entrance

;*INCLUDE 1800-16-02; sump2
*INCLUDE 1800-22-02
;;;;;;;;*INCLUDE 1800-22-03
*INCLUDE 1800-22-04
;;;;;;;;*INCLUDE 1800-22-05 replaced by 22-06
*INCLUDE 1800-22-06; Up to Boob Tube #5000 entrance at (or near) stn 93
*INCLUDE 1800-22-07

*INCLUDE 1800-23-01
*INCLUDE 1800-23-02
*INCLUDE 1800-23-03
*INCLUDE 1800-23-04
*INCLUDE 1800-23-05
*INCLUDE 1800-23-06
*INCLUDE 1800-23-07;;;
*INCLUDE 1800-23-08;;;
*INCLUDE 1800-23-09;;;


*INCLUDE ../5368/5368
*INCLUDE 1800-22-01


;*EQUATE 1800-22-01.0    1800-16-02.Sump2Start
;*EQUATE 1800-16-02.Sump2End       1800-22-02.27 
*EQUATE 1800-22-04.27 1800-22-06.0
*EQUATE 1800-22-04.2 1800-22-02.2
;;;;;;*EQUATE 1800-22-03.0 1800-22-06.0
*EQUATE 1800-22-07.0 1800-22-06.26

*EQUATE 1800-23-01.1 1800-22-06.21

*EQUATE 1800-23-03.6 1800-23-05.1
*EQUATE 1800-23-03.28 1800-23-06.1


*EQUATE 1800-22-02.0 1800-23-02.0
*EQUATE 1800-23-02.25 1800-23-03.32
*EQUATE 1800-23-03.28 1800-23-04.1
*EQUATE 5368.5368-23-05.99 1800-22-01.6
*EQUATE 1800-23-03.28 1800-23-07.0
*EQUATE 1800-23-04.16 1800-23-08.14
*EQUATE 1800-22-06.100 1800-23-09.16
;*SOLVE


*INCLUDE 1800-2016s-dive
*EQUATE 1800-13-01.20 1800-2016s-dive.0
*EQUATE 1800-2016s-dive.13 1800-22-01.19

*END 1800