{{htmlmetatags>metatag-description:(ICL George 3 and George 4 source: GEOSTEER)}}
====== GEOSTEER ======
(George Source)


<code - GEOSTEER.txt>22FL    #OPT  K0GEOSTEER=0                 [D G BRADBURY
22^=    #LIS  K0GEOSTEER
23DW    #   
23YG    #     THIS SUBFILE CONTAINS THE COMPILATION STEERING PARAMETERS.
24D6    #   
24XQ    #OPT  GEORGE=3                     [TYPE OF GEORGE  
25CB    #   
25X2    #OPT  G3=GEORGE-3<1$1              [=1 IF GEORGE 3 , 0 OTHERWISE
26BL    #OPT  G4=GEORGE-4<1$1              [=1 IF GEORGE 4 , 0 OTHERWISE
26W=    #   
27*W    #SKI  G3
27TG    (                                  [MARK NUMBER IF GEORGE 3 
28*6    #OPT  G3MARK=8  
28SQ    #OPT  G4MARK=0  
29#B    )   
29S2    #   
2=?L    #SKI  G4
2=R=    (                                  [MARK NUMBER IF GEORGE 4 
2?=W    #OPT  G4MARK=8  
2?QG    #OPT  G3MARK=G4MARK 
2#=6    )   
2#PQ    #   
2*9B    #OPT  GENIE=1                      [NEW INTERFACE(G3MK6.5) COMPILED IF =
2*P2    #   
2B8L    #OPT  G3ISSUE=1                    [ISSUE NUMBER
2BN=    #   
2C7W    #OPT  G3COMP=0                     [COMPILATION NUMBER  
2CMG    #   
2D76    # IDENTIFIERS WHICH DEFINE THE COMPILATION ENVIRONMENT  
2DLQ    #OPT  GCOMP=1                      [COMPILING. SET ZERO BEFORE RESTORES 
2F6B    #OPT  GPATCH=0                     [SET TO 1 IF MENDITS FOR PATCH BY DEF
2FL2    #OPT  GFIXCORE=0                   [SET TO 1 DURING MENDIT OF FIXED CORE
2G5L    #OPT  BSOPT=1   
2GK=    #OPT  K0ALLGEO=0                   [OVERALL LISTING LEVEL   
2H4W    #   
2HJG    #OPT  K6ALLGEO=100                 [OVERALL TESTING LEVEL   
2J46    #   
2JHQ    #OPT  ADEVELOP=0                   [DEVELOPMENT NUMBER  
2K3B    #   
2KH2    #DEF  27?=GEORGE                   [PASSES INFORMATION TO THE   
2L2L    #DEF  28?=G3MARK*4096+G3ISSUE      [COMPILER FOR SECOND LISTING 
2LG=    #CHE  ADDR  
^^^^ ...12711333000200000000
</code>