Changeset 508 for ccr/trunk/p/C0CCCD1.m
- Timestamp:
- May 21, 2009, 1:12:11 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/C0CCCD1.m
r391 r508 1 C0CCCD1 2 ;; 0.1;CCDCCR;nopatch;noreleasedate1 C0CCCD1 ; CCDCCR/GPL - CCD TEMPLATE AND ACCESS ROUTINES; 6/7/08 2 ;;1.0;C0C;;May 19, 2009; 3 3 ;Copyright 2008,2009 George Lilly, University of Minnesota. 4 4 ;Licensed under the terms of the GNU General Public License. … … 23 23 Q 24 24 ; 25 ZT(ZARY,BAT,LINE) 25 ZT(ZARY,BAT,LINE) ; private routine to add a line to the ZARY array 26 26 ; ZARY IS PASSED BY NAME 27 27 ; BAT is a string identifying the section … … 38 38 Q 39 39 ; 40 ZLOAD(ZARY,ROUTINE) 40 ZLOAD(ZARY,ROUTINE) ; load tests into ZARY which is passed by reference 41 41 ; ZARY IS PASSED BY NAME 42 42 ; ZARY = name of the root, closed array format (e.g., "^TMP($J)") … … 58 58 Q 59 59 ; 60 LOAD(ARY) 60 LOAD(ARY) ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME 61 61 D ZLOAD(ARY,"C0CCCD1") 62 62 ; ZWR @ARY 63 63 Q 64 64 ; 65 TRMCCD 66 Q 67 MARKUP 65 TRMCCD ; ROUTINE TO BE WRITTEN TO REMOVE CCR MARKUP FROM CCD 66 Q 67 MARKUP ;<MARKUP> 68 68 ;;<Body> 69 69 ;;<Problems>
Note:
See TracChangeset
for help on using the changeset viewer.