summaryrefslogtreecommitdiff
path: root/science/fvcom/files/patch-mod_lag.F
diff options
context:
space:
mode:
Diffstat (limited to 'science/fvcom/files/patch-mod_lag.F')
-rw-r--r--science/fvcom/files/patch-mod_lag.F16
1 files changed, 16 insertions, 0 deletions
diff --git a/science/fvcom/files/patch-mod_lag.F b/science/fvcom/files/patch-mod_lag.F
new file mode 100644
index 000000000000..84377bb00b64
--- /dev/null
+++ b/science/fvcom/files/patch-mod_lag.F
@@ -0,0 +1,16 @@
+--- mod_lag.F.orig 2008-07-25 16:44:11.000000000 -0500
++++ mod_lag.F 2012-03-31 21:57:17.000000000 -0500
+@@ -212,7 +212,12 @@
+ !Lagrangian particle associated scalar
+ character(len=80) :: lag_scal_choice
+ integer, parameter:: n_scal_choice = 6
+- character(len=80) :: scal_choices(n_scal_choice) = (/"s1","t1","rho1","km","kh","user_defined"/)
++ character(len=80) :: scal_choices(n_scal_choice) = (/ "s1 ", &
++ "t1 ", &
++ "rho1 ", &
++ "km ", &
++ "kh ", &
++ "user_defined"/)
+ logical :: scal_choice_valid
+
+