Changeset 1438 for qrda/C0Q/trunk/p/C0QSET.m
- Timestamp:
- May 25, 2012, 5:55:11 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
qrda/C0Q/trunk/p/C0QSET.m
r1364 r1438 1 C0QSET ;GPL - SET OPERATIONS ON LISTS ;818/11 8:50pm 2 ;;1.0; MU PACKAGE;;;Build 271 C0QSET ;GPL - SET OPERATIONS ON LISTS ;818/11 8:50pm ; 5/23/12 5:46pm 2 ;;1.0;C0Q;;May 21, 2012;Build 43 3 3 ; 4 4 ;2011 George Lilly glilly@glilly.net - Licensed under the terms of the GNU … … 29 29 S B(4)="" 30 30 D UNITY("C","A","B") 31 ZWR C31 ZWRITE C 32 32 Q 33 33 ; … … 38 38 D UNITY("DELTA",PATS,MEDS) 39 39 W !,"PATIENTS WITH NO MEDS",! 40 ZWR DELTA(0,*)40 ZWRITE DELTA(0,*) 41 41 W !,"BAD POINTERS IN THE MEDS FILE",! 42 ZWR DELTA(2,*)42 ZWRITE DELTA(2,*) 43 43 Q 44 44 ;
Note:
See TracChangeset
for help on using the changeset viewer.