Manual Reference Pages - junsun (3)
NAME
junsun(3f) - [M_messages] print an eye-catching image of a smiling sun. (LICENSE:PD)
CONTENTS
Synopsis
Description
Options
Example
Author
License
SYNOPSIS
SUBROUTINE junsun(where)
DESCRIPTION
Sample output:
#################### ##################### ###################### ################### ######################## ################# ########################## ############### ## ######################### ###### ####### ###################### ########### ## ########### ############### ################# ################ ######## ##################### ##################### ## ####################### ######################### ##### ### ####### ######################## ##### ## # ## ####### ####################### ####################### ########### ############### ####################### ####################### ######## # ## ########### ######################## ##### ######## ####### ######################### ### ## ### ##### ## ##################### ##################### ######## ################ ##### ######### ############### ########### ## ########### ###################### ###### ###### ######################### # ############### ########################## ################# ######################## ################### ###################### ##################### ####################
OPTIONS
where the I/O flag to pass on to JOURNAL(). See the description of JOURNAL() for a meaning for the I/O flag.
EXAMPLE
Sample program:
program demo_junsun use M_messages, only : junsun call junsun(’s’) end program demo_junsun
AUTHOR
John S. Urban
LICENSE
Public License
| junsun (3) | October 17, 2020 |
