Warning, /pkg/profiles/profiles.flow is written in an unsupported language. File is not indexed.
view on githubraw file Latest commit d3172737 on 2024-11-06 17:45:12 UTC
6a770e0a24 Patr*0001 C----------------------------------------
0002 C subroutine profiles_readvector
0003 C----------------------------------------
d3172737dc aver*0004 CADJ SUBROUTINE profiles_readvector INPUT = 1,2,3,4, 6,7,8
0005 CADJ SUBROUTINE profiles_readvector DEPEND = 1,2,3,4, 6,7
0006 CADJ SUBROUTINE profiles_readvector OUTPUT = 5
0007 CADJ SUBROUTINE profiles_make_ncfile INPUT = 1
0008 CADJ SUBROUTINE profiles_make_ncfile DEPEND = 1
0009 CADJ SUBROUTINE profiles_make_ncfile OUTPUT =
0010 CADJ SUBROUTINE NF_OPEN INPUT =
ca21d5218a Patr*0011 CADJ SUBROUTINE NF_CLOSE INPUT =
d3172737dc aver*0012
0013 C----------------------------------------
0014 C subroutine active_read_profile
0015 C----------------------------------------
0016 CADJ SUBROUTINE active_read_profile FTLNAME = g_active_read_profile
0017 CADJ SUBROUTINE active_read_profile ADNAME = adactive_read_profile
0018 CADJ SUBROUTINE active_read_profile INPUT = 1,2, 4,5,6,7,8,9,10,11
0019 CADJ SUBROUTINE active_read_profile OUTPUT = 3
0020 CADJ SUBROUTINE active_read_profile ACTIVE = 3
0021 CADJ SUBROUTINE active_read_profile DEPEND = 1,2, 4,5,6,7,8,9,10
0022
0023 C----------------------------------------
0024 C subroutine active_write_profile
0025 C----------------------------------------
0026 CADJ SUBROUTINE active_write_profile FTLNAME = g_active_write_profile
0027 CADJ SUBROUTINE active_write_profile ADNAME = adactive_write_profile
0028 CADJ SUBROUTINE active_write_profile INPUT = 1,2,3,4,5,6,7,8,9,10
0029 CADJ SUBROUTINE active_write_profile OUTPUT = 10
0030 CADJ SUBROUTINE active_write_profile ACTIVE = 3, 10
0031 CADJ SUBROUTINE active_write_profile DEPEND = 1,2, 4,5,6,7,8,9