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

**Defined in:** [[george:source:MACROS_RJDG|MACROS RJDG]]

**Used in:** [[george:source:USERTYPE83|USERTYPE83]]

<code - SARAH.mac.txt>
 46*G ...[??? SARAH SECT CENT FGN 7 DOC  
 4*8=    [THIS MACRO SETS UP THE SWITCHES FOR THE GET EXPRESSION ROUTINE 
 4*MW    [   
 4B7G    #MAC  SARAH 
 4BM6                   +0                  [STORE ZERO  
 4C6Q    #FID  0 5      %A-%E               [SET FIRST SWITCH
 4CLB    #FID  6 11     %B-%E               [SET SECOND SWITCH   
 4D62    #FID  12 17    %C-%E               [SET THIRD SWITCH
 4DKL    #FID   18  23  %D-%E               [SET FOURTH SWITCH   
 4F5=    #NOR
</code>