Changeset 97 for trunk/SRC/ToBeReviewed/CALCULS/rhon.pro
- Timestamp:
- 06/09/06 17:18:59 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/CALCULS/rhon.pro
r25 r97 1 FUNCTION rhon, sn, tn, INSITU = insitu, SIGMA_N = sigma_n2 @common3 tempsun = systime(1) ; pour key_performance4 1 ;+ 5 2 ;; … … 11 8 ;; 12 9 ;- 10 FUNCTION rhon, sn, tn, INSITU = insitu, SIGMA_N = sigma_n 11 @common 12 tempsun = systime(1) ; pour key_performance 13 13 sn = -1e5 > double(sn) < 1e5 14 14 tn = -1e5 > double(tn) < 1e5
Note: See TracChangeset
for help on using the changeset viewer.