LONGCOOR [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

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

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

**Used in:** [[george:source:CIMOP867|CIMOP867]], [[george:source:CLOSEALT864|CLOSEALT864]], [[george:source:CLOSEFUL867|CLOSEFUL867]], [[george:source:CLOSEND867|CLOSEND867]], [[george:source:LISTNIP865|LISTNIP865]], [[george:source:PERFCHAP866|PERFCHAP866]]

<code - LONGCOOR.mac.txt>
 L8FG ...#MAC  LONGCOOR  
 L8^6 ...#STR  %B
 L9DQ ...#SKI
 L9YB ...(   
 L=D2 ...      SMO      FX2  
 L=XL ...      STOZ     CLONG3   
 L?C= ...)   
 L?WW ...#STR  %B
 L#BG ...      ACCSTO   %B,CLONG3,FX2
 L#W6 ...MWATE   
 L**Q ...#STR  %A%B  
 L*TB ...      LDN   1  #4000
 LB*2 ...#STR  %A%B  
 LBSL ...#SKI
 LC#= ...      LDN   1  0
 LCRW ...      CALL  0  (COOR3LW4)   
 LD?G ...      BRN      (GEOERR) 
 LDR6 ...#STR  %A
 LF=Q ...      BRN      %A   
 LFQB ...#STR  %A
 LG=2 ...#SKI
 LGPL ...      BRN      MWATE
 LH9= ...#NOR
</code>