

#include "BUILTIN.h"
extern OBJ _AMapByOS_26(OBJ,OBJ,OBJ);extern OBJ __AMapByOS_26;

#include "Nat.h"
extern OBJ _ASetMap_5(OBJ,OBJ,OBJ,OBJ);extern OBJ __ASetMap_5;
extern OBJ _AMapByOSMap_5(OBJ,OBJ,OBJ);OBJ __AMapByOSMap_5; /* * */
extern OBJ _AMapByOSMap_6(OBJ,OBJ);OBJ __AMapByOSMap_6; /* *'6 */

extern OBJ _AMapByOSMap_5(OBJ x1,OBJ x2,OBJ x3) /* * */
{OBJ r;
 CPCLS(__AMapByOSMap_6,1);
 CPCLS(__AMapByOS_26,1);
 {OBJ x4;OBJ x5;
  x4=(*(OBJ(*)(OBJ,OBJ))METHOD(__AMapByOS_26,1))(__AMapByOS_26,x1);
  CPCLS(x4,1);
  x5=(*(OBJ(*)(OBJ,OBJ))METHOD(__AMapByOSMap_6,1))(__AMapByOSMap_6,x2);
  r=_ASetMap_5(x4,x4,x5,x3);}
 return r;}

extern OBJ _AMapByOSMap_6(OBJ x1,OBJ x2) /* *'6 */
{OBJ r;
 {OBJ x10;OBJ x11=FLD1(x2,2);
  if(EXPRD(x2,1)){
   {OBJ x12;
    x12=(*(OBJ(*)(OBJ,OBJ))METHOD(x1,1))(x1,x11);
    RSOME(x2,r);FLD1(r,2)=x12;}
  }else{
   x10=FLD1(x2,1);COPY(x10,1);COPY(x11,1);
   {OBJ x12;
    x12=(*(OBJ(*)(OBJ,OBJ))METHOD(x1,1))(x1,x11);
    FRPRD(x2,1);PRD1(2,r);FLD1(r,1)=x10;FLD1(r,2)=x12;}}}
 return r;}

init_AMapByOSMap()
{
 static int visited=0; if(visited) return; visited=1;
 init_AMapByOS();
 init_ANat();
 init_AOption();
 init_ASet();
 init_ASeq();
 init_APair();
 init_ASetMap();
 init_ASeqMap();
 CLS(2,_AMapByOSMap_6,__AMapByOSMap_6);
 CLS(3,_AMapByOSMap_5,__AMapByOSMap_5);}

