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