Changeset 125 for trunk/libf/phytitan/pg3.F
- Timestamp:
- May 23, 2011, 2:22:56 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/libf/phytitan/pg3.F
r106 r125 147 147 148 148 ITIME=1 149 149 c print*,'avant init' 150 150 call init 151 152 151 c print*,'apres init' 152 c print*,'avant calcoag' 153 153 call calcoag 154 154 c print*,'apres calcoag' 155 155 156 156 c print*,'***** TEST COAGULATION ********'
Note: See TracChangeset
for help on using the changeset viewer.