source: ccr/branches/ohum/p/C0CPXRM.m@ 1482

Last change on this file since 1482 was 1433, checked in by Sam Habiel, 13 years ago

Update based on OHUM's latest routines

File size: 3.8 KB
Line 
1C0CPXRM ;
2 ;;1.2;C0C;;May 11, 2012;Build 47
3DOIT ;
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 ;
Note: See TracBrowser for help on using the repository browser.