

#include "BUILTIN.h"
extern OBJ _APairMap_5(OBJ,OBJ,OBJ);OBJ __APairMap_5; /* * */

extern OBJ _APairMap_5(OBJ x1,OBJ x2,OBJ x3) /* * */
{OBJ r;
 {OBJ x12=FLD1(x3,1);OBJ x13=FLD1(x3,2);
  if(EXPRD(x3,1)){
   {OBJ x14;OBJ x15;
    x14=(*(OBJ(*)(OBJ,OBJ))METHOD(x2,1))(x2,x13);
    x15=(*(OBJ(*)(OBJ,OBJ))METHOD(x1,1))(x1,x12);
    RSOME(x3,r);FLD1(r,1)=x15;FLD1(r,2)=x14;}
  }else{
   COPY(x12,1);COPY(x13,1);
   {OBJ x14;OBJ x15;
    x14=(*(OBJ(*)(OBJ,OBJ))METHOD(x2,1))(x2,x13);
    x15=(*(OBJ(*)(OBJ,OBJ))METHOD(x1,1))(x1,x12);
    FRPRD(x3,1);PRD1(2,r);FLD1(r,1)=x15;FLD1(r,2)=x14;}}}
 return r;}

static OBJ _mt_3_0_3(OBJ t,OBJ t1,OBJ t2,OBJ t3) 
{OBJ r;
 DCCLS(t,1);
 r=(*(OBJ(*)(OBJ,OBJ,OBJ))ENTRY(t))(t1,t2,t3);
 return r;}

init_APairMap()
{
 static int visited=0; if(visited) return; visited=1;
 init_APair();
 CLS(3,_APairMap_5,__APairMap_5);
 MTH(3,0,3,_mt_3_0_3);LZYMTH(3,0,3,_mt_3_0_3);}

