juntrolls(3f) - [M_messages] print an eye-catching bulletin (LICENSE:PD)SYNOPSIS/USAGE
SUBROUTINE juntrolls(where,a)character(len=*) :: where ! the I/O flag to pass on to JOURNAL() character(len=21) :: a(4)
Description
Examples
Author
License
Sample output:
> \|||/ > (o o) > ;~~~~ooO~~(_)~~~~~~~~~; > | | > | | > | | > |_____________________| > ~~~~~~~~~~~~~~~~Ooo~~ > | | | > ~~~ ~~~ > || || > ooO OooSee the description of JOURNAL() for a meaning for the I/O flag.
Sample program:
program demo_juntrolls use M_messages, only : juntrolls call juntrolls(s,[ & Please ... , & " dont feed ", & the , & TROLLS! & ]) end program demo_juntrolls
John S. Urban
Public License
Nemo Release 3.1 | juntrolls (3) | February 23, 2025 |