source: PSPA/transportPSPA/trunk/include/RC2.CIN @ 445

Last change on this file since 445 was 15, checked in by lemeur, 12 years ago

transport pspa initial

File size: 344 bytes
Line 
1C RC2       FIRST-ORDER R2 MATRICES
2C
3C RC2       CUMULATIVE R MATRIX FROM LAST R2 UPDATE.
4C R2V       CUMULATIVE PARTIALS MATRIX FROM LAST R2 UPDATE
5C
6      REAL            RC2(6,6), R2V(6,6,NPVAR)
7      REAL            RC2L(36), R2VL(36,NPVAR)
8      EQUIVALENCE     (RC2(1,1),RC2L(1)), (R2V(1,1,1),R2VL(1,1))
9C
10      COMMON /RC2/    RC2, R2V
Note: See TracBrowser for help on using the repository browser.