X-Git-Url: https://git.wh0rd.org/?a=blobdiff_plain;f=306833%2F306833.F90;fp=306833%2F306833.F90;h=433d08d74de22fe8daf75ced1c7162ee34399084;hb=bd3239d2bbe0de3a200b266503e3330b1e391489;hp=0000000000000000000000000000000000000000;hpb=dbff64cb4b7530861c2309c794efdd4e0cf47a23;p=ICEs.git

diff --git a/306833/306833.F90 b/306833/306833.F90
new file mode 100644
index 0000000..433d08d
--- /dev/null
+++ b/306833/306833.F90
@@ -0,0 +1,11 @@
+module blahblah
+ character(len=1), parameter :: ch10 = char(10)
+end module
+
+program testme3
+ use blahblah
+ implicit none
+ character(len=100) :: message
+
+ write(6, '(a,a)') ch10,'invars1m : enter jdtset='
+end program