Warning, /pkg/autodiff/model_ad.flow is written in an unsupported language. File is not indexed.
view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
ff72073f96 Patr*0001 C----------------------------------------
fead278c20 Patr*0002 C subroutine the_main_loop
0003 C----------------------------------------
0004 CADJ SUBROUTINE the_main_loop ADNAME = adthe_main_loop
0005 CADJ SUBROUTINE the_main_loop FTLNAME = g_the_main_loop
fba812e19e Jean*0006 CADJ SUBROUTINE the_main_loop MODNAME = mdthe_main_loop
fead278c20 Patr*0007
0008 C----------------------------------------
10156c3adf Jean*0009 C subroutine calc_oce_mxlayer
0010 C----------------------------------------
0011 CADJ SUBROUTINE calc_oce_mxlayer INPUT = 1,2,3,4,5,6,7
0012 CADJ SUBROUTINE calc_oce_mxlayer OUTPUT =
0013
0014 C----------------------------------------
ff72073f96 Patr*0015 C subroutine do_the_model_io
0016 C----------------------------------------
228c6444b6 Jean*0017 CADJ SUBROUTINE do_the_model_io INPUT = 1,2,3,4
ff72073f96 Patr*0018 CADJ SUBROUTINE do_the_model_io OUTPUT =
228c6444b6 Jean*0019 CADJ SUBROUTINE do_the_model_io DEPEND = 1,2,3,4
ff72073f96 Patr*0020 CADJ SUBROUTINE do_the_model_io REQUIRED
0021
0022 C----------------------------------------
10156c3adf Jean*0023 C subroutine turnoff_model_io
0024 C----------------------------------------
0025 CADJ SUBROUTINE TURNOFF_MODEL_IO INPUT = 1,2
0026 CADJ SUBROUTINE TURNOFF_MODEL_IO OUTPUT =
0027
0028 C----------------------------------------
d1d9168d08 Jean*0029 C subroutine DO_STATEVARS_DIAGS
0030 C----------------------------------------
0031 CADJ SUBROUTINE DO_STATEVARS_DIAGS INPUT = 1,2,3,4
0032 CADJ SUBROUTINE DO_STATEVARS_DIAGS OUTPUT =
0033 CADJ SUBROUTINE DO_STATEVARS_DIAGS DEPEND = 1,2,3,4
0034 CADJ SUBROUTINE DO_STATEVARS_DIAGS REQUIRED
0035
0036 C----------------------------------------
0037 C subroutine DO_STATEVARS_TAVE
0038 C----------------------------------------
0039 CADJ SUBROUTINE DO_STATEVARS_TAVE INPUT = 1,2,3
0040 CADJ SUBROUTINE DO_STATEVARS_TAVE OUTPUT =
0041 CADJ SUBROUTINE DO_STATEVARS_TAVE DEPEND = 1,2,3
0042 CADJ SUBROUTINE DO_STATEVARS_TAVE REQUIRED
0043
0044 C----------------------------------------
ff72073f96 Patr*0045 C subroutine plot_field_xyrs
0046 C----------------------------------------
0047 CADJ SUBROUTINE plot_field_xyrs INPUT = 1,2,3,4
0048 CADJ SUBROUTINE plot_field_xyrs OUTPUT =
0049
0050 C----------------------------------------
0051 C subroutine plot_field_xyrl
0052 C----------------------------------------
0053 CADJ SUBROUTINE plot_field_xyrl INPUT = 1,2,3,4
0054 CADJ SUBROUTINE plot_field_xyrl OUTPUT =
0055
0056 C----------------------------------------
0057 C subroutine plot_field_xyzrs
0058 C----------------------------------------
0059 CADJ SUBROUTINE plot_field_xyzrs INPUT = 1,2,3,4,5
0060 CADJ SUBROUTINE plot_field_xyzrs OUTPUT =
0061
0062 C----------------------------------------
0063 C subroutine plot_field_xyzrl
0064 C----------------------------------------
0065 CADJ SUBROUTINE plot_field_xyzrl INPUT = 1,2,3,4,5
0066 CADJ SUBROUTINE plot_field_xyzrl OUTPUT =
0067
0068 C----------------------------------------
0069 C subroutine plot_field_xzrs
0070 C----------------------------------------
0071 CADJ SUBROUTINE plot_field_xzrs INPUT = 1,2,3,4,5
0072 CADJ SUBROUTINE plot_field_xzrs OUTPUT =
0073
0074 C----------------------------------------
0075 C subroutine plot_field_xzrl
0076 C----------------------------------------
0077 CADJ SUBROUTINE plot_field_xzrl INPUT = 1,2,3,4,5
0078 CADJ SUBROUTINE plot_field_xzrl OUTPUT =
0079
0080 C----------------------------------------
0081 C subroutine plot_field_yzrs
0082 C----------------------------------------
0083 CADJ SUBROUTINE plot_field_yzrs INPUT = 1,2,3,4,5
0084 CADJ SUBROUTINE plot_field_yzrs OUTPUT =
0085
0086 C----------------------------------------
0087 C subroutine plot_field_yzrl
0088 C----------------------------------------
0089 CADJ SUBROUTINE plot_field_yzrl INPUT = 1,2,3,4,5
0090 CADJ SUBROUTINE plot_field_yzrl OUTPUT =
0091
0092 C----------------------------------------
0093 C subroutine write_state
0094 C----------------------------------------
0095 CADJ SUBROUTINE write_state INPUT = 1,2,3
0096 CADJ SUBROUTINE write_state OUTPUT =
0097