Changeset 163
- Timestamp:
- 06/29/13 02:27:19 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/phyparam.F
r149 r163 340 340 else 341 341 zdtime=ptimestep*float(iradia) 342 CALL zenang(zls,gmtime,zdtime,lati,long,mu0,fract) 342 ! CALL zenang(zls,gmtime,zdtime,lati,long,mu0,fract) ! FIXME 343 343 !print*,'ZENANG ' 344 344 endif
Note: See TracChangeset
for help on using the changeset viewer.