Changeset 3649 for trunk/LMDZ.COMMON/libf/evolution/pem.F90
- Timestamp:
- Feb 26, 2025, 9:58:28 AM (4 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.COMMON/libf/evolution/pem.F90
r3638 r3649 299 299 logical :: num_str 300 300 301 write(*,*) ' * . . + . * . .+ . . . '301 write(*,*) ' * . . + . * . + . . . ' 302 302 write(*,*) ' + _______ ________ ____ ____ * + ' 303 303 write(*,*) ' + . * |_ __ \|_ __ ||_ \ / _| . *' … … 305 305 write(*,*) ' . | ___/ | _| _ | |\ /| | . . ' 306 306 write(*,*) '. * * _| |_ _| |__/ | _| |_\/_| |_ * ' 307 write(*,*) ' 308 write(*,*) ' . * . * .. + * . + .'307 write(*,*) ' + |_____| |________||_____||_____| + . ' 308 write(*,*) ' . * . * . + * . + .' 309 309 310 310 ! Elapsed time with system clock
Note: See TracChangeset
for help on using the changeset viewer.