{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: GOIFALSE)}}
====== GOIFALSE ======
(GIN Macro)

**Defined in:** [[george:source:IFMACS|IFMACS]]

**Used in:** 

<code - GOIFALSE.mac.txt>
 9DQL    [   
 9F==    [   
 9FPW    [??? GOIFALSE SECT DEVT FGN 1 DOC   
 9G9G    [   
 9GP6    #MAC           GOIFALSE 
 9H8Q    [              ======== 
 9HNB    [   
 9J82    [   
 9JML    [ %A - LABEL ROOT FOR STANDARD JUMP 
 9K7=    [ %B - LABEL ROOT FOR IF 'EITHER' GIVEN, I.E. 'OR' EXPECTED TO FOLLOW   
 9KLW    [ %C ... PARAMETERS TO THE CALLING USER LEVEL MACRO 
 9L6G    [   
 9LL6    [ IF 'EITHER' GIVEN THEN
 9M5Q ...[     SETS 'OR EXPECTED' IN 'NESTEITHERS'   
 9MKB    [     CALLS 'GOIFTRUE' WITHOUT THE 'EITHER' AND WITH %A, %B REVERSED
 9N52    [ ELSE INVERTS JUMP DIRECTION BY 'IFN<CONDITION DEFINER>' MACRO 
 9NJL    [   
 9P4=    #STR           BOTH,%C             ['BOTH' HAS NO EFFECT
 9PHW    #SKI
 9Q3G    (   
 9QH6          GOIFALSE %A,%B,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T-
 9R2Q    ,%U,%V  
 9RGB    #EXI
 9S22    )   
 9SFL    #STR           EITHER,%C           ['EITHER' CHANGES JUMP   
 9S^=    #SKI
 9TDW    (   
 9TYG    #ALT           NESTEITHERS=NESTEITHERS^1 [SET 'EITHER'  
 9WD6          GOIFTRUE %B,%A,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T-
 9WXQ    ,%U,%V  
 9XCB    #EXI
 9XX2    )   
 9YBL    #ACC           %C   
 9YW=    (   
 9^*W    #STR           +,%C 
 9^TG    (   
 =2*6          IFN%C    %A,%D,%E,%F,%G,%H,%I,%J,%K,%L,%M,%N,%O,%P,%Q,%R,%S,%T,%U-
 =2SQ    ,%V,%W  
 =3#B    [ E.G. IFNCS NIF2   
 =3S2    [ OR IFNBS NIF1,2,BIT1  
 =4?L    #EXI
 =4R=    )   
 =5=W    )   
 =5QG          IFN%D    %A,%C,%E 
 =6=6    [ E.G. IFNGE NIF1,0,GSIGN   
 =6PQ    #NOR
</code>