]>
Commit | Line | Data |
---|---|---|
e74335a4 | 1 | * $Id$ |
2 | REAL AMP,AMT,APX0,ATX0,AMPN,AMTN,AMP0,AMT0,WP,WM,SW,XREMP, | |
3 | & XREMT,DPKC1,DPKC2,PP11,PP12,PT11,PT12,PTP2,PTT2 | |
4 | COMMON/DPMCOM1/JJP,JJT,AMP,AMT,APX0,ATX0,AMPN,AMTN,AMP0,AMT0, | |
5 | & NFDP,NFDT,WP,WM,SW,XREMP,XREMT,DPKC1,DPKC2,PP11,PP12, | |
6 | & PT11,PT12,PTP2,PTT2 | |
bc676b8e | 7 | #ifndef BLANKET_SAVE |
e74335a4 | 8 | SAVE /DPMCOM1/ |
bc676b8e | 9 | #endif |