Ignore:
Timestamp:
Jan 4, 2012, 12:05:49 AM (12 years ago)
Author:
George Lilly
Message:

ohum new version

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/branches/ohum/p/C0CPXRM.m

    r1332 r1333  
    1 C0CPXRM ;
    2 ;;;
    3 DOIT ;
    4  S G="PXRMXSEPCLINIC3110302.224804" ZWR ^XTMP(G,*)
    5  S G="PXRMXSEPCLINIC3110302.223957" ZWR ^XTMP(G,*)
    6  S G="PXRMXSEPCLINIC3110302.223738" ZWR ^XTMP(G,*)
    7  S G="PXRMXSEPCLINIC3110302.223516" ZWR ^XTMP(G,*)
    8  S G="PXRMXSEPCLINIC3110302.222158" ZWR ^XTMP(G,*)
    9  S G="PXRMXSEPCLINIC3110302.213944" ZWR ^XTMP(G,*)
    10  S G="PXRMXSEPCLINIC3110302.212219" ZWR ^XTMP(G,*)
    11  S G="PXRMXSEPCLINIC3110302.211506" ZWR ^XTMP(G,*)
    12  S G="PXRMXSEPCLINIC3110302.002714" ZWR ^XTMP(G,*)
    13  S G="PXRMXSEPCLINIC3110302.001841" ZWR ^XTMP(G,*)
    14  S G="PXRMXSEPCLINIC3110302.000846" ZWR ^XTMP(G,*)
    15  S G="PXRMXSEPCLINIC3110115.141918" ZWR ^XTMP(G,*)
    16  S G="PXRMXSEPCLINIC3110115.132312" ZWR ^XTMP(G,*)
    17  S G="PXRMXSEPCLINIC3110115.131653" ZWR ^XTMP(G,*)
    18  S G="PXRMXSEPCLINIC3110115.131008" ZWR ^XTMP(G,*)
    19  S G="PXRM PXK EVENT988 3110224.210456" ZWR ^XTMP(G,*)
    20  S G="PXRM PXK EVENT986 3110224.210456" ZWR ^XTMP(G,*)
    21  S G="PXRM PXK EVENT932 3110224.210456" ZWR ^XTMP(G,*)
    22  S G="PXRM PXK EVENT932 3110224.210455" ZWR ^XTMP(G,*)
    23  S G="PXRM PXK EVENT8015 3110301.215142" ZWR ^XTMP(G,*)
    24  S G="PXRM PXK EVENT8015 3110301.215141" ZWR ^XTMP(G,*)
    25  S G="PXRM PXK EVENT5265 3110309.124047" ZWR ^XTMP(G,*)
    26  S G="PXRM PXK EVENT5265 3110309.124046" ZWR ^XTMP(G,*)
    27  S G="PXRM PXK EVENT4742 3101129.221201" ZWR ^XTMP(G,*)
    28  S G="PXRM PXK EVENT4742 3101129.215741" ZWR ^XTMP(G,*)
    29  S G="PXRM PXK EVENT4710 3101129.215701" ZWR ^XTMP(G,*)
    30  S G="PXRM PXK EVENT3297 3101127.123134" ZWR ^XTMP(G,*)
    31  S G="PXRM PXK EVENT32495 3110224.194246" ZWR ^XTMP(G,*)
    32  S G="PXRM PXK EVENT32493 3110224.194246" ZWR ^XTMP(G,*)
    33  S G="PXRM PXK EVENT32354 3110224.194246" ZWR ^XTMP(G,*)
    34  S G="PXRM PXK EVENT32354 3110224.194245" ZWR ^XTMP(G,*)
    35  S G="PXRM PXK EVENT31106 3110224.175105" ZWR ^XTMP(G,*)
    36  S G="PXRM PXK EVENT31090 3110224.175105" ZWR ^XTMP(G,*)
    37  S G="PXRM PXK EVENT30339 3110224.175105" ZWR ^XTMP(G,*)
    38  S G="PXRM PXK EVENT30339 3110224.175103" ZWR ^XTMP(G,*)
    39  S G="PXRM PXK EVENT2761 3110115.174109" ZWR ^XTMP(G,*)
    40  S G="PXRM PXK EVENT2761 3110115.174108" ZWR ^XTMP(G,*)
    41  S G="PXRM PXK EVENT27327 3110227.013658" ZWR ^XTMP(G,*)
    42  S G="PXRM PXK EVENT27327 3110227.013657" ZWR ^XTMP(G,*)
    43  S G="PXRM PXK EVENT27327 3110227.013523" ZWR ^XTMP(G,*)
    44  S G="PXRM PXK EVENT27327 3110227.013522" ZWR ^XTMP(G,*)
    45  S G="PXRM PXK EVENT27253 3110227.012747" ZWR ^XTMP(G,*)
    46  S G="PXRM PXK EVENT27253 3110227.012746" ZWR ^XTMP(G,*)
    47  S G="PXRM PXK EVENT2559 3110115.170835" ZWR ^XTMP(G,*)
    48  S G="PXRM PXK EVENT25549 3110228.231135" ZWR ^XTMP(G,*)
    49  S G="PXRM PXK EVENT25549 3110228.231134" ZWR ^XTMP(G,*)
    50  S G="PXRM PXK EVENT2205 3101129.215343" ZWR ^XTMP(G,*)
    51  S G="PXRM PXK EVENT21092 3110114.195621" ZWR ^XTMP(G,*)
    52  S G="PXRM PXK EVENT21092 3110114.193803" ZWR ^XTMP(G,*)
    53  S G="PXRM PXK EVENT19640 3110226.032943" ZWR ^XTMP(G,*)
    54  S G="PXRM PXK EVENT19640 3110226.032941" ZWR ^XTMP(G,*)
    55  S G="PXRM PXK EVENT19353 3101212.162833" ZWR ^XTMP(G,*)
    56  S G="PXRM PXK EVENT18780 3110221.215603" ZWR ^XTMP(G,*)
    57  S G="PXRM PXK EVENT18156 3101212.152654" ZWR ^XTMP(G,*)
    58  S G="PXRM PXK EVENT17800 3110315.202432" ZWR ^XTMP(G,*)
    59  S G="PXRM PXK EVENT1650 3110220.192925" ZWR ^XTMP(G,*)
    60  S G="PXRM PXK EVENT16110 3110313.224636" ZWR ^XTMP(G,*)
    61  S G="PXRM PXK EVENT16004 3110317.151215" ZWR ^XTMP(G,*)
    62  S G="PXRM PXK EVENT16004 3110317.150834" ZWR ^XTMP(G,*)
    63  S G="PXRM PXK EVENT14955 3110315.165018" ZWR ^XTMP(G,*)
    64  S G="PXRM PXK EVENT14816 3110315.164839" ZWR ^XTMP(G,*)
    65  S G="PXRM PXK EVENT14816 3110315.164512" ZWR ^XTMP(G,*)
    66  S G="PXRM PXK EVENT12415 3110315.135514" ZWR ^XTMP(G,*)
    67  S G="PXRM PXK EVENT11797 3110315.131141" ZWR ^XTMP(G,*)
    68  S G="PXRM PXK EVENT11573 3110315.131811" ZWR ^XTMP(G,*)
    69  S G="PXRM PXK EVENT10728 3110114.025022" ZWR ^XTMP(G,*)
    70  S G="PXRM PXK EVENT10578 3110114.021524" ZWR ^XTMP(G,*)
    71  S G="PXRM PXK EVENT10243 3110114.020338" ZWR ^XTMP(G,*)
    72  S G="PXRM PXK EVENT10105 3101204.230554" ZWR ^XTMP(G,*)
    73  Q
    74  ;
     1C0CPXRM ;
     2DOIT    ;
     3        S G="PXRMXSEPCLINIC3110302.224804" ZWR ^XTMP(G,*)
     4        S G="PXRMXSEPCLINIC3110302.223957" ZWR ^XTMP(G,*)
     5        S G="PXRMXSEPCLINIC3110302.223738" ZWR ^XTMP(G,*)
     6        S G="PXRMXSEPCLINIC3110302.223516" ZWR ^XTMP(G,*)
     7        S G="PXRMXSEPCLINIC3110302.222158" ZWR ^XTMP(G,*)
     8        S G="PXRMXSEPCLINIC3110302.213944" ZWR ^XTMP(G,*)
     9        S G="PXRMXSEPCLINIC3110302.212219" ZWR ^XTMP(G,*)
     10        S G="PXRMXSEPCLINIC3110302.211506" ZWR ^XTMP(G,*)
     11        S G="PXRMXSEPCLINIC3110302.002714" ZWR ^XTMP(G,*)
     12        S G="PXRMXSEPCLINIC3110302.001841" ZWR ^XTMP(G,*)
     13        S G="PXRMXSEPCLINIC3110302.000846" ZWR ^XTMP(G,*)
     14        S G="PXRMXSEPCLINIC3110115.141918" ZWR ^XTMP(G,*)
     15        S G="PXRMXSEPCLINIC3110115.132312" ZWR ^XTMP(G,*)
     16        S G="PXRMXSEPCLINIC3110115.131653" ZWR ^XTMP(G,*)
     17        S G="PXRMXSEPCLINIC3110115.131008" ZWR ^XTMP(G,*)
     18        S G="PXRM PXK EVENT988 3110224.210456" ZWR ^XTMP(G,*)
     19        S G="PXRM PXK EVENT986 3110224.210456" ZWR ^XTMP(G,*)
     20        S G="PXRM PXK EVENT932 3110224.210456" ZWR ^XTMP(G,*)
     21        S G="PXRM PXK EVENT932 3110224.210455" ZWR ^XTMP(G,*)
     22        S G="PXRM PXK EVENT8015 3110301.215142" ZWR ^XTMP(G,*)
     23        S G="PXRM PXK EVENT8015 3110301.215141" ZWR ^XTMP(G,*)
     24        S G="PXRM PXK EVENT5265 3110309.124047" ZWR ^XTMP(G,*)
     25        S G="PXRM PXK EVENT5265 3110309.124046" ZWR ^XTMP(G,*)
     26        S G="PXRM PXK EVENT4742 3101129.221201" ZWR ^XTMP(G,*)
     27        S G="PXRM PXK EVENT4742 3101129.215741" ZWR ^XTMP(G,*)
     28        S G="PXRM PXK EVENT4710 3101129.215701" ZWR ^XTMP(G,*)
     29        S G="PXRM PXK EVENT3297 3101127.123134" ZWR ^XTMP(G,*)
     30        S G="PXRM PXK EVENT32495 3110224.194246" ZWR ^XTMP(G,*)
     31        S G="PXRM PXK EVENT32493 3110224.194246" ZWR ^XTMP(G,*)
     32        S G="PXRM PXK EVENT32354 3110224.194246" ZWR ^XTMP(G,*)
     33        S G="PXRM PXK EVENT32354 3110224.194245" ZWR ^XTMP(G,*)
     34        S G="PXRM PXK EVENT31106 3110224.175105" ZWR ^XTMP(G,*)
     35        S G="PXRM PXK EVENT31090 3110224.175105" ZWR ^XTMP(G,*)
     36        S G="PXRM PXK EVENT30339 3110224.175105" ZWR ^XTMP(G,*)
     37        S G="PXRM PXK EVENT30339 3110224.175103" ZWR ^XTMP(G,*)
     38        S G="PXRM PXK EVENT2761 3110115.174109" ZWR ^XTMP(G,*)
     39        S G="PXRM PXK EVENT2761 3110115.174108" ZWR ^XTMP(G,*)
     40        S G="PXRM PXK EVENT27327 3110227.013658" ZWR ^XTMP(G,*)
     41        S G="PXRM PXK EVENT27327 3110227.013657" ZWR ^XTMP(G,*)
     42        S G="PXRM PXK EVENT27327 3110227.013523" ZWR ^XTMP(G,*)
     43        S G="PXRM PXK EVENT27327 3110227.013522" ZWR ^XTMP(G,*)
     44        S G="PXRM PXK EVENT27253 3110227.012747" ZWR ^XTMP(G,*)
     45        S G="PXRM PXK EVENT27253 3110227.012746" ZWR ^XTMP(G,*)
     46        S G="PXRM PXK EVENT2559 3110115.170835" ZWR ^XTMP(G,*)
     47        S G="PXRM PXK EVENT25549 3110228.231135" ZWR ^XTMP(G,*)
     48        S G="PXRM PXK EVENT25549 3110228.231134" ZWR ^XTMP(G,*)
     49        S G="PXRM PXK EVENT2205 3101129.215343" ZWR ^XTMP(G,*)
     50        S G="PXRM PXK EVENT21092 3110114.195621" ZWR ^XTMP(G,*)
     51        S G="PXRM PXK EVENT21092 3110114.193803" ZWR ^XTMP(G,*)
     52        S G="PXRM PXK EVENT19640 3110226.032943" ZWR ^XTMP(G,*)
     53        S G="PXRM PXK EVENT19640 3110226.032941" ZWR ^XTMP(G,*)
     54        S G="PXRM PXK EVENT19353 3101212.162833" ZWR ^XTMP(G,*)
     55        S G="PXRM PXK EVENT18780 3110221.215603" ZWR ^XTMP(G,*)
     56        S G="PXRM PXK EVENT18156 3101212.152654" ZWR ^XTMP(G,*)
     57        S G="PXRM PXK EVENT17800 3110315.202432" ZWR ^XTMP(G,*)
     58        S G="PXRM PXK EVENT1650 3110220.192925" ZWR ^XTMP(G,*)
     59        S G="PXRM PXK EVENT16110 3110313.224636" ZWR ^XTMP(G,*)
     60        S G="PXRM PXK EVENT16004 3110317.151215" ZWR ^XTMP(G,*)
     61        S G="PXRM PXK EVENT16004 3110317.150834" ZWR ^XTMP(G,*)
     62        S G="PXRM PXK EVENT14955 3110315.165018" ZWR ^XTMP(G,*)
     63        S G="PXRM PXK EVENT14816 3110315.164839" ZWR ^XTMP(G,*)
     64        S G="PXRM PXK EVENT14816 3110315.164512" ZWR ^XTMP(G,*)
     65        S G="PXRM PXK EVENT12415 3110315.135514" ZWR ^XTMP(G,*)
     66        S G="PXRM PXK EVENT11797 3110315.131141" ZWR ^XTMP(G,*)
     67        S G="PXRM PXK EVENT11573 3110315.131811" ZWR ^XTMP(G,*)
     68        S G="PXRM PXK EVENT10728 3110114.025022" ZWR ^XTMP(G,*)
     69        S G="PXRM PXK EVENT10578 3110114.021524" ZWR ^XTMP(G,*)
     70        S G="PXRM PXK EVENT10243 3110114.020338" ZWR ^XTMP(G,*)
     71        S G="PXRM PXK EVENT10105 3101204.230554" ZWR ^XTMP(G,*)
     72        Q
     73        ;
Note: See TracChangeset for help on using the changeset viewer.