- Timestamp:
- 05/20/10 14:41:32 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
IOIPSL/trunk/src/histcom.f90
r1023 r1027 1404 1404 dims(1) = W_F(idf)%tid 1405 1405 l_b = (INDEX(W_F(idf)%W_V(itx)%tax_name,"t_op_") == 1) 1406 IF ( W_F(idf)%n_tax > 1) THEN1406 IF (itx > 1) THEN 1407 1407 str30 = W_F(idf)%W_V(itx)%tax_name 1408 1408 ELSE … … 1568 1568 !- 1569 1569 IF (itax > 0) THEN 1570 IF ( W_F(idf)%n_tax > 1) THEN1570 IF (itax > 1) THEN 1571 1571 str30 = W_F(idf)%W_V(itax)%tax_name 1572 1572 ELSE
Note: See TracChangeset
for help on using the changeset viewer.